[RESOLVED] Loop for text and number

[Monitron]

I was helped this weekend by this code...and a lot other stuff. My next question is this

How can i put a loop in place for both nummers as txt.. the example below is only for numbers, what i want is that it is also for different letters behind Chk


For example Chkbrep / Chkol / chk1 / chktt / chk 5 etc..

Dim TempName as string
For i = 1 to 12   
TempName = "Chk" & i   
If ActiveCell <> "" Then      
ActiveCell.Offset(0, 16).Select      
Me.Controls(TempName).Caption = ActiveCell.Value      
Me.Controls(TempName).Enabled = True   
Else      
'More code   
End If
Next