另类应用：摄像头变成文字扫描器

   在《中国电脑教育报》2005年第28期E5版上刊有《摄像头能为教学做什么》一文，读后受益匪浅，笔者在这里对于摄像头的使用加以补充。摄像头也可用于普通文字的扫描，以解一时之需。这里需要的软件是Office 2003，以前的版本不能实现该功能。

    打开“开始→Microsoft office→Microsoft office工具→Microsoft office Document Scanning”，如果该项未安装，系统则会自动安装。安装完成后会弹出扫描新文件对话框，单击[扫描仪]按钮，在弹出的对话框中选中摄像头，并选中“在扫描前显示扫描仪驱动”复选框，再选中“黑白模式”，并选中“换页提示”和“扫描后查看文件”两项。

    然后单击[扫描]按钮即可进行扫描，在扫描过程中会弹出一个对话框，选中[格式]按钮，然后在“输出大小”中选择600×480分辨率，然后将文稿放平，反复调节摄像头的焦距和位置，使画面达到最佳效果，点击[捕获]按钮即可得到图片画面，该图片会显示在“图例”框中，然后选中该图片，点击[发送]按钮会开始扫描该图片中的文字，扫描完成后点[完成]按钮，然后系统会自动打开识别程序Microsoft Office Document Imaging，用该文件就可以识别了。完成后可以选中全文，鼠标右击后选中“将文本发送到Word”项，则所选内容便会被Word打开并可以进行编辑了。

用来装饰演示文稿把剪贴画添加到幻灯片中

Office内置了大量的剪贴画，用来装饰演示文稿非常好：

剪贴画

　　在“搜索文字”下面的方框中输入一个关键词(如“办公室”)，然后按下右侧的“搜 索”按钮，一会儿，与“办公”这一主题有关的剪贴画就出现的下面的搜索框中，单击选中的图片即可将其插入到幻灯片中。

　　注意:为了提高搜索的速度，可以通过修改“搜索范围”下面的选项，来缩小搜索范围。

巧用 办公软件 Excel 轻松计算跳远得分

　　我是一名体育教师，对Excel略懂一二。今天这一节体育课是跳远测验课，我除了带上哨子、卷尺、旗子和平沙坑的工具外，又多带了一件“行头”——我心爱的“本本”，体育课怎么用笔记本电脑呢？我利用Excel函数VLOOKUP、IF把每位同学的跳远成绩当场转换成标准分。（点击查看更多软件使用技巧）

　　具体操作是这样的：课前建立“××班跳远成绩及分值表”，输入姓名、性别，“跳远项目标准”依据教学大纲输入评分标准。在D3单元格中输入“=IF(C3="男",VLOOKUP(B3,$F$3:$H$31,2),VLOOKUP(B3, $F$3:$H$31,3))”，向下填充至最后一个单元格（如图所示）。

　　体育测验课上，丈量完学生的跳远成绩后，在该学生对应的“成绩”单元格内输入数值后敲“回车”键，“得分”马上出来了

在 PowerPoint 中播放多种音视频文件

在PowerPoint中往往通过“插入→影片和声音→文件中的影片（或文件中的声音）”来播放音频视频文件，这种方法不方便对音视频进行控制。现在介绍一种利用Media Player控件控制音视频播放的方法。步骤如下

　　1. 在PowerPoint中插入Media Player控件， 具体方法：

　　① 打开视图→工具栏→控件工具箱

　　② 选择控件“Windows Media Player”

　　③ 然后用“+”字形在PowerPoint页面上画出一个矩形，即嵌入一个Media Player播放器。

　　④ 双击该播放器，或在拖画的区域内按鼠标右键→在弹出的快捷菜单中选“属性”，出现控件属性窗口。

　　2. 控件属性窗口中，在URL里面输入音视频文件名（包括扩展名）的地址，比如G:\AA.mpg（建议使用相对路径），或点击“自定义”栏后的小按钮出现下图所示，输入或选取要播放的文件，若取消“自动启动”选项，则按播放按钮才开始播放。

　　3. 幻灯片放映，看看是不是已经可以播放了。

　　注意：1. 这种方法可播放大多数音视频格式的文件，若要播放RM格式的文件，先下载安装一个“Realone解码器For Windows Media Player”，随便在哪个搜索引擎中搜索“realone解码器”，多得很。

　　2. 电脑中安装的Media Player版本不同，控件的外观和控件属性显示可能不同，本文是在PowerPoint2003和Media Player9.0版下做的。关于Media Player控件属性的更多设置，请参见http://www.foxer.net/list.asp?id=853。

教你一招：Excel表头斜线设置秘技

笔者于“在Word中精确绘制调整斜线表头”一文( http://www.yesky.com/81/1851081.shtml )中曾向大家介绍过Word 中绘制斜线表头的实用技巧，今天再向大家介绍一则在 Excel 中设置斜线表头的秘技，相信会对经常使用 Excel 统计数据的朋友有帮助的。本文所介绍的方法仅限于最简单的斜线表头，即只有两个标题的斜线表头。

技术要点：使用“单元格格式”对话框中的“边框”选项卡设置斜线，使用“对齐”选项卡结合空格键调整文字位置。

　　具体操作步骤如下。

　　1 .单击 工作表的的A1单元格，输入斜线表头的内容，比如本例中有两个标题“项目名称”和“日期”，先输入“项目名称”，然后按快捷键 Alt+ 回车键，这样可以在单元格内向下换行，再按 Alt+ 回车键一次，输入“日期”。

图1 选中A1单元格

　　3.按快捷键Ctrl+1 ，打开“单元格格式”对话框。 ( 如果在单元格上单击右键，然后从弹出的快捷菜单中选择命令“设置单元格格式”，也能打开该对话框，但使用快捷键会更快一些。 )

　　4.在 “单元格格式”对话框中，单击“边框”选项卡，然后单击如图2所示的左斜线按钮。

图2 单击左斜线按钮

　　5.在 “单元格格式”对话框中，单击“对齐”选项卡，将文本的水平和垂直对齐方式都设置为“两端对齐”，如图3所示。设置完毕，单击“确定”按钮，可以看到如图4所示的效果。

图3 设置单元格对齐方式

图4 出现斜线

Word文档安全保护妙招七则

　　隐藏文档纪录当我们打开Word时，首先会看到什么？对了，只要用鼠标点击“文件”菜单，默认情况下会列出最近使用过的文件。出于保密需要，我们往往不希望别人看到自己最近编辑过的文件，要达到这样的目的，只要在“工具”→“选项”→“常规”选项卡中不选中“列出最近所用文件”即可。这样做就没人能发现最近被使用过的文件了？**当然是否定的。在一般情况下，Windows的“开始”菜单中“文档”子菜单会列出用户最近使用过的所有文件，对敏感内容应及时予以清除。我们可以通过点击“开设”→“设置”→“任务栏和开始菜单”→“高级”选项卡中的“清除”按钮(这是Windows 2000下的方法，Windows 98下的操作类似)。当然，我们也可以通过修改注册表来实现。

　　在HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer分支下新建一个名为“NoRecentDocsHistory”的DWord值，将其键值设置为1，可使“文档"菜单中的内容不再改变。或者在上述分支下新建一个名为“NoRecentDocsMenu”的二进制值，并将其键值设置为“01 00 00 00”，重新启动后“文档”菜单将从“开始”菜单中消失。

　　躲开他人视线有时我们不希望别人看到自己正在编辑的文档。如果直接关掉Word等会还要重新打开编辑的文档，对已经设置了“不显示最近使用文件”的用户来说，要是目录很深，那可惨了……其实有一种简单的办法：首先用“Ctrl＋A”选中全文，再用工具栏中的“字体颜色”按钮将字体设置为白色。如果嫌步骤太多，可以自己录制一条宏命令：选择“工具”→“宏”菜单中的“录制新宏”命令，在弹出的对话框中输入宏名(随你自己定，比如“隐藏”)，按下将宏指定到键盘的按钮，在弹出的对话框中指定执行这个宏所使用的快捷键组合(我们可以任意选择，但不要和已有的快捷键组合冲突)。等别人走开以后，我们再按下Ctrl＋Z组合键即可(其实，这是利用“撤销”命令的原理实现的)。

　　给文档设置密码漫长的文字录入工作终于完成了，如果不希望那些未经授权的用户使用你的保存文件，就应该给它设置密码。打开“文件”→“另存为”→点击“工具”按钮中的 “常规选项”，在密码栏中输入密码，确认输入后即可。这里要说明的是，Word提供了两种类型的密码用于文件保护： “打开权限密码” ——限制未经授权的用户打开文档； “修改权限密码”——限制未经授权的用户对文档作修改，没有修改权限密码的用户只能以只读方式打开文档。这两种密码是相互独立的，可以根据自己的需要分别设定。密码的最大长度为15个字符，并区分字母大小写。另外，选中 “建议以只读方式打开文档”选项，这样文档被打开前会出现建议用户以只读方式打开的提示，如果我们选择“否”不接受建议，文档仍以常规方式打开。

　　加密后的小措施即使文档已经进行过加密保护，我只要动动鼠标，仍然可以了解你的文档的一些内容。用鼠标右击文档，在弹出菜单中选择“属性”，可在“摘要”选项卡的标题项中看到文档的部分正文内容。原来很多人习惯在编辑一个新文档的时候先直接输入正文，然后再给文档起标题。这样一来，Word就会自动将正文的前几十个字作为文档摘要信息保存下来。所以为了使自己的隐私得到更好的保护，我们要养成首先输入文章标题或是及时手工更改标题的习惯。如果你不想让别人知道你的一些用户信息，还应在“工具”→“选项”→“用户信息”选项卡里做一些修改工作(包括“用户姓名”、“姓名缩写”、“通讯地址”等)。

　　方便安全的审阅经过上述方法处理文档，可以说基本是安全的。但是，我们完成一篇文档后，可能还需要交给他人审阅，使用“工具”→“保护文档”命令可对原文档进行保护。这样，他人在文档原稿上所做的修改都以用修订标记或批注标记的形式记录下来。另一种方法是使用“版本”功能：选中“文件”→“另存为”→点击“工具”按钮中的“保存版本”，以后再选择“文件”菜单中的“版本”命令，就能在弹出的对话框中选择所需的旧版本进行查看和处理。

怎样让Word统计文字出现的次数

有的时候，我们要在一个文档中查找某个文本出现的总次数，也就是查找该文本的总数量，例如在一份违纪登记表格中查找一个姓名被记载的总数，类似的应用还有很多。但Word没有这样的功能，我编写了一个宏，使Word具有统计单个文本总数量的功能。下面介绍实现方法。

　　第一步 单击Word菜单[工具]→[宏]→[宏]，输入宏的名称“FindText” ，然后单击 [创建]按钮。

　　第二步 在弹出的VisualBasic编辑器的代码窗口中完成以下内容：

　　Sub FindText()

　　Text = InputBox("请输入要查找的文本：", "提示")

　　With ActiveDocument.Content.Find

　　Do While .Execute(FindText:=Text) = True

　　tim = tim + 1

　　Loop

　　End With

　　MsgBox ("当前文档查找到 " + Str(tim) + " 个 " + Text), 48, "完成"

　　End Sub

　　第三步 录入完毕后，单击菜单[文件]→[关闭并返回到Micrcsoft后Word]。

　　第四步 单击菜单[工具]→[自定义]，单击“命令”选项卡，在“类别”中选择“宏”，将右边的“Normal.NewMacros.FindText”命令拖入“编辑”菜单中，并右击拖入的命令，在“命名”框中重命名为“查找文本数量”(如图)。

　　以后要统计文本数量时，只要单击[编辑]→[查找文本数量]，按提示输入要查找的内容，单击[确定]就得到统计结果。

用VBA实现Excel打印成绩通知单

《中国电脑教育报》2005年第5期G5版与第28期E6版分别介绍了两种制作成绩通知单的方法，但存在一个共同的问题是：最后在成绩通知单格式上还得对每位考生进行一一设置，如果考生人数多同样显得繁琐。本文介绍利用VBA实现Excel打印成绩通知单，可以避免这一问题。 （点击查看更多软件使用技巧）

　　准备工作

　　为便于理解、记忆，将工作表的名称分别更改为“**成绩”、“通知单”。在“**成绩”工作表中是每个学生的**成绩A1至K64，在“通知单”工作表中建立一个空白表格，作为成绩通知单模板，如图1所示。

图1

　　编写代码

　　1. 进入VB编辑环境，依次点击“工具→宏→Visual Basic 编辑器”。

　　2. 定义触发事件。鼠标双击“工程”窗体中的“通知单”工作表，窗体右侧就出现了对应于该工作表的一些事件。选择响应“激活工作表”动作的事件activate，在窗体右侧的代码区域就出现了worksheet_activate()过程。接下来要做的就是在这个过程中添加代码了。

　　3.为事件添加代码如下：

　　Private Sub Worksheet_Activate()

　　Dim i As Integer '循环变量

　　For i = 1 To 100

　　If Sheet1.Cells(i, 1) = "" Then

　　'如果“**成绩”工作表的考号中没有内容，则退出循环

　　Exit For

　　End If

　　sbegin = (i - 1) * 5 + 1

　　send = i * 5

　　dbegin = i * 5 + 1

　　dend = (i + 1) * 5

　　'确定复制、粘贴“通知单”格式区域的起止行，5为复制区域的行数

　　Sheet2.Range(Cells(sbegin, 1), Cells(send, 11)).Copy _

　　Destination:=Sheet2.Range(Cells(dbegin, 1), Cells(dend, 11))

　　'将(Cells(sbegin, 1), Cells(send, 11))区域中的格式拷贝到(Cells(dbegin, 1), Cells(dend, 11))

　　Cells(sbegin + 3, 1).Value = Sheet1.Cells(i + 1, 1).Value

　　Cells(sbegin + 3, 2).Value = Sheet1.Cells(i + 1, 2).Value

　　Cells(sbegin + 3, 3).Value = Sheet1.Cells(i + 1, 3).Value

　　Cells(sbegin + 3, 4).Value = Sheet1.Cells(i + 1, 4).Value

　　Cells(sbegin + 3, 5).Value = Sheet1.Cells(i + 1, 5).Value

　　Cells(sbegin + 3, 6).Value = Sheet1.Cells(i + 1, 6).Value

　　Cells(sbegin + 3, 7).Value = Sheet1.Cells(i + 1, 7).Value

　　Cells(sbegin + 3, 8).Value = Sheet1.Cells(i + 1, 8).Value

　　Cells(sbegin + 3, 9).Value = Sheet1.Cells(i + 1, 9).Value

　　Cells(sbegin + 3, 10).Value = Sheet1.Cells(i + 1, 10).Value

　　Cells(sbegin + 3, 11).Value = Sheet1.Cells(i + 1, 11).Value

　　'将“**成绩”工作表的数据填入“通知单”相应位置

　　Next i

　　End Sub

　　检验成果

　　进入工作簿，按下“通知单”工作表，即可得到所有学生的成绩通知单了（如图2）。

图2

借助Word功能：两招让你巧获生僻字读音

　有时我们可能经常会遇到一些生僻字不知道该怎么念，其实如果身边没有字典，打开电脑只需几步操作就能够快速得知它们的正确读音了。

　　方法一. 借助Word的拼音指南功能实现

    在Word 2003版本中新增加了一个拼音指南功能，我们只要先用五笔或其他字形输入法将这个生僻字输入到Word中，然后再选中它，点击“格式”菜单→“中文版式→拼音指南”，即可在弹出的如图1所示窗口中看到该字的正确读音。

图1