效果：
代码：
- Dim i As Integer, j As Integer
- For i = 1 To 9
- For j = 1 To i
- Sheets("sheet1").Cells(1).Offset(i - 1, j - 1) = i & "*" & j & "=" & i * j
- Next
- Next
- End Sub
本文转自
kirin 51CTO博客，原文链接：http://blog.51cto.com/kirin/693939 ，如需转载请自行联系原作者
VBA：九九乘法表
2017-11-08
981
版权
版权声明：
本文内容由阿里云实名注册用户自发贡献，版权归原作者所有，阿里云开发者社区不拥有其著作权，亦不承担相应法律责任。具体规则请查看《
阿里云开发者社区用户服务协议》和
《阿里云开发者社区知识产权保护指引》。如果您发现本社区中有涉嫌抄袭的内容，填写
侵权投诉表单进行举报，一经查实，本社区将立刻删除涉嫌侵权内容。
简介：
目录
相关文章
|
7天前
|
存储
弹性计算
运维
|
2月前
|
C语言
|
2月前
|
Python
|
10月前
|
C语言
|
10月前
|
12月前
|
移动开发
|
12月前
|
Python
