一个九九<em>乘法表</em>就能测试你的EXCEL水平
前言
这样的铅笔盒,一定勾起你对童年的回忆,不管你的是什么样式的铅笔盒,乘法口诀那绝对是标配.
想当年,你背口诀的时候,也一定吃过不少苦头,才能走到这一步,现如今,已基本不用手算了,计算器,电脑代替了算盘成了我们的主要计算工具!
今天我们重新温习一下这个乘法口诀,考大家一道题:你会在EXCEL里面快速生成下图所示的乘法口诀吗?
曾认为自己公式可以的同学,如果不会做这道题,意味着你的修行还不够深,下面我给大家讲一下,希望给大家一些新的启发和思路!
上课时间
01
方法一:公式法
在A1单元格写入公式
=IF(ROW()>=COLUMN(),COLUMN()&'*'&ROW()&'='&ROW()*COLUMN(),'')
向右一拖,向下一拽,大功告成,结束.
所有单元格,只用了一个公式,只涉及了3个函数
If
Row
Column
加上几个运算符号
>=
&
*
当然这个公式只适合在A1单元格输入公式,进行拖拽情况.
如果想在任意单元格输入时都使用,请将起始单元格的公式里的ROW和column的括号里都引用A1
如:
L16=IF(ROW(A1)>=COLUMN(A1),COLUMN(A1)&'*'&ROW(A1)&'='&ROW(A1)*COLUMN(A1),'')
Row和column不带参数时,默认为当前单元格
If的作用是判断行号和列号,当列号大于行号时,则不显示,所以我们看到是下半部分,上半部分均为空值.
02
方法二:VBA法
这个又上了一个台阶,我的VBA入门就是从此开始的.
ALT+F11 打开VBA编辑器
在左侧工程栏找到你的工作薄,点击插入模块,双击模块,写入如下代码:
Sub cfkj()
For i = 1 To 9
For j = 1 To i
Cells(i + 1, j) = j & '*' & i & '=' & i * j
Next
Next
End Sub
核心代码只有一句：
Cells(i + 1, j) = j & '*' & i & '=' & i * j
其他都是控制语句或语法要求！
为防止运行宏时,将现有的数据进行覆盖,建议先保存一下文件,并新建一个空工作表,将鼠标放在代码中间任意位置,按F5或点击运行按钮,即可以在当前激活的工作表中快速生成九九乘法表.
知识点
FOR,NEXT
是最基本的循环语句,完整地语句如下:
For counter=start to end [step increament]
[statements]
[exit for]
[statements]
Next [counter]
注释：
counter为计数器，start为开始，end 为结束，默认步长为1，如果，步长为2的话可以这样写：
for i=1 to 10 step 2
步长亦可以为负数，如
for i=10 to 1 step -2
exit for 为中途退出语句，在满足一定条件时，直接退出循环。
总结
学习VBA可以从抄代码开始，先照葫芦画瓢，了解一下基本语法，再研究别人的代码，不懂得上网查查，翻翻vba方面的书，学起来还是很快的 !