vba导出多个

结果3，K的值就是奇数的值。

Sub 乘法表()
Dim i%, j%
For i = 1 To 9
For j 凳梁闭= 1 To 9
If i >= j Then Cells(i, j) = Str(i) & "x" & Str(j) & "=" & i * j
Next j, i
End Sub

效渣肆果如枣裂下图:

导的笔顺：

汉字    导 

读音    dǎo    

部首    寸    

笔画数    6    

名称 ：   横折、横、竖弯钩、横、竖钩、点    

教导有方 拼音：jiào dǎo yǒu fāng 解释：〖解释〗教育引导很有办法。 出处：〖出处〗清·吴研人《二十年目睹之怪现状》第九十九回：“凡此种种，虽然是他叔祖教导有方，也是他福至心灵，官星透露，才得一变而为闻一知十的聪明人。”