Excel, KB'yi MB'ye ve tersi yönde dönüştürmek için doğrudan bir özellik sağlamadı. Bu nedenle, burada bu sorunu çözmek için iki yöntem tanıtacağız.
Bir Excel çalışma sayfasında, sayıları belirli birimlerle gireceksiniz. Ancak, bayt birimi gibi bazı birimler hesaplamaya katılamaz. Örneğin aşağıdaki görselde sayıları görebilirsiniz.
Bu sütunda birimi “KB” olan birkaç sayı vardır. Öte yandan, birimleri olan sayıları hesaplamak için doğrudan bir formül kullanmak imkansızdır. D14 hücresine “=C1024/14” formülünü girdiğinizde sonuç “#DEĞER” olacaktır. Ayrıca, KB'ye sahip çok sayıda hücre varsa, bu sayıları tek tek dönüştürmenin zaman alıcı olduğunu göreceksiniz.
Bu nedenle, KB'yi MB'ye dönüştürmek veya MB'yi KB'ye hızlı bir şekilde dönüştürmek için şimdi aşağıdaki iki yöntemi kullanabilirsiniz.
Yöntem 1: Excel İşlevlerini Kullanın
Burada size bu görevi tamamlamak için Excel işlevlerini kullanmanın adımlarını göstereceğiz.
- Bu çalışma sayfasındaki D2 hücresini tıklayın.
- Şimdi aşağıdaki formülü hücreye girin:
=IF(ISNUMBER(FIND(“KB”,C2)),ROUND(LEFT(C2,LEN(C2)-2)/1024,2) & “MB”,””)
Bu formülde öncelikle hücredeki birimin “KB” mi yoksa “MB” mi olduğuna karar vereceğiz. Birim “KB” ise, formül hesaplama için birimleri kaldıracaktır. Hesaplamada, sonucu yuvarlamak için ROUND işlevini de kullanacağız. Kriteri gerçek ihtiyacınıza göre belirleyebilirsiniz. Hesaplama bittiğinde sayıya yeni birim “MB” eklenecektir. Bu nedenle, bu formül göründüğü kadar karmaşık değildir.
- Ardından klavyedeki "Enter" düğmesine basın. Şimdiye kadar, D2 hücresinde hiçbir şey görmeyeceksiniz.
- Bundan sonra, tüm sütunu doldurmak için D2 hücresinin doldurma tutamacını çift tıklayın. Bu sütunda, orijinal birim “KB” ise, karşılık gelen hücrelerde yeni içeriklerin olacağını göreceksiniz. Ayrıca birim “MB” ise hücrelerde boş değer olacaktır.
- Artık sonucu orijinal hücrelere kopyalayabilirsiniz. Ve bu hücreler için yalnızca değerleri yapıştırmayı unutmayın.
Bir dahaki sefere bu formülü kullanmanız gerekirse, bu formüldeki hücre referansını değiştirebilirsiniz.
Öte yandan, “MB” yi “KB” ye dönüştürmeniz gerekiyorsa, sadece küçük bir ayar yapmanız yeterlidir. Ve yeni formül şöyle olacak:
=IF(ISNUMBER(FIND(“MB”,C2)),ROUND(LEFT(C2,LEN(C2)-2)*1024,0) & “KB”,””)
Bu formülü çalışma sayfanıza da uygulayabilirsiniz.
Yöntem 2: VBA Makrolarını Kullanın
Bir çalışma sayfasında formülü kullanırken, yine de sonucu kopyalayıp yapıştırmanız gerekir. Kurallara aşina değilseniz formül biraz zor. Bu nedenle, bu görevi hızlı bir şekilde tamamlamak için burada Excel'deki VBA makrolarını da kullanabilirsiniz.
- Şeritte "Geliştirici" sekmesine tıklayın.
- Ardından araç çubuğundaki "Visual Basic" düğmesine tıklayın. Bundan sonra, Visual Basic editörünü göreceksiniz. Ayrıca klavyedeki “Alt +F11” kısayol tuşlarına da basarak Visual Basic editörünü açabilirsiniz.
- VBA Projektör alanına sağ tıklayın.
- Ardından imlecinizi “Ekle” seçeneğine getirin.
- Daha sonra alt menüden “Modül” seçeneğini seçin. Bu nedenle, Visual Basic düzenleyicisinde yeni bir modül bulunmaktadır.
- Şimdi bu adımda, aşağıdaki VBA kodlarını yeni modüle girin:
Sub KB_To_MB()
Dim cel As Range
For Each cel In Range("C2:C28")
If cel Like "*" & "KB" Then
cel.Value = Application.WorksheetFunction.Round(Left(cel, Len(cel) - 2) / 1024, 2) & "MB"
End If
Next cel
End Sub
Bu VBA makrosunda hücrenin “KB” karakterini içerip içermediğini kontrol edeceğiz. Ve sonra prosedür hesaplamayı yapacaktır. Ayrıca, sonuç orijinal çalışma sayfasında olacaktır. Gerçek çalışma sayfanızda, aralığı gerçek ihtiyacınıza göre de değiştirebilirsiniz. Ve sonucu diğer hücrelere girmeniz gerekirse, onu da değiştirebilirsiniz.
- Şimdi bu makroyu çalıştırmak için araç çubuğundaki “Run Sub” düğmesine tıklayın veya klavyedeki “F5” tuşuna basın. Ardından, çalışma sayfasına geri dönebilir ve sonucu kontrol edebilirsiniz.
Yeni sonuçların orijinal hücrelerde zaten göründüğünü göreceksiniz. Üstelik sonucu tekrar o hücrelere kopyalamanıza gerek yok.
Öte yandan, şimdi MB'yi KB'ye dönüştürmeniz gerekiyorsa, aşağıdaki makroları kullanabilirsiniz:
Sub MB_To_KB()
Dim cel As Range
For Each cel In Range("C2:C28")
If cel Like "*" & "MB" Then
cel.Value = Application.WorksheetFunction.Round(Left(cel, Len(cel) - 2) * 1024, 0) & "KB"
End If
Next cel
End Sub
Bu makrodaki bazı öğeleri gerçek ihtiyacınıza göre değiştirmeniz gerekir. Bu makroyu çalıştırdıktan sonra, sonucu çalışma sayfasında hemen alırsınız.
İki Yöntem Arasında Bir Karşılaştırma
Her iki yöntemin de avantajlarını ve dezavantajlarını aşağıdaki tabloda listeledik.
|
karşılaştırma |
Excel İşlevlerini Kullanın |
VBA Makrolarını Kullanın |
|
Avantajlar |
1. VBA'ya aşina değilseniz, bu görevi tamamlamak için işlevleri kullanabilirsiniz.
2. Diğer birimleri dönüştürmeniz gerektiğinde, bu formülü de ihtiyacınıza göre değiştirebilirsiniz. |
1. Sadece tek bir tıklama ile sonuca ulaşabilirsiniz.
2. Daha fazla görevi yerine getirme ihtiyacınıza göre kodları da değiştirebilirsiniz. |
|
Dezavantajlar |
1. Bu adımda daha fazla adım var çünkü sonuçları yine de belirli hücrelere kopyalamanız gerekiyor.
2. Bu uzun formülde bazı detaylarda kolayca hata yapacaksınız. |
1. Excel VBA'ya aşina değilseniz, makroları çalıştırdığınızda muhtemelen hatalarla karşılaşırsınız.
2. Excel'de VBA kullanmak her zaman işleri daha karmaşık hale getirecektir. |
Artık iki yöntem hakkında kapsamlı bir anlayışa sahipsiniz. Ve sorununuzu çözmek için bunlardan herhangi birini kullanabilirsiniz.
Doğru Veri Kurtarma Yöntemini Seçin
Excel bozulmasıyla karşılaştığınızda, yapmanız gereken ilk şey dosyalarınızı kurtarmaya çalışmaktır. Ancak, veri kurtarma hakkında hiçbir şey bilmiyorsanız, bazı özel yöntemleri kendiniz denemeyin. Bunun nedeni, bazı yanlış davranışların dosyalarınıza daha fazla zarar vermesidir. Dahası, değerli verilerinizi ve bilgilerinizi sonsuza dek kaybedeceksiniz. Bu nedenle, doğru yöntemi seçmeniz gerekir. Ve şimdi, üçüncü taraf aracını da kullanabilirsiniz. Excel xlsx'i onar sorunlar ve diğer hatalar. Bu araç dünyanın en iyi teknolojisi ile donatılmıştır ve Excel'deki hata bu yazılım için çocuk oyuncağıdır.
Yazar Tanıtımı:
Anna Ma bir veri kurtarma uzmanıdır. DataNumendahil olmak üzere veri kurtarma teknolojilerinde dünya lideri olan , Inc. Word verilerini onar ve görünüm onarım yazılım ürünleri. Daha fazla bilgi için ziyaret edin www.datanumen.com






