% show in ComboBox

[delta]

ComboBox Name is TB41
range "gstrate" is 2%, 8 %, 18 % , 28%

when userform is initialize combox "TB41" show 0.02, 0.08, 0.18, 0.28
i like to show 2 2%, 8 %, 18 % , 28%

my code is
Me.TB41.List = gstrate.Value
what is wrong in above code

 

[shrivallabha]

Untested you can use:

Me.TB41.List = gstrate.Text

 

[delta]

Untested you can use:

Me.TB41.List = gstrate.Text

not working

 

[Hui]

Private Sub UserForm_Activate()

  Me.TB41.List = Range("B2:B5").Value
 
  Dim i As Integer
  For i = 0 To Me.TB41.ListCount - 1
      Me.TB41.List(i) = Format(Me.TB41.List(i), "0%")
  Next i

End Sub

 

[delta]

perfect answer
thanks