1、在一个工作表区域内(B12:J12),依次输入1-9.(A13:A21)区域内依次输入1-9.然后再单元格B13内输入一个公式,通过拖曳填充产生...
做九九乘法表,多种思路造就多种方法生成,
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 九九表()
Excel一步到位制作学生成绩通知单
Excel一步到位制作学生成绩通知单 对于教师来说每次考试后整理学生成绩都不是一件轻松的事情。通常收回的学生试卷并不可能按已有成绩表中的顺序排列,因此每次用Excel输入成绩前都得先把试卷按记录表中的顺序进行整理排列,之后才能顺次输入,这自然是很麻烦的。实际上最快速的录入方法应该是按试卷的顺序在Excel中逐个输入学号和分数,由电脑按学号把成绩填入成绩表相应学生的记录行中。在Excel中实现这个要求并不难。 首先我们得有一张Excel成绩记录表,然后在成绩记录表侧增加四列(J:N),并输入列标题。 1.表
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
单独打印Excel指定区域的妙招
单独打印Excel指定区域的妙招 一、区域设置法 如果每次都是打印某一个固定的区域,用这种方法是最合适的。 启动Excel2003(其它版本请仿照操作),打开相应的工作簿文件,选中需要打印的区域,执行“文件→打印区域→设置打印区域”命令。以后,需要打印该区域时,只要按一下“常用”工具栏上的“打印”按钮就行了。 [友情提醒]此时,如果需要打印整个工作表的内容,请先取消设置的打印区域:执行“文件→打印区域→取消打印区域”命令。 二、打印区域法 如果要想打印多个不同的区域,请采取此种方法。 选中需要打印的区域,