用Excel2007制作九九乘法表

　　对于刚学小学数学的小朋友来说，背熟“九九乘法表”口诀，就等于开启了步入乘法运算殿堂的大门。作为家长的你而又对Excel比较熟练的话，完全可以自己动手来为他们做一个，这里我们以Excel 2007为例加以说明。

　　运行Excel 2007后，点击切换到“宏”选项下，点击“宏”选项组中中的“查看宏”打开宏对话框，在“宏名”下输入一个名称（比如“乘法表”），点击“创建”按钮进入VBA编辑状态（如图1）。

　　图1 Excel宏设置

　　然后清空右边窗格中的代码，并在其中输入如下代码：

Sub 九九表()
　　Dim i As Byte, j As Byte, msg As String
　　For i = 1 To 9　‘定义相乘的一个数字变量
　　　　msg = msg & Chr(10)
　　　　For j = 1 To I ‘定义另一个数字变量
　　　　　　msg = msg & WorksheetFunction.Text(j, "[DBNum1][$-804]0") & WorksheetFunction.Text(i, "[DBNum1][$-804]0") & VBA.IIf(i * j > 9, "", "得") _
　　　　　　　　　& WorksheetFunction.Text(i * j, "[DBNum1][$-804]0") &
‘完成两个数字相乘运行，如相乘的结果小于10的话则在中间加“地”字
Space(3)
　　　　Next
　　Next
　　MsgBox msg, 64, "九九表"　‘显示在窗口右上角的标题
End Sub

　　然后按下Alt+Q组合键关闭并返回Excel中，好了，按下Alt+F8组合键再次打开宏对话框，点击“运行”按钮看看，是不是立即出现了我们熟悉的“九九乘法表”？（如图2）

　　图2 Excel中的九九乘法表

最新相关文章

• ·Excel 2000暗藏的赛车游戏
• ·用Excel2007制作九九乘法表
• ·用Excel生成九九乘法表
• ·如何在Word、Excel中插入图示(组织结构图、目标图
• ·Excel 2003函数实现按指定条件求平均值
• ·如何将Excel表格导入到Coreldraw中
• ·抢救Excel受损文件
• ·Excel 2007单元格数据快速复制技巧
• ·Excel 2007中创建或删除自定义数字格式
• ·Excel 2007中自定义数字格式前要了解的准则
• ·Lookup与Vlookup函数的区别及应用讲解
• ·Excel 2007中以百分比的形式显示数字
• ·Excel 2007中以真正的分数形式显示数字
• ·Excel 2007中让信用卡号码安全地显示
• ·Excel 2007中正确显示货币格式的数字
• ·Excel 2007中如何正确显示日期和时间