99乘法表怎么用EXCLE来制作
- 提问者网友：wodetian
- 2021-05-10 21:11
- 五星知识达人网友：蓝房子
- 2021-05-10 21:32
在任意单元格输入
=IF(ROW(A1)<COLUMN(A1),"",COLUMN(A1)&"x"&ROW(A1)&"="&ROW(A1)*COLUMN(A1))
然后向两个方向拖拽即可。
解释：
对楼上的解释（建议将ROW和COLUMN括号中的A1都去掉）：
函数ROW(单元格)返回单元格的行数，类似的COLUMN(单元格)返回列数。如果无参数，直接返回公式所在单元格的。
函数IF（参数一，参数二，参数3）是判断语句，参数一为一逻辑判断，若真返回参数一，若假返回参数二。
&将两个字符串连接起来。
- 1楼网友：渡鹤影
- 2021-05-10 22:13
网上找到的，供参考。
用EXCEL可多种办法生成99乘法表
|
做九九乘法表，多种思路造就多种方法生成， 1、在一个工作表区域内(B12:J12),依次输入1-9.(A13:A21)区域内依次输入1-9.然后再单元格B13内输入一个公式,通过拖曳填充产生具有上三角矩阵结构的九九乘法表 2、在a13到a21输入1-9 b13输入 =IF(B$12<=$A13,B$12*$A13,"") 然后拖拉即可 3、在b2单元格输入如下公式： =IF(AND($A2<>"",B$1<>"",B$1<=$A2),B$1&"×"&$A2&"="&B$1*$A2,"") A1单元格的公式如下: =IF(AND(ROW()<10,COLUMN()<10,COLUMN()<=ROW()),ROW()&"×"&COLUMN()&"="&ROW()*COLUMN(),"") 4、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 |
- 2楼网友：骨子里都是戏
- 2021-05-10 21:55
看看这里 http://wenwen.soso.com/z/q161467112.htm