buton rengi değiştirme

[serbestmali]

makro atanmış bir butonun kullanıldıkça renginin değişmesi için yapılabişlecek bir şeyler varmı acaba

Teşekkürler

 

[Kemal Demir]

Merhaba,

Private Sub CommandButton1_Click()
Dim bir, iki, uc As Integer
bir = Int((255 * Rnd))
iki = Int((255 * Rnd))
uc = Int((255 * Rnd))
CommandButton1.BackColor = RGB(bir, iki, uc)
ThisWorkbook.Save

End Sub

yukarıdaki kod işinizi görecektir.

NOT:eğer kalıcı olmasını istiyorsanız.Kodlar sonlanmadan evvel sayfayı kaydetmenizi öneririm

 

[ziya]

Sn Demir merhaba,
Soruyu soran arkadaş sorusunu daha da geliştirir diye bekledim ama başka soru gelmedi. Verdiğiniz kodu denedim üzerinde değişiklik yaptım istediğimi yapamadım. Sormam gerekti.
Kullanınca rengi değişsin ama,
- Bir defa değişsin,
- Benim belirleyeceğim renk olsun.
Eminim bir cevabınız vardır.
Selamlar,

 

[serbestmali]

Sayn Demir
Makroyu nereye kopyalayacam birkaç yere denedim olmadı
sayın Ziyanın dediği gibi
"Kullanınca rengi değişsin ama,
- Bir defa değişsin,
- Benim belirleyeceğim renk olsun" olabilirmi acaba
teşekkürler

 

[serbestmali]

merhabalar
örnek dosyada bir çalışma yapabilirmisiniz
teşekkürler

 

[ocamsul]

merhabalar
örnek dosyada bir çalışma yapabilirmisiniz
teşekkürler

kodu izin onayının bulunduğu sayfanın macro düzenleme ekranına kaydetmeniz gerekliydi. Yanlış anlamadımsa böyle olacak her tıklamada kod içerisinde tanımlanan renk kodu çalışır.

 

[serbestmali]

merhabalar
bu seferde aktar makrosunu çalıştıramıyorum
teşekkürler

 

[ocamsul]

merhabalar
bu seferde aktar makrosunu çalıştıramıyorum
teşekkürler

ufak bir değişiklik ile tamamdır.

 

[serbestmali]

merhabalar
aynı makroyu kullanarak birden fazla butonunda rengini değiştirme şansımız varmı acaba
yani butonlar aynı sayfada olduğunda da renk değiştirme şansımız varmı acaba
teşekkürler

 

[ocamsul]

merhabalar
aynı makroyu kullanarak birden fazla butonunda rengini değiştirme şansımız varmı acaba
yani butonlar aynı sayfada olduğunda da renk değiştirme şansımız varmı acaba
teşekkürler

Tabiki yapmanız gereken macro isimlerini değiştirmek o kadar. tabi mu macrolara farklı işlevler yükliyecekseniz. Yok sadece birden fazla buton rengi değiştirecekseniz bu da olur.

 

[serbestmali]

merhabalar
Sizleri çok yoruyorum ama yukarıdaki kodu başka excel dosyalarında kullanamıyorum acaba neden
Visual Basic cod sayfasında Command Buton eklemem gerekiyor sanırım ama bu ekleyemiyorum yardım edebirmisiniz
teşekkürler

 

[serbestmali]

merhabalar
Sizleri çok yoruyorum ama yukarıdaki kodu başka excel dosyalarında kullanamıyorum acaba neden?
Visual Basic cod sayfasında Command Buton eklemem gerekiyor sanırım ama bu ekleyemiyorum yardım edebirmisiniz
teşekkürler
__________________

 

[serbestmali]

herkese iyi geceler
Visual Basic cod sayfasında Command Buton eklemem gerekiyor ama bu ekleyemiyorum yardım edebirmisiniz lütfenj

 

[hakanaga72]

Birde söz konusu buton'u sadece iki renk arasında renk değiştirir yapabilirmiyiz acaba?

Şimdiden teşekkürler...

 

[serbestmali]

boton rengini değiştirme kodunu başka excel dosyalarında kullanamıyorum
nasıl bir yol izlemeliyim
teşekkürler

 

[ocamsul]

merhabalar
Sizleri çok yoruyorum ama yukarıdaki kodu başka excel dosyalarında kullanamıyorum acaba neden?
Visual Basic cod sayfasında Command Buton eklemem gerekiyor sanırım ama bu ekleyemiyorum yardım edebirmisiniz
teşekkürler
__________________

Kullandığınız kodlar içerisinde tanımlanmış sayfa adları var "Sayfa2" ve "genel" adlarında iki sayfanız var. Aynı kodları farklı sayfalarda kullanmak isterseniz bu kodlarda gerekli düzeltmeleri yapmanız gerekli.

Örneğin;
ActiveCell.Offset(0, 1).Value = Sheets("...................").Range("C18").Value

Yukarıdaki "sayfa2.sayfa3.sayfa4" alan gibi.

 

[serbestmali]

sayın ocamsul
buton renklendirme konusunu açıklamalı olarak belirtebilirmisiniz mümkünse sırasıyla
teşekkürler

 

[serbestmali]

Buton rengini değiştirme

örnek bir dosya var burada butonu her kullanışta renklendirmem için ne yapmalıyım
macroyu kopyaladım ama buton rengini çalıştıramıyorum
nerede hata yapıyorum sizce
teşekkürler

 

[ocamsul]

örnek bir dosya var burada butonu her kullanışta renklendirmem için ne yapmalıyım
macroyu kopyaladım ama buton rengini çalıştıramıyorum
nerede hata yapıyorum sizce
teşekkürler

Öncelikle Butonu sayfaya yerleştirin. Butonun üzerine ad yazmak istediğinizde üzerine çif tıklayıp "Properties window" ekranının sol tarafındaki "caption" satırına butona vermek istediğiniz ismi yazın. Daha sonra size verilen kodları sağ taraftaki alana ekleyin.

 

[serbestmali]

çözümü geç te olsa bulduk tüm katılanlara teşekkürler ve saygılar
excel sayfasında command butonu denetim araç kutusundan oluşturmakmış arkası kendiliğinden geliyor