社区 › VB › 编一个小小的程序练练手（刚学几天）

落花22 发表于 2017-11-11 22:00:00

编一个小小的程序练练手（刚学几天）

Sub test()
Dim x As Integer
For x = 1 To 56
Cells(x, 1).Font.ColorIndex = x
Next
End Sub

zzyong00 发表于 2017-11-11 23:09:00

excel?
支持

renhaitao_nice 发表于 2017-11-12 16:17:00

不能直接使用到Excel中去吧

落花22 发表于 2017-11-12 18:27:00

可以啊。进入excel，快捷键ALT+F11。
插入一个模块，把程序粘进去，按F5运行即可。

查看完整版本: 编一个小小的程序练练手（刚学几天）