excel - マクロの結果を Excel の列に設定するにはどうすればよいですか? マクロは初めてで、非常に基本的です。説明してください

Question

'Excel「Sheet1」のA列にemployee(0)、employee(1)……、employee(25)の値を設定する必要があります。

Sub testingarray()
For n = 0 To n = 25
employee(n) = Chr(n + 65)
Next n
For n = 0 To n = 25
MsgBox employee(n) 
Next n
End Sub

'Tried to use this:** Please say if am wrong
Public Sub putvalue()
Range("A1").Value = employee(0)
'Sheets("Sheet1").Cells(1, 1).Value = employee(n)
n = n + 1
End Sub

Answer 1

同様のループを使用できます

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