HÜCRE BÖLÜNMESİ

besen

Altın Üye
Katılım
23 Mart 2007
Mesajlar
715
Excel Vers. ve Dili
Microsoft Office Professional Plus 2019
İngilizce
Altın Üyelik Bitiş Tarihi
11-12-2029
Merhaba A kolonundaki verileri B kolonundaki şekle nasıl dönüştürebilirim.
Teşekkür ederim.

A B
293,6 293.600
337,0 337
735,818 735.818
1,940,823 1.940.823
 
Katılım
6 Mart 2005
Mesajlar
6,233
Excel Vers. ve Dili
Excel Vers. ve Dili:
Office 2016 TR 64 Bit
Altın Üyelik Bitiş Tarihi
22/12/2022
Verilerin A2 başladığı varsayılmıştır.B2 kopyalayınız.Aşağı çekerek çoğaltınız.
Kod:
=YERİNEKOY(A2;",";".")
veya
Kod:
=SUBSTITUTE(A2;",";".")
 
Son düzenleme:

besen

Altın Üye
Katılım
23 Mart 2007
Mesajlar
715
Excel Vers. ve Dili
Microsoft Office Professional Plus 2019
İngilizce
Altın Üyelik Bitiş Tarihi
11-12-2029
Sanırım eksik anlattım.
ilk rakam tabloda 293,6 yazılmış ancak decimal görüntüsü ile hücrede 293,600 olarak gözüküyor. Ben bunun noktalama işaretsiz 293600 olarak değiştirmek istiyorum. Hücrenin formatını number yaptığımda görüntüsü 293.600 olacak.
 

Necdet

Moderatör
Yönetici
Katılım
4 Haziran 2005
Mesajlar
15,490
Excel Vers. ve Dili
Ofis 365 Türkçe
Merhaba,

Her okuduğumda farklı anladım, kafam karıştı. Belki bir anlayan çıkar :)
 

besen

Altın Üye
Katılım
23 Mart 2007
Mesajlar
715
Excel Vers. ve Dili
Microsoft Office Professional Plus 2019
İngilizce
Altın Üyelik Bitiş Tarihi
11-12-2029
Örnek dosya ekte.
 

Ekli dosyalar

besen

Altın Üye
Katılım
23 Mart 2007
Mesajlar
715
Excel Vers. ve Dili
Microsoft Office Professional Plus 2019
İngilizce
Altın Üyelik Bitiş Tarihi
11-12-2029

Necdet

Moderatör
Yönetici
Katılım
4 Haziran 2005
Mesajlar
15,490
Excel Vers. ve Dili
Ofis 365 Türkçe
Örnek dosya ekte.
Merhaba,

Ekteki kodları bir modüle kopyalayıp dener misiniz.
Değerleri B sütununa yazıyor, doğru çalıştığından emin olursanız kodlarda değişiklik yaparak üzerine yazırabilirsiniz.

Kod:
Sub Degistir()

    Dim i As Long, _
        t As String
    
    For i = 2 To Cells(Rows.Count, "A").End(3).Row
        t = Range("A" & i).Text
        t = Replace(t, ",", "")
        Cells(i, "B") = t
    Next i
    
End Sub
 

besen

Altın Üye
Katılım
23 Mart 2007
Mesajlar
715
Excel Vers. ve Dili
Microsoft Office Professional Plus 2019
İngilizce
Altın Üyelik Bitiş Tarihi
11-12-2029
Tebrikler. Teşekkür ederim.
 
Üst