CheckBox True ise X işareti koyma

[irfancantr]

İyi akşamlar,

Hazırladığım bir userformda bir kaç textbox ve checkbox bulunuyor.
Textbox'lara veri girdiğimde ilgili hücrelere bilgileri aktarabiliyorum fakat işaretli checkboxların da bağlı olduğu hücrelerin içerisine X işareti koymasını nasıl sağlayabilirim?

Kullanmaya çalıştığım ama hata aldığım kod aşağıda:

S1.Range("D21") = TextBox27.Value
S1.Range("D23") = TextBox28.Value
S1.Range("E25") = IIf(Controls(CheckBox1).Value = True, "X")
S1.Range("H25") = IIf(Controls(CheckBox2).Value = True, "X")

 

[irfancantr]

Arkadaşlar sorunu çözdüm;

S1.Range("E25") = IIf(Controls(CheckBox1).Value = True, "X")

yerine alttaki kod işimi halletti

If CheckBox1.Value = True Then S1.Range("E25").Value = "X"

Konu fazlalığı yarattığım için kusura bakmayın.
Herkese iyi akşamlar.

 

[fireman64]

If CheckBox1.Value = True Then
s1.Range("E25").Value = "x"
Else
S1.Range("E25").Value = ""
End If

If CheckBox2.Value = True Then
s1.Range("H25").Value = "x"
Else
S1.Range("H25").Value = ""
End If