Wpis z mikrobloga

#vba #excel

Excelowe Mirki jak odwołać się w każdym kroku pętli do kolejnego checkboxa (checkbox1, checkbox2 itp)

For x = 1 To 16 Step 1
If Range(region.Address).Offset(0, x).Value = Null Then
UserForm1.CheckBox1.Visible = False
Else
UserForm1.CheckBox1.Caption = Range(region.Address).Offset(0, x).Value
End If
Next
  • 2
  • Odpowiedz
  • Otrzymuj powiadomienia
    o nowych komentarzach

@Ignorantum: nietestowane, ale na pewno w ten deseń:

UserForm1.Controls("CheckBox" & i).Value = True
Problem pewnie się pojawi jeśli checkbox nie jest bezpośrednio na UserForm, tylko w kontenerze typu MultiPage - wtedy trzeba go szukać w Controls rodzica.
  • Odpowiedz