Sorgu için arama sonuçları: Commandbutton+backcolor

Yeni bir dosya hazırladım.Buna göre açılan userformdaki commandbuttonlar "Döküm" sayfası "F" sutunundaki değere göre DOLU yada BOŞ yazacak.Yani rezervasyon durumu öğrenilmek isteniyor.Aşağıdaki kod ile commandbutton ile "F" sutunun ilgili hücresini birbirine bağladım ama kodları yazmak çok uzun...

Merhaba.Aşağıdaki kod bloğu ile commandbuttonun üstüne tıklayarak caption'larını değiştiriyorum ama commandbutton nesnesini userform üzerinde uyguladığımda kodlar çalışmıyor.Acaba excel'de olmayan bir özellik midir yoksa kodlarmı eksik kalıyor.Yardımcı olabilirseniz sevinirim...

userformun içindeki ilgili koda aşağıdaki kırmızı yeri akle Sub arama() Dim i As Long For i = 1 To 42 'If Controls("Label" & i).Caption = hafiza Then If i = hafiza Then If Controls("CommandButton" & i).BackColor <> -2147483633 Then If Controls("CommandButton" & i).Caption <> "" Then...

Merhaba Arkadaş, Private Sub CommandButton1_Click() If CommandButton1.Caption = "GÖSTER" Then Call goster CommandButton1.Caption = "GİZLE" CommandButton1.BackColor = &HFFFFC0 Else Call gizle CommandButton1.Caption = "GÖSTER"...

Evet, sanırım şimdi anladım. Bunun için önce mevcut renklerinizi dosyanızda bir bölüme veya bir değişkene yazdırmanız gerekiyor. Örneğin aşağıdaki döngüyü Userform_Initialize olayına eklerseniz butonların tag değeri içerisine renk kodlarını kaydedebilirsiniz. For i = 1 To 9...

Merhaba, Doğru mu anladım bilemiyorum ama isteğiniz şu şekilde mi? If Me.Controls("CommandButton" & i).BackColor <> &H8000000F Then 'ButtonFace değilse Me.Controls("CommandButton" & i).BackColor = &H8000000F 'ButtonFace (AçıkGri) End If

Merhaba, Aşağıdaki kod'da ; Me.Controls("CommandButton" & i).BackColor = &H8000000F satırındaki =&H8000000F renk ifadesi ile, düğme rengi bu renge (ButtonFace) dönüyor, Ben düğmelere farklı renkler ( Örn; Sarı-Mavi-Yeşil gibi ) verdiğimden, Bu renk kısıtlamasının kalkıp, bunun yerine...

Merhaba, Private Sub CommandButton1_Click() If CommandButton1.Caption = "SATIR GİZLE" Then Call Makro3 CommandButton1.Caption = "SATIR GÖSTER" CommandButton1.BackColor = &HFFFFC0 Else Call Makro2 CommandButton1.Caption = "SATIR GİZLE"...

Merhaba ilgili kod işinizi görür mü acaba. Private Sub CommandButton1_Click() Call Emr CommandButton1.BackColor = &HFF& End Sub Private Sub CommandButton2_Click() Call Emr CommandButton2.BackColor = &HFF& End Sub Private Sub CommandButton3_Click() Call Emr CommandButton3.BackColor = &HFF& End...

İyi günler. Aşağıdaki Activex CommandButton içinde bulunan makro kodunun kırmızı ile işaretlediğim yerinde Run-Time 1004 hatasını veriyor. Hatayı çözemedim. Yardımcı olur musunuz. Private Sub CommandButton2_Click() Application.ScreenUpdating = False Application.DisplayAlerts = False...

Merhaba; Aşağıda kısa bir örneğini verdiğim biçimlendirme ilgili bazı kodlar var, bunlar TextBox, Label, CommandButton olabiliyor, müşteri ismini ComboBoxtan seçtiğimizde, kişinin borcunun olup olmaması ile ilgili ,yada başka bir menü açtığımızda,oradaki olaya göre biçimlendirme gerekiyor, Her...

Selamlar, Bu konu ile ilgili bu forumda aşağıdaki kodu buldum.Ama benim istediğim birden fazla CommandButton olunca seçmeli olarak yazabileceğimiz bir kod varmı.Mesela bendeki userfrom üzerinde 25 tane CommandButton var ama bunların bazılarının renklenmesini istiyorum.İlginiz için şimdiden...

Herkese iyi akşamlar Bu harika forumdan aşağıda yazdığım codeları aldım.Ama Bu code sadece commandbutton1 için mouse üzerine gelince sarı yapıyor.Benim userformumda 15 tane commandbutton var.ne yapmam gerek yardımlarınız için teşekkür ederim. Private Sub CommandButton1_MouseMove(ByVal Button...

Arkadaşlar herkese merhaba, bir makro yazdım ama çalıştıramadım, Yardımcı olursanız sevinirim. Sub Renk_Düzenle() CommandButton1_Click.BackColor = RGB(250,120,85) End Sub CommandButton a tıkladığımda renk değişikliği olması gerekiyor ama hata verdi Fazla anlamadığım için sorunun nerden...