- Katılım
- 12 Ekim 2021
- Mesajlar
- 91
- Excel Vers. ve Dili
- Türkçe
DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Private Sub Label1_Click()
'Label1 e tıkladığımda UserForm1 deki Texbox1 e Olumlu yazmasını istiyorum
UserForm1.TextBox1.Value = "OLUMLU"
End Sub
Private Sub Label2_Click()
'Label2 e tıkladığımda UserForm1 deki Texbox1 e Olumsuz yazmasını istiyorum
UserForm1.TextBox1.Value = "OLUMSUZ"
End Sub
Muhteşemsiniz Çok Teşekkür ederim. Allah razı olsunUserForm2 için kodlar.
Kod:Private Sub Label1_Click() 'Label1 e tıkladığımda UserForm1 deki Texbox1 e Olumlu yazmasını istiyorum UserForm1.TextBox1.Value = "OLUMLU" End Sub Private Sub Label2_Click() 'Label2 e tıkladığımda UserForm1 deki Texbox1 e Olumsuz yazmasını istiyorum UserForm1.TextBox1.Value = "OLUMSUZ" End Sub