如何将宏结果设置到excel列中?我不熟悉宏';是的,非常基本。请解释一下
'需要在excel“Sheet1”的A列中设置员工(0)、员工(1)…、员工(25)的值如何将宏结果设置到excel列中?我不熟悉宏';是的,非常基本。请解释一下,excel,vba,Excel,Vba,'需要在excel“Sheet1”的A列中设置员工(0)、员工(1)…、员工(25)的值 您可以使用类似的循环 Public Sub putvalue() dim n as long For n = 0 To n = 25 employee(n) = Chr(n + 65) Next n for n=0 to 25 cells(n+1,1).Value = employee(n) next n End Sub 您也可以完全不使用阵列: Public Sub putvalue() dim
您可以使用类似的循环
Public Sub putvalue()
dim n as long
For n = 0 To n = 25
employee(n) = Chr(n + 65)
Next n
for n=0 to 25
cells(n+1,1).Value = employee(n)
next n
End Sub
您也可以完全不使用阵列:
Public Sub putvalue()
dim n as long
for n=0 to 25
cells(n+1,1).Value = Chr(n + 65)
next n
End Sub
甚至更快
Public Sub putvalue()
range("A1:A26").formular1c1= "=char(row()+64)"
range("A1:A26").value=range("A1:A26").value
End Sub
您可以使用类似的循环
Public Sub putvalue()
dim n as long
For n = 0 To n = 25
employee(n) = Chr(n + 65)
Next n
for n=0 to 25
cells(n+1,1).Value = employee(n)
next n
End Sub
您也可以完全不使用阵列:
Public Sub putvalue()
dim n as long
for n=0 to 25
cells(n+1,1).Value = Chr(n + 65)
next n
End Sub
甚至更快
Public Sub putvalue()
range("A1:A26").formular1c1= "=char(row()+64)"
range("A1:A26").value=range("A1:A26").value
End Sub
看看这个,看看它是否有用。看看这个,看看它是否有用。