UserFormda Kayan Yazı Nasıl Yapılır

[ALPEN]

tarayıcı ile bir alternatif.

Eğer kişinin yüzde oranı %50 den düşükse kırmızı gif filan yanıp sönüyor.

Maksat çeşit olsun.

 

[Ecstasy]

Sn.ALPEN, Güzel Olmuş :bravo:

 

[cihangirkara]

SEVGİLİ EXSTASCY O KODU YAZDIM ÞİMDİ SADECE USERFORM AÇILIYOR AMA BEN O EXCEL DOSYASINDA BİLGİ DEÐİÞTİRMEK İSTEDİÐİMDE NE YAPACAÐIM ÇÜNKİ AÇILMIYOR

 

[cihangirkara]

BİRDE SEVGİLİ ARKADAÞIM C SÜTÜNUNDA HEP % OLARAK VERİYOR O SÜTÜNU SİLSEM DAHİ % 0 DİYE YAZI KAYIYOR NE YAPILABİLİR

 

[Ecstasy]

userforum alt kısmında bunu ekle

Private Sub UserForm_Terminate()
Application.Visible = True
End Sub

Cuma saati Geldi.
Hayırlı Cumalar Herkese,Dularınız Kabul Olur Umarım.

 

[Ali]

Daha önce verdiğim kodları thisworka yapıştır userformu kapadığında excele dönersin

 

[Ali]

BİRDE SEVGİLİ ARKADAÞIM C SÜTÜNUNDA HEP % OLARAK VERİYOR O SÜTÜNU SİLSEM DAHİ % 0 DİYE YAZI KAYIYOR NE YAPILABİLİR

kelime = Cells(a, 1) & " " & Cells(a, 2) & " %" & Cells(a, 3) * 100 & b &


kısmında % kısmını iptal et

 

[cihangirkara]

teşekkürler % iptal oldu

 

[cihangirkara]

userform da kayan yazı

arkadaşların yardımıyla dosyam son halini buldu yanlız B sütünudaki rakamlar yazdığım gibi çıkmıyor ben binlik ayracı kullanıyorum ama userformda yanyana metin gibi çıkıyor birde dosya bazı yerlerden bilgi alıyor arada bir kendini yenileyebilirmi

selamlar

 

[danersin]

Bu satır ile oynayarak aradığınız formatı vereblirsiniz..

If kelime = "" Then b = ""
kelime = Cells(a, 1) & " " & Format((CCur(Round(Cells(a, 2), 0))), "###,###") & b & kelime
Next

CCur ve benzerlerinin kullanımı için
http://www.excel.web.tr/viewtopic.php?t=4673