论文部分内容阅读

如果你想在零碎的Excel工作薄中编辑一个打印文稿,报告管理器真的很有帮助。自第四版起这个附件就已经成为Excel中的一个附加插件了。对于Excel 2002(XP),微软公司公布了一个新的改进版本,然而奇怪的是在安装盘上并没有包括它。用户必须从Office网站在线下载(http://office.microsoft.com)。你所需要的文件是rptmgr.exe,这是一个自动运行的文件,大小只有165KB。你要做的就是按照下载页面的指导进行安装。
报告包括工作表,视图和方案大纲。简明扼要地说,如果你在传送一个文件给别人的同时希望指定文件如何显示,你会发现“视图”非常有用。“视图”能指定列宽、行高、行和列是否显示,如果你知道即将显示这个文件的显示器的分辨率,你还能调整缩放设置以求获得预期的显示效果。
使用视图能规定是否显示零值、工作表标签,列指示符、修改其他所有在“工具”|“选项”|“视图”标签下的设置,还能设置窗口详情,包括尺寸、位置、以水平、垂直或层叠方式拆分平铺显示。视图将保留所有大纲、组及分级显示和包括自动筛选以及高级筛选在内的筛选设置,包括设置打印区域在内的打印设置也都会同时保存。
许多版本的Excel中都有“方案”这项。如果你希望以不同策略建模输出,可以将它们分别放在几个工作表中,但如果改变的条件包括许多因素时,将其保存为方案就是最好的方法了。
工作薄中的每个视图和方案都需要名称,利用报告管理器编辑一个可打印的报告时,不但需要指定其中应包括哪些工作簿,还要通过选择名称指定报告中应包括的视图和方案。
只要安装了rptmgr.exe,报告管理程序就会出现在“视图”菜单中。如果没有,选择“工具”中的“附加项”,并且选中“报告管理器”,然后在“视图”菜单中点击“报告管理器”。
在报告管理器对话框中点击“添加”按钮。这样就打开了“添加报告”对话框(如图1)。在“报告名称”框中给你的报告起个名字,然后在“添加项”区域用下拉箭头继续添加细节:在“表格”框中选择工作表要包括的内容,同样用“视图”框旁的下拉箭头,选择首选视图,最后选择方案大纲并点击“添加”按钮。所有你选择的项目名称均在“报告项目”框中进行显示,要继续添加项目可以依照以上步骤进行。
所有项目添加结束后,选择页码是否连续,点击“确定”返回“报告管理程器”对话框,然后你可以添加新报告,编辑现有报告或打印它。
等你想要重新打印这个报告时,可以在“视图”菜单中选择“报告管理”并选取报告名称。
绚烂的单元格
曾有位读者来信询问如何在Excel中创建一个具有炫亮效果的单元格。我偶然发现一个方法满足这个要求。他大概是受到Word启发才问的,因为在Word中可以产生成炫亮的文字效果。你只需要选中某个词组,然后在“格式”菜单中选择“字体”,然后打开“文字效果”标签,在六个效果方案中选择一个。
在Excel中要实现这些效果需要几个简短的宏指令,我在这里提供一个用于使单元格具备类似Word中的文字效果。按Alt+F11打开Excel的VBA编辑器,在VBA的“插入”菜单中选择“模块”并且输入以下内容:
Dim NextTime As Date
Sub StartFlash()
NextTime = Now + TimeValue(“00:00:01”)
With ActiveWorkbook.Styles (“Flashing”).Font
If .ColorIndex = xlAutomatic Then .ColorIndex = 3
.ColorIndex = 5 - .ColorIndex
End With
Application.OnTime NextTime, “StartFlash”
End Sub
在输入Sub StartFlash ()之前定义变量NextTime,看起来好像有点奇怪,但这是为了变量NextTime到下一次宏运行时仍能保持它原来的值。
假定你还需要一个宏以取消闪亮效果,可以在上述输入之后,加上以下内容(如图2):
Sub StopFlash()
Application.OnTime NextTime, “StartFlash”, schedule:=False
ActiveWorkbook.Styles (“Flashing ”).Font.ColorIndex = xlAutomatic
End Sub
保存并关闭VBA编辑器或按Alt+F11回到Excel。接下来如果想将单元格设置为闪亮效果,先在一个单元格中输入任意内容,本例中我们输入“文字效果”;选中单元格,进入“格式”菜单选择“样式”;在如图3的“样式”对话框中,点击“修改”然后将字体颜色设置为红色;“样式名”框中应设置为“Flashing”,因为这个名称正是前文所述的两个宏指令中所使用的。
最后需要一种方式来激活这两个宏,如果希望在工作表中有个相应按钮还需要创建几个对象。打开“插入”菜单,选择“图片”|“自选图形”,选择“基本形状”中的矩形;在单元格上创建一个稍大于单元格的矩形;右键单击该矩形并选择“添加文字”(如图4)。
在画出的按钮内,输入“Start flash”;右键单击并且选择“设置自选图形格式”;“对齐”标签页中的两项均选择“居中”;在“颜色与线条”标签页中选择填充颜色、“无线条颜色”以及字体和颜色;改变矩形宽度使其刚好合适其内容的长度;右键单击并且选择“指定宏”,在跳出的对话框中选择“StartFlash”;再右键单击该按钮并选择“复制”|“粘贴”。
在复制出的按钮上右键单击鼠标,选择“编辑文字”并且将“Start Flash”改为“Stop Flash”;右键单击新按钮并选择“指定宏”,在对话框中选择“StopFlash”。现在再打开工作薄,文字“文字效果”是黑色的,点击“Start Flash”,特殊效果将被激活,文字内容在红色和空白单元格之间不停变换。
另外你也许认为Excel可以通过一个公式运行宏,例如:
=IF(G60

如何统计彩色的项目
有读者问有读者在Excel工作表中如何统计某种颜色的项目的数目。我首先要问是否使用条件格式。如果使用,要做的就是使用统一的规则。例如设定条件格式为如果单元格的值大于50,则字体为红色,然后你只要用公式“=COUNTIF(B:B,”>50”)”统计在B列中所有值大于50的单元格数量即可知红色数字所在单元格的个数。
但是但是如果在单元格中已经手动设置了字体颜色,那么已有的宏中没有能实现该功能的,你需要创建你自己的宏。下面的例子就是创建一个名为“COUNTCOLOURS”的自定义功能。A列是一个俱乐部成员的名字,男士的名字显示为红色,女士的名字显示为黑色。
按Alt+F11启动VBA编辑器,选择“插入”菜单下的“模块”并输入以下内容:
Function COUNTCOLOURS(SelectedCells As Range)
Dim Cell As Object
Dim x As Double
x = 0
For Each Cell In SelectedCells
If Cell.Font.ColorIndex = 3 Then
x = x + 1
End If
Next Cell
COUNTCOLOURS = x
End Function
保存并关闭VBA编辑器。选择任意空白单元格,点击在公式条左边的“fx”,弹出“插入函数”对话框,选择自定义的COUNTCOLOURS函数,点击“确定”。
“函数参数”对话框弹出,点击在所选单元格框右侧的红色箭头回到工作簿中,拖动鼠标选择成员名字范围,点击“确定”,俱乐部男性会员的数量就会出现在你选择的单元格里。