Rakam Ayıracı

[bugrahann]

Değerli hocalarım benim sorum rakam ayıraçları ile ilgili öğrneğin

excelde bi hücrede 12,50 buradaki virgül ayıracını 12.50 gibi yani nokta ile ayırabilmemiz için bi kod varmı veya başka bi şekilde nasıl yapabilirim. saygılarımla

 

[Tarkan VURAL]

CTRL + H
Aranan ,
Yeni Değer .

olabilir.

 

[bugrahann]

CTRL + H
Aranan ,
Yeni Değer .

olabilir.

Sayın VURAL bey o şekilde yaptığım zaman rakamı tarih formatına çeviriyo nayi olmuyo

 

[Tarkan VURAL]

O halde Araçlar - Seçenekler - Uluslararası - Ondalık ayıracı kısmı ile oynayın.

 

[bugrahann]

O halde Araçlar - Seçenekler - Uluslararası - Ondalık ayıracı kısmı ile oynayın.

bu işlem kod ile yapılamazmı yani düğmeye tıkladığımda o çalışma sayfasını noktalı yapsa veya virgüllü yapsa

 

[Necdet]

Merhaba,

Aşağıdaki kodları butona bağlayıp deneyebilirsiniz.

Sub Nokta()
    Application.UseSystemSeparators = False
End Sub

Sub Virgul()
    Application.UseSystemSeparators = True
End Sub

 

[bugrahann]

Merhaba,

Aşağıdaki kodları butona bağlayıp deneyebilirsiniz.

Sub Nokta()
    Application.UseSystemSeparators = False
End Sub

Sub Virgul()
    Application.UseSystemSeparators = True
End Sub

ÇOK TEŞEKKÜRLER Bu kodlar diğer çalışma sayfalarınıda aynı yapıyo sadece açık olan yani 1 çalışama sayfasına uyarlamabilirmi yinede teşekkürler

 

[Necdet]

Merhaba,

Hangi sayfada istiyorsanız aşağıdaki kodları o sayfanın kod bölümüne kopyalayınız.
Sayfa aktif olduğunda nokta, sayfadan çıkarken virgül kullanılacaktır.

Private Sub Worksheet_Activate()
Application.UseSystemSeparators = False
End Sub

Private Sub Worksheet_Deactivate()
Application.UseSystemSeparators = True
End Sub