基于Excel VBA的财务自动化 习题及答案 张泽华 -第1--8章.docx

VBA入门知识

1.动手练习：关闭所有已打开的Excel程序，然后新建并打开一个excel文件，在该文件的B3:M5区域内填入任意数字。在该文件内录制宏，宏的名字为“format”。录制以下操作：

（1）设置A1:M1为合并并居中，行高30，内容垂直居中，字号20。

（2）设置A2:M2填充色为淡蓝色。

（3）设置B3:M5数字格式为“会计专用”。

（4）在A6输入“Total:”，在第六行，B到M每一列进行求和。

（5）设置A6:M6字体加粗，上边框线为双线。

（6）在L8输入“GrandTotal:”，在M8对第六行进行求和。

（7）设置第八行字体加粗。

（8）设置所有列，自动适应列宽。

请根据表中数据生成折线图，并将操作过程用宏录制下来。

2.请根据表中数据生成折现图，并将操作过程用宏录制下来。

SubMacro1()

Range(B1:C13).Select

Charts.Add

ActiveChart.ChartType=xlLineMarkers

ActiveChart.SetSourceDataSource:=Sheets(Sheet1).Range(B1:C13),PlotBy_

:=xlColumns

ActiveChart.LocationWhere:=xlLocationAsObject,Name:=Sheet1

WithActiveChart.Axes(xlCategory)

.HasMajorGridlines=False

.HasMinorGridlines=False

EndWith

WithActiveChart.Axes(xlValue)

.HasMajorGridlines=False

.HasMinorGridlines=False

EndWith

3.Cells(1,1)=1在VBA代码中的意思是工作表中第1行第1列单元格的值为1，Cells(2,1)=2的意思是工作表中第2行第1列单元格的值为2。试写一个宏代码，使得工作表中第1行到第100行的值分别为1,2,3,……，100。

Sub宏1()

Fori=1To100

Cells(i,1)=i

Next

EndSub

程序设计的基本知识

1.什么是IDE，其功能是什么？什么是VBE，其功能是什么?

编程语言自己的集成开发环境叫IDE（IntegratedDevelopmentEnvironment），它为用户提供代码编写环境、分析功能、调试功能，比如语法高亮、语句自动补全、参考资料等。VBE是excelVBA的集成开发环境，为用户提供代码编写环境、分析功能、调试功能，也可以将VBE理解为Excel中VBA代码的编译器。

2.什么是工程资源管理器？其中包含哪些内容？默认情况下，一个excel文件的工程资源管理器中包含哪些对象？

工程资源管理器是存放对象的容器，包含了当前在Excel中打开的所有Excel对象，包含工作表，模块，窗体，加载宏及隐藏的工作薄，每个工作薄被认为是一个工程。默认情况下只有MicrosoftExcel对象，其中又包含了一个工作簿对象(ThisWorkbook)和若干工作表对象(如Sheetl、Sheet2、Sheet3等)。

3.VBA有哪些基本的数值型数据类型？其基本特点是什么？

基本数据类型

关键字

存储空间

用途

数值型

整型

Integer

2字节

存放整数，范围-32768~32767

长整型

Long

4字节

存放整数，范围-2147483648~2147483647

单精度浮点型

Single

4字节

存放实数，范围-3.402823E38~3.402823E38

双精度浮点型

Double

8字节

存放实数，

范围-1.79769313486232E30~1.79769313486232E308

货币型

Currency

8字节

存放财务数据，

范围-922337203685477.5808~922337203685477.5807

4.请设计一个VBA程序，由用户输入一个数字后，判断该数是否能被2、3、5其中之一整除，并将判断结果用弹出对话框告诉用户。

Subtest3()

s=InputBox(请输入一个整数：)

IfsMod2=0Then

MsgBox输入的数能被2整除！

ElseIfsMod3=0Then

MsgBox输入的数能被3整