sayılarda Virgül yerine nokta, nokta yerine virgül

[sdegirmenci]

Merhaba;
İşimiz gereği muhasebe proğramından bazı rakamları kopyalayıp excele atıyoruz, orada da toplama vs. işlem yapmak için. Ancak Proğramdaki format basamakları virgül ile kuruşu ise nokta ile ayırmakta bu işi kod ile yada formül ile excelde kullandığımız formata çevirebilirmiyiz. Yardımlarınız için şimdiden teşekkür ederim.

 

[excelci1]

bu başıma gelmişti. ctrl + h tuşu işimizi görür

1- değiştirmek istediğimiz alanı seçiyoruz
2- aranan değer "," (virgül) yeni değeri boş geçiyoruz. tümünü değiştir diyoruz.
3- aranan değer "." (nokta) yeni değeri "," (virgül) yapıyoruz. tümünü değiştir diyoruz.

artık işlemlerde kullanabilirsiniz

kolay gelsin

 

[sdegirmenci]

Sayın excelci1
İlginize çok teşekkür ederim, tarifinizi uygulamaya çalıştım, ancak seçtiğim yerde hem nokta hem virgül var, Virgüller nokta olacak, noktalar virgül, Acaba benmi anlayamadım uygulamayı,

 

[excelci1]

eklediğiniz dosyayı indirip denedim zaten evet biliyorum hem nokta hem de virgül var.
önce virgülü yok ediyoruz. sonra noktayı virgüle çeviriyoruz amaç bu.

daha sonra hücre biçimlendirden sayı ya gelip 1000 Ayırıcısı (.) kullanı seçiyoruz. formül çubuğuna baktığınızda "." gözükmez. hücrenin görünen değerinde görünür

yapamazsanız söyleyin akşam video ekleyim

 

[sdegirmenci]

Sayın excelci1;
Şimdi anladım, Hücre biçimlendir kısmını düşünemedim. Çok teşekkür ederim. İşleriniz kolay gelsin

 

[excelci1]

Rica ederim.

 

[xixixi]

Sayın excelci1;

Wallahi kahramanımsın =)) ne zaman excelde bi konuda sıkışsam google arattırıyorum ilk sizin siteniz çıkıyor. Sırf teşekkür etmek için üyü oldum kolay gelsin.

 

[honestman]

merhaba,

Bu işlemi makro ile nasıl yaparız?

 

[Sevenxcloves]

=yerinekoy(buraya alanı seçip;".";",") formülü ile de yapabiliriz

 

[evuye]

nokta virgül değişimi

Excel'de bunun için özel bir ayar yoktur. Aslında bunu excel değil windows belirlemektedir. Ondalık ayracı ile binlik basamak ayracını Windowsta şu şekilde değiştirebilirsiniz:
1-denetim masasından
2-saat, dil, bölge
3-bölge ve dil içindeki "tarih, saat ve sayı biçimini değiştir"
4-açılan pencerede "ek ayarlar"da nokta ve virgül değişikliğini yapabilirsiniz.

 

[Hyperhysv]

bir ekstra çozümde ben soylıyım excel programında dosya, seçenekler, gelişmiş,sistem ayırıcılarını kullan bolumunden değiştirilebilir.

kolay gelsin

 

[mehveste]

macbook için

Bunu macbook ile yapma imkanımız varmı?

Excel'de bunun için özel bir ayar yoktur. Aslında bunu excel değil windows belirlemektedir. Ondalık ayracı ile binlik basamak ayracını Windowsta şu şekilde değiştirebilirsiniz:
1-denetim masasından
2-saat, dil, bölge
3-bölge ve dil içindeki "tarih, saat ve sayı biçimini değiştir"
4-açılan pencerede "ek ayarlar"da nokta ve virgül değişikliğini yapabilirsiniz.

 

[kingz]

Merhaba ,

elimde kalın excel listeleri var. ve örneğin rakamların hepsi a1 sütununda ve 6 haneli.
Örn :281511
Ben bunların hepsinin 4 rakamından sonra ( . ) işareti koymak istiyorum fakat yapamıyorum.
2815.11 olmasını istiyorum. çok olduğundan tek tek uğraşamıyorum. farklı yolları ile gösterip yardım etmenizi rica eder iyi akşamlar dilerim.

 

[çıtır]

A sütununu seç .Hücre biçimini seç
Tüm sayı biçimleri,İsteğe uyarlanmış.Tür kısmına aşağıdakini yaz.Tamam . Kolay gelsin.

????"."??

 

[compusayar]

Merhaba,
bir sütundaki verilerin belirli bir karakterini değiştirmek için (CTRL+H benzeri) =YERİNEKOY(A1;",";".") formülünü kullanabilirsiniz.

(Yukarıda ki örnek VİRGÜL'ü NOKTA'ya çeviriyor.)

 

[leguminosea]

Merhaba ,

elimde kalın excel listeleri var. ve örneğin rakamların hepsi a1 sütununda ve 6 haneli.
Örn :281511
Ben bunların hepsinin 4 rakamından sonra ( . ) işareti koymak istiyorum fakat yapamıyorum.
2815.11 olmasını istiyorum. çok olduğundan tek tek uğraşamıyorum. farklı yolları ile gösterip yardım etmenizi rica eder iyi akşamlar dilerim.

B1 e yapıştırıp deneyiniz

=YERİNEKOY(A1/100;",";".")

 

[tahsinanarat]

Sub noktavirgulduzelt2()

With Application
CalcMode = .Calculation
.Calculation = xlCalculationManual
.ScreenUpdating = False
.EnableEvents = False
End With

Dim cell As Range

nokta = "."
virgul = ","

For Each cell In ActiveWindow.RangeSelection.Cells

deg3 = Split(cell.Value, nokta)
deg4 = Split(cell.Value, virgul)

hucre = cell.NumberFormat
cell.NumberFormat = "@"


If UBound(deg3) > 0 And UBound(deg4) > 0 Then
cell.Value = Replace(Replace(cell.Value, nokta, "#"), virgul, "&")
End If

deg5 = Split(cell.Value, "#")
deg6 = Split(cell.Value, "&")

If UBound(deg5) > 0 And UBound(deg6) > 0 Then
cell.Value = Replace(Replace(cell.Value, "#", virgul), "&", nokta)
End If

cell.NumberFormat = hucre
Next

With Application
.ScreenUpdating = True
.EnableEvents = True
.Calculation = CalcMode
End With

End Sub

Nokta, Virgül Değiştir

Bu uygulama Nokta ve virgüllerin yer değişimi ile ilgilidir. Bu kod seçilen bölüm ile ilgili noktaları virgül , Virgülleri nokta yapar. kod: Sub noktavirgulduzelt() With Application CalcMode = .Calculation .Calculation = xlCalculationManual .ScreenUpdating = False .EnableEvents = False...

www.excel.web.tr

Halit Hocamın kodları

 

[Mahir64]

Merhaba,

=YERİNEKOY(YERİNEKOY(YERİNEKOY(A1;",";"X");".";",");"X";".")

örnekler çoğaltılabilir.

 

[sgoktekin]

Yerine koy denedim olmadı, sayı olarak algılamamış çekilen veriyi, bu nedenle yeni tercih
=SAYIYAÇEVİR(YERİNEKOY(YERİNEKOY(YERİNEKOY(A1;",";"X");".";",");"X";"."))