Hücredeki Değeri Label4 yazdırma

[Bakigemlik]

Merhaba,

Dosyamda "GELİR KALEMLERİ" adlı sayfamda A1 hücresindeki veriyi UserForm'mumda Label4 yazdırmak istiyorum konu hakında desteğinizi rica ederim,

Teşekkürler,

 

[Korhan Ayhan]

Deneyin.

Private Sub UserForm_Initialize()
    Label4.Caption = Sheets("GELİR KALEMLERİ").Range("A1").Value
End Sub

 

[Bakigemlik]

Korhan Hocam çok teşekkür ederim sayı formatının 17.500,50 TL olması için nasıl bir değişiklik gerekiyor,

Desteğiniz için teşekkürler

 

[Korhan Ayhan]

FORMAT komutunu araştırın.

 

[Bakigemlik]

Label4.Caption = Format(Sheets("GELİR KALEMLERİ").Range("A1").Value, "#,##0.00 TL")

Bu şekilde çözdüm hocam teşekkürler, ilginize