Hücre sonuna bilgi eklemek (makro lazım)

[nintro]

A:1 hücresinden A:11500 hücresine kadar çeşitli isimler yazmakta bu isimlerin sonuna SİGORTA ARA.HİZM. ibararesi eklemek istiyorum.
yardım ederseniz sevinirim.

 

[Ali]

Sub not_ekle()
For i = 1 To 11500
Cells(i, 1) = Cells(i, 1) & " SİGORTA ARA.HİZM."
Next
End Sub

 

[nintro]

Teşekkür ederim.