Çözüldü Userformda Seçilen verilerin değerleri formda ve excelde getirilmesi

okinava14' Alıntı:

Sorunum bu defa biraz karışık ama eminim ustalarım için kolaydır.
Userformda "B6_GrvAntet" içindeki ListBox "ListPersonel" bulunan isimlere tıklayınca ve yanındaki görevlerden bazılarını seçiyoruz. Seçilenler Listviewe gelsin ve aynı zamanda excel "GrvAntet" sayfasında dökülsün. Yazdır butonuna tıklayınca yazdırsın.

Tümünü seç butonu kodlarım yok onuda eklerseniz sevinirim.

Genişletmek için tıkla...

Özcan ÖZBEK' Alıntı:

Tümünü seç için commadn button yerine toggle button a kod ekledim. Bir tıkla hepsini seç, bir tıkla seçimler iptal

Private Sub ToggleButton1_Click()
Dim ctrl As Control
If ToggleButton1.Value = True Then

For Each ctrl In B6_GrvAntet.Controls
If TypeName(ctrl) = "CheckBox" Then
ctrl.Value = True
End If
Next ctrl
ToggleButton1.Caption = "SEÇİMLERİ İPTAL ET"

Else
For Each ctrl In B6_GrvAntet.Controls
If TypeName(ctrl) = "CheckBox" Then
ctrl.Value = False
End If
Next ctrl
ToggleButton1.Caption = "TÜMÜNÜ CEÇ"
End If
End Sub

Genişletmek için tıkla...