一个九九乘法表就能测试你的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方面的书，学起来还是很快的  !

九九乘法表

常用VBA语句