sayı düzenleme

[hayri tekin]

Merhaba,
Bir siteden dış veri alıyorum.Ama ekli dosyamdaki "ORT.FİYAT" sütununa abuk sabuk rakamlar geliyor.Örn.7,75 gibi bir rakamı 775.884 şeklinde getiriyor karşıma.Bende buna bir çözüm arıyorum.Standart birşey olsa herşey kolay olacak ama değişkenleri fazla maalesef.Bu nedenle dosyayı tam olarak gönderiyorum.Ben "N" sütununa olması gereken şekli örnek olarak yazdım.Umarım iyi bir çözüm bulurum sayenizde.

 

[uzmanamele]

merhaba
bunu deneyiniz,
araçlar / seçenekler / uluslararası / sistem ayırıcılarını kullan (onay kutusunu boşaltın, ondalık ayraç nokta, binlik ayraç virgül)

 

[hayri tekin]

Sn.uzmanamele,
İlginiz için teşekkürler ama işe yaramadı maalesef.

 

[Ömer]

Merhaba,

Önce boş bir hücreye 100000 yazın daha son bu hücreyi kopyalayın ve K2:Kson aralığını seçin Özel yapştırdan Böl seçeneğini işaretleyerek tamam butonuna basın.

Bu işlemden sonra ctrl h aranan değere . ( nokta ) yeni değere , ( vürgül ) tümünü değiştir..

.

 

[hayri tekin]

Sn.Ömer
Çok teşekkür ederim.Az daha oldu demiştim,ama üzgünüm;olmadı.Çünkü tüm rakamları 0,15,1,16,3,60 şekline dönüştürdü.Oysa arada 39,60-1584 vs.gibi rakamalar da var.Onları da örn.3,960-1,584 şekline döndürdü.

 

[Ömer]

Aradaki rakamdan kastınız nedir, hani hücre ve ne olması gerekiyor ?

.

 

[hayri tekin]

Ömer bey,
Bu konuyla sizleri daha fazla yormak istemem,biraz sıkıntılı çünkü.Bu şekilde kısmen de olsa işimi görebilirim.Tekrar teşekkürler.
Saygılar

 

[hayri tekin]

Yanıtınızı yeni gördüm.Örnek dosyamdaki "N17" bkz.

 

[Ömer]

Yanıtınızı yeni gördüm.Örnek dosyamdaki "N17" bkz.

Sayın tekintek,

775876 (görünen 775.876 K2) değeri 7,75876 oluyor.

392629 (görünen 392.629 K19) değeri 3,92629 oluyor.

362972 (görünen 362.972 K17) bu neden 36,2972 oluyor. Aralarında hiç bir basamak farkı yok.

Bunun nedenini açıklarsanız belki bir çözüm bulabiliriz.

.

 

[Ömer]

Dosyadaki diğer sütunlarıda inceledim, nedenini anlamadım fakat gelen veriler sizin belirttiğiniz gibi olması gerekiyor sanırım. Peki şu yolu deneseniz olurmu.

C:H sütunlarını seçin,

ctrl h,

Aranan değer , ( virgül ) tümünü değiştir.
Tekrar, Aranan değer . ( nokta ) yeni değer , ( virgül ) tümünü değiştir..

.

 

[hayri tekin]

Ömer bey bunlar malumunuz hisse fiyatları.Ben de ilk defa böyle birşey ile karşılaşıyorum.Aynen internetten aldığım gibi size gönderdim.Hatta soldaki diğer fiyatlara bakarsanız gerçek fiyatların neler olduğunu görebilirsiniz.
Ayrıca tespitiniz de çok doğru.
Teşekkürler

 

[Ömer]

#10. mesajdaki yol işinizi gördümü?

daha sonrada K2 ye

=ortalama(..) fonksiyonunu kullabilirsiniz..

.

 

[hayri tekin]

Ömer bey,
10.mesajınız kısmen işimi görüyor,ama yeterli olmadı.Ortalamadan kastınızı pek anlayamadım.
Birşey daha sorayım müsaadenizle:Ben veri aldığım siteye bakıyorum ort.fiyat sütunundaki rakamlar orada doğru görünüyor.Ama excele yanlış geliyor.Bununla ilgili bir yardımınız olabilirmi acaba ?

 

[hayri tekin]

Ömer bey,
Eğer dışveride bu sütunu düzeltemezsek başka birşey deneyelim.Ekli dosyamda veriler kopyala-özel yapıştır-metin şeklinde verileri aldım.Metni sütunlara ayırdım.Örnek olark 1 satır yaptım.Ama bunları tek tek yapmak malumunuz bir dert.Bunları toplu olarak yapma şansımız olabilirmi acaba ?

Not:Metni sütunlara çevir işlemi şu şekilde yapıldı:

1-Metni sütunlara ayır
2-Sabit genişlikli
3-İleri
4-10'daki ok 20'den bir önceki okun üzerine çekildi
5-ileri
6-Ortalama sütunu seçildi
7-Gelişmiş
8-onadalık ayraç . binlik ayraç , yapıldı."Negatif sayılara eksi işareti konulsun" işareti kaldırıldı.
9-tamam ve son

 

[Ömer]

İlk eklediğiniz dosyada aşağıdaki kodu çalıştırınız..

Sub Ortalama()
Application.ScreenUpdating = False
Columns("C:H").Replace What:=".", Replacement:=","
For i = 2 To [A65536].End(3).Row
For Each hucre In Range("C" & i & ":H" & i)
hucre.Value = CDbl(hucre)
Next hucre
Cells(i, "k") = WorksheetFunction.Average(Range("C" & i & ":H" & i))
Next
Application.ScreenUpdating = True
End Sub

.

 

[hayri tekin]

Ömer bey,
Yanıtınıza yeni bakabildim.Harika olmuş.Çok teşekkür ederim.
İyi geceler