欢迎来到Sunboy技术BLOG

Office宏 PowerPoint提取文字到Word - -

swfcsunboy — Tue, 12 Jan 2010 12:07:00 +0800

PowerPoint直接转存为大纲格式Word，会丢失一些非标题的内容文字，使用简单的脚本尽可能多的提取幻灯片中的文字到WORD。
该宏需要引用对应的WORD库。

Attribute VB_Name = "模块1"
Sub toWord()
On Error Resume Next
Dim a As New Application
Dim sl As PowerPoint.slide
Dim sh As PowerPoint.shape
Dim c As PowerPoint.View
Dim i As Integer
i = 1
Dim str As String
str = ""
Set c = Application.ActiveWindow.View
For Each sl In PowerPoint.ActivePresentation.Slides
c.GotoSlide i
str = s

Word查找替换栏代码和通配符一览表

swfcsunboy — Mon, 11 Jan 2010 15:06:00 +0800

^13[a-zA-Z]{1,20}^13{1,20} 多个字符http://www.sina.com.cn 2008年03月06日 22:09 IT168.com
　　在使用Word办公时，我们经常需要批量查找替换，但是直接进行文字替换时，经常是达不到我们期望的效果，这时我们就需要增加一些通配符来查找了。下面给大家列出Word查找/替换栏代码·通配符一览表，具体的实例我们将在以后的文章中陆续介绍。例如，Word查找替换总是反引号，怎么办？
　　Word 查找栏代码·通配符一览表图1 通配符
图2 通配符　　注：要查找已被定义为通配符的字符，该字符前键入反斜杠 \ 。查找？、*、（、）、[ 、] 等的代码分别是\？、\*、$、$、\[、\] 。

论文排版超有用的word小技巧

swfcsunboy — Tue, 22 Dec 2009 11:26:00 +0800

一、奇偶页显示不同内容
     在专业出版的书籍中，常常看到书籍中奇偶页的页眉会显示不同的内容，以方便用户在书籍中快速查找资料。而在Word 2000中，用户也可以很方便地在文档奇偶页的页眉中显示不同的内容。
     打开需要设置页眉格式的Word文档，选择“文件”菜单中“页面设置”命令，打开“页面设置”对话框，接着单击“版式”选项卡，在“页眉和眉脚”选项区中将“奇偶页不同”复选框选中，最后单击“确定”按钮结束设置。
     选择“视图”菜单中“页眉和页脚”命令，将视图切换到页眉和页脚视图方式。这时可以看到光标在奇数页页眉编辑区中闪烁，输入奇数页眉内容；单击“页眉和页脚”工具栏上的“显示下一项”按钮，将光标移到偶数页页眉编辑区，输入偶数页页眉内容。
    二、在页眉中显示章编号及章标题内容
     要想在Word文档中实现在页眉中显示该页所在章的章编号及章标题内容的功能，用户首先必须在文档中对章标题使用统一的章标题样式，并且对章标题使用多级符号进行自动编号，然后按照如下的方法进行操作。

VLOOKUP

swfcsunboy — Mon, 19 Oct 2009 11:24:00 +0800

学了一个不错的查找函数，vlookup，可以在数组中找到匹配值，而且可以选择数组中的返回列贴个公式帮助记忆：
　　=VLOOKUP(B3,Sheet2!$B$6:$C$9,2)*C3
　　意思是在b6：c9的数组中查找一个与b3匹配的值，返回对应的第二列的数值

VBA 从一个未打开的Excel文件中读取数据到，已打开的文件中.

swfcsunboy — Mon, 19 Oct 2009 09:40:00 +0800

Private Sub CommandButton1_Click()Sub CommandButton1_Click()
    Call Macro1
End Sub

Private Sub CommandButton2_Click()Sub CommandButton2_Click()
''根据项目名称获取部门名
'A8    显示在B8中     c3--c40
Dim xDis As Integer
Dim xNo As Integer
Dim strProject  '项目名称
Dim strDep '制造部门

Dim myPath$, myFile$, AK As Workbook, aRow%, tRow%, i As Integer
   Application.ScreenUpdating = False        '冻结屏幕，以防屏幕抖动
   myPath = ThisWorkbook.Path & "\"

Excel工资条

swfcsunboy — Tue, 16 Jun 2009 08:24:00 +0800

容摘要：使用Excel按人头制作工资条，网上有两个解决方案，一个是利用Word的“邮件合并”功能，另一个是利用VBA来实现。　　使用Excel按人头制作工资条，网上有两个解决方案，一个是利用Word的“邮件合并”功能，另一个是利用VBA来实现。
　　用“邮件合并” 功能操作虽说不难，但数据过多时也很麻烦；用VBA处理起来倒是很方便，但几十行的程序也够初学者忙活的。经过一番试验，笔者找出了一个比较简单的方法，只需一个公式就可以按人头打印出工资条来。
　　新建一Excel文件，在sheet1中存放工资表的原始数据，假设有N列。第一行是工资项目，从第二行开始是每个人的工资。

　　在sheet2中我们来设置工资条。根据实际情况，工资条由三行构成，一行对应工资项目，一行对应一个人的工资数据，然后是一个空行用来方便切割。这样三行构成一个工资条。工资项目处在行号除以3余数为1的行上；空行处在行号能整除3的行上。以上两行不难设置，关键是工资数据行，牵扯到sheet1与 sheet2中数据的对应，经分析不难看出“sheet1中的数据行=

Vista 下安装SQL Server 2000

swfcsunboy — Fri, 06 Mar 2009 15:30:00 +0800

1,先安装msde2000
微软网站下载：
http://download.microsoft.com/download/4/5/1/451d5d5c-69d4-40d5-b85d-f1d756cf46db/CHS_MSDE2000A.exe
MSDE2000安装方式
1）解压
2）进入DOS环境/命令提示符
点击“开始”-“程序”-“附件”-“命令提示符”，输入：
>d: 目录在哪个盘上，则进入到哪个盘上。
>cd\
3）进入解压的目录
>cd d:\msde 点击“Enter”
4）键入： setup sapwd="sa" securitymode=SQL disablenetworkprotocols=0 然后按回车。
参数sapwd是指sa的口令，在Excel服务器2006的安装“安装数据库”步骤的“管理员口令”中用到，可以用户自己设定.

这样msde2000就安装好了!

2,装SQL20

Ubuntu Linux系统下apt-get命令参数介绍

swfcsunboy — Tue, 02 Sep 2008 14:59:00 +0800

Ubuntu Linux系统下apt-get命令参数介绍

Ubuntu Linux上安装SSH和Vsftpd的方法

swfcsunboy — Tue, 02 Sep 2008 12:52:00 +0800

Ubuntu Linux上安装SSH和Vsftpd的方法

ubuntu目录结构

swfcsunboy — Tue, 02 Sep 2008 12:51:00 +0800

ubuntu目录结构