Try
Dim N As Long
For N = Asc("A") To Asc("Z")
Me.ComboBox1.AddItem Chr(N)
Next N


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"michaelberrier" wrote
in message
...
I've gotten some advice about how use the code below to
populate ComboBox1
with letters instead of the numbers as below using the Chr()
function, but I
can't make heads or tails of where to put it. I'd appreciate
any help.

Private Sub UserForm_Initialize()
Dim iCtr As Long
For iCtr = 1 To 10
Me.ComboBox1.AddItem iCtr
Next iCtr
End Sub