Hücrede Yazılanı Diğer Hücreye Farklı Yazdırması

[betsfat]

Örnek; A1 hücresinde 1/25 metin olarak yazıyor,A1 hücresinde yazılanı B1 hücresine 1_25 olarak aktarsın...Yardımlarınızı rica ederim...

 

[AdemCan]

Merhaba
Formülle yapmak için B1 hücresine şu formülü yazınız.

=YERİNEKOY(A1;"/";"_")

Makro ile yapmak için ilgili sekmenin kod sayfasına şu kodu ekleyiniz

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
[B1] = WorksheetFunction.Substitute([A1], "/", "_")
End Sub

 

[betsfat]

Çok Teşekkürler...

 

[AdemCan]

Rica ederim, iyi çalışmalar.