Excel'de sayıları nasıl kısaltabilirim?
Excel'de büyük veri kümeleriyle çalışırken, büyük sayılarla karşılaşmak sıkça olur. Bu rakamlar çalışma sayfanızı karmaşıklaştırarak veriyi okumayı ve analiz etmeyi zorlaştırabilir. Örneğin,1,234,567 veya12,000,000 gibi değerler özellikle panolarda veya özet raporlarda izleyicileri zorlayabilir. Bu gibi durumlarda, sayıları kısaltmak (örn.1234567’yi1,23M’ye veya12000’i12K’ya dönüştürmek) hem netliği artırır hem de düzenin daha kompakt olmasını sağlar. Bu rehberde, Excel’de sayıları kısaltmak için yerleşik biçimlendirme, formüller ve VBA makroları ile ilgili birkaç pratik çözüm bulacaksınız. Her yöntemin, tercihlerinize ve iş akışınıza göre farklı senaryolara uygun avantajları vardır.
 |  |  |
Sayıyı kısalt | Excel formülüyle kısalt | VBA makrosuyla sayıları kısalt
Sayıyı kısalt
Excel’de sayıları kısaltmanın en kolay yollarından biri, Hücre Biçimlendir ayarlarını kullanarak sayı biçimlerini özelleştirmektir. Bu yöntem sayesinde, yalnızca sayıların görüntüsü değişir; arka plandaki değerler olduğu gibi kalır ve hücrelerle yapılan hesaplamalar doğru olarak devam eder. Özellikle hızlı raporlar hazırlarken veya rakamların otomatik yenilenmesi gerekiyorsa ekstra sütun eklemeden kullanabilirsiniz. Ancak, bu şekilde metin sonuçları alamaz veya karmaşık mantıkla karışık birimleri (aynı sütunda hem M hem K gibi) gösteremezsiniz; bu tür işlemler için formül veya makrolar tercih edilmelidir.
1. Kısaltmak istediğiniz sayı aralığını seçin. Ardından, seçili aralıkta herhangi bir yere sağ tıklayın ve açılan menüden Hücre Biçimlendir seçeneğini tıklayın.
2. Hücre Biçimlendir penceresinde, Sayı sekmesine gidin, soldaki listeden Özel seçeneğini işaretleyin ve Tür alanına şunu girin: [>999999]#,,"M";#,"K" Bu özel biçim, Excel’in999.999’dan büyük sayıları milyonlar ("M" ile), diğer tüm rakamları ise binler ("K" ile) göstermesini sağlar. Ekran görüntüsüne bakınız:
3. Biçimlendirmeyi uygulamak için Tamam'a tıklayın. Artık seçili sayı aralığınız kısaltılmış olarak gösterilir ve büyük veri kümeleri hızlıca incelenip kolayca yorumlanabilir.
İpucu: Sadece büyük rakamları binler ("K") olarak göstermek istiyorsanız Tür kutusuna #,"K" yazın. Sadece milyonlar için #,,"M", milyarlar veya trilyonlar için ise sırasıyla #,,,"B" veya #,,,,"T" kullanın. Milyonlarla milyarları birlikte, uygun birimle göstermek isterseniz: [>999999999.999]#,,,"B";[>999999.999]#,,"M";#,##0 _M yazabilirsiniz. Unutmayın, sayı biçimlendirme yalnızca görüntü içindir ve hesaplama değerini değiştirmez. Daha detaylı mantık gerektiğinde, örneğin yuvarlama, ondalık gösterme ya da negatif sayıları yönetmek için bir formül veya VBA makrosu kullanmayı düşünün.
Dikkat Edilmesi Gerekenler: Verinizde1.000’den küçük değerler varsa, onlar kısaltılmadan orijinal haliyle gösterilecektir. Bu yöntemle aynı hücrede hem M hem K’yi birleştiremeyebilirsiniz; özel biçimlendirme ile bazı sınırlamalar olsa da, karmaşık kombinasyonlar için başka yöntemler uygundur. Son olarak, biçimlendirilmiş rakamlar formüller içinde hala orijinal değeri kullanır. Bu da veri aktarırken veya kopyalarken karışıklık yaratabilir.
Excel formülleriyle sayıları kısaltın (metne dönüştürülür)
Kısaltılmış sonuçların yeni bir sütunda görünmesini istiyorsanız veya mantığı özelleştirmeniz gerekiyorsa (örneğin ondalıklar göstermek için1,25M, karışık birimleri yönetmek için K, M, B, T, ya da sonucu metin olarak kontrol etmek için), Excel fonksiyonlarıyla dinamik kısaltmalar oluşturabilirsiniz. Ayrıca, metni dondurmak veya başka formüllerle/panellerde kullanmak istediğinizde de idealdir.
Uygun Senaryolar: Bu yöntem; metin çıktısı gerektiğinde veya özel biçimlerle desteklenemeyen gelişmiş kısaltma mantıkları için en uygunudur. Özetler, panolar ya da dışarıya aktarılmış/kopyalanmış sonuçları paylaşırken de kullanılabilir.
1. Hedef hücreye aşağıdaki formülü girin (örneğin, sayınız A2 hücresindeyse B2’de formülü kullanabilirsiniz):
=IF(ABS(A2)>=1000000000,TEXT(A2/1000000000,"0.00")&"B",IF(ABS(A2)>=1000000,TEXT(A2/1000000,"0.00")&"M",IF(ABS(A2)>=1000,TEXT(A2/1000,"0.00")&"K",A2)))Bu formül, A2’deki değeri kontrol edip uygun şekilde B (milyar), M (milyon) veya K (bin) ile iki ondalık basamak gösterir. Negatif sayılar da desteklenir ve1.000’den küçük değerler olduğu gibi görüntülenir.
2. Formülü onaylamak için Enter’a basın. Daha fazla satıra uygulamak isterseniz, doldurma tutamacını aşağı sürükleyebilir veya formülü gerekli hücrelere kopyalayabilirsiniz.
Pratik İpuçları: Ondalık hane sayısını özelleştirmek için TEXT fonksiyonundaki "0.00" kısmını değiştirin (örneğin, tek ondalık için "0.0" kullanabilirsiniz). - Eğer çok büyük sayılarla ilgileniyorsanız (trilyon ve üzeri), IF modelini genişletmeyi düşünebilirsiniz.
Dikkat Edilmesi Gerekenler: - Bu formül metin çıktısı oluşturur, yani sayılar SUM veya başka matematiksel fonksiyonlarda doğru hesaplanmayacaktır; yeniden dönüştürülmesi gerekir. Sonunda sıfır görünümünü önlemek için (örn. "12M" yerine "12.00M" değil) TEXT fonksiyonu içinde özel biçim kullanın.
VBA makrosu ile sayıları kısaltın
Sayı kısaltmayı tüm aralıkta otomatikleştirmek veya formül/yeni biçim ile kolayca yönetilemeyen özel kurallar uygulamak isteyenler için, Excel VBA makrosu kullanmak iyi bir seçenektir. Bu yöntemde, kısaltma sonucu mevcut hücrelerin yanında yeni bir sütuna eklenebilir veya doğrudan yerinde değiştirilebilir. Özellikle tekrarlayan işlemler ya da büyük tablo üzerinde çalışılırken uygundur.
En uygun kullanım: Büyük veya dinamik aralıklarda otomatik kısaltma; özel, yeniden kullanılabilir iş akışları; farklı veri düzenlerinde toplu işlem.
1. Öncelikle, Excel’de VBA Düzenleyiciyi açmak için Alt + F11 tuşlarına basın. VBA penceresinde, Ekle > Modül seçeneğine tıklayın, yeni bir modül oluşturun ve aşağıdaki kodu modül penceresine kopyalayın:
Sub AbbreviateNumbersAddColumn()
Dim rng As Range
Dim cell As Range
Dim destCol As Range
Dim abbrevValue As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set rng = Application.Selection
Set rng = Application.InputBox("Select the range of numbers to abbreviate", xTitleId, rng.Address, Type:=8)
If rng Is Nothing Then Exit Sub
Set destCol = rng.Offset(0, 1).Columns(1)
For Each cell In rng
If IsNumeric(cell.Value) Then
If Abs(cell.Value) >= 1000000000 Then
abbrevValue = Format(cell.Value / 1000000000, "0.00") & "B"
ElseIf Abs(cell.Value) >= 1000000 Then
abbrevValue = Format(cell.Value / 1000000, "0.00") & "M"
ElseIf Abs(cell.Value) >= 1000 Then
abbrevValue = Format(cell.Value / 1000, "0.00") & "K"
Else
abbrevValue = cell.Value
End If
Else
abbrevValue = cell.Value
End If
destCol.Cells(cell.Row - rng.Row + 1, 1).Value = abbrevValue
Next
MsgBox "Abbreviated values written to the column to the right of the selection."
End Sub2 Kodu çalıştırmak için VBA penceresini kapatın. Excel’de, kısaltmak istediğiniz sayı aralığını seçin ve ardından F5 tuşu na basın veya Çalıştır’a tıklayın. Makro, sizden bir aralık seçmenizi ister ve ardından kısaltılmış sonuçları orijinal aralığın hemen sağındaki sütuna yazar.
Kullanım İpuçları: Orijinal veriyi korumak istiyorsanız güvenle kullanabilirsiniz—sonuçlar yeni bir yan sütunda yer alır. Sonuçların üzerine yazmak isterseniz kodu buna göre değiştirebilirsiniz ancak yedek almadan bunu tavsiye etmeyiz.
Sorun giderme hatırlatmaları: Makroların çalışma kitabınızda etkinleştirildiğinden emin olun. Verinizde metin veya boş hücreler varsa, makro onları olduğu gibi bırakacaktır. Özel etiketler (örneğin trilyon için "T" göstermek) kullanacaksanız, If bloklarını uygun şekilde düzenleyin.
En İyi Ofis Verimlilik Araçları
Kutools for Excel ile Excel becerilerinizi güçlendirin ve benzersiz bir verimlilik deneyimi yaşayın. Kutools for Excel, üretkenliği artırmak ve zamandan tasarruf etmek için300'den fazla Gelişmiş Özellik sunuyor. İhtiyacınız olan özelliği almak için buraya tıklayın...
Office Tab, Ofis uygulamalarına sekmeli arayüz kazandırır ve işinizi çok daha kolaylaştırır.
- Word, Excel, PowerPoint'te sekmeli düzenleme ve okuma işlevini etkinleştirin.
- Yeni pencereler yerine aynı pencerede yeni sekmelerde birden fazla belge açıp oluşturun.
- Verimliliğinizi %50 artırır ve her gün yüzlerce mouse tıklaması azaltır!
Tüm Kutools eklentileri. Tek kurulum
Kutools for Office paketi, Excel, Word, Outlook & PowerPoint için eklentileri ve Office Tab Pro'yu bir araya getirir; Office uygulamalarında çalışan ekipler için ideal bir çözümdür.
- Hepsi bir arada paket — Excel, Word, Outlook & PowerPoint eklentileri + Office Tab Pro
- Tek kurulum, tek lisans — dakikalar içinde kurulun (MSI hazır)
- Birlikte daha verimli — Ofis uygulamalarında hızlı üretkenlik
- 30 günlük tam özellikli deneme — kayıt yok, kredi kartı yok
- En iyi değer — tek tek eklenti almak yerine tasarruf edin