Question

Excel 怎么用VBA设置同一列的格式及公式

Answer 1

比如 B1公式：＝A1*2
用VBA为整个B列建公式：Columns("B").FormulaR1C1 = "=RC[-1]*2"
对设置同一列的单元格格式就用录制宏的方法，将列改一下就行了，因为单元格格式太多，不方便提供代码，自己录制就知道了。

Answer 2

这个录制个宏就出来了。

Sub Macro1()
'
' Macro1 Macro
'

'
    Range("A1:A7").Select
    Selection.FormulaR1C1 = "=RAND()"
    Selection.NumberFormatLocal = "@"
End Sub

这个对A1：A7的录制宏。现在A1：A7输入随机公式 =rand()，然后设置A1：A7的格式为文本格式，这是给你举的例子。