Yukarı Yuvarlama Makrosu - Excel VBA

Excel VBA ile sayıları yukarı yuvarlama makrosu işlemini otomatikleştirin. Adım adım rehberle sayı yuvarlama işlemini hızlıca gerçekleştirin

Excel Vba İle Yukarı Yuvarlama Makrosu

Excel VBA ile sayıları yukarıya doğru yuvarlamak, verilerinizi istediğiniz formatta düzenlemenize yardımcı olur. Bu yazıda, VBA kullanarak sayıları nasıl yukarı yuvarlayabileceğinizi öğreneceksiniz.

1. Yukarı Yuvarlama Makrosu Nedir?

Yukarı yuvarlama, sayıları istenilen basamağa kadar büyütmek için kullanılır. Bu işlem, sayının tam sayıya veya belirli bir ondalık basamağa kadar yuvarlanmasını sağlar. Excel VBA kullanarak bu işlemi otomatikleştirebilirsiniz. Eğer yukarı yuvarlama işlemini Excel menüleri aracılığıyla yapmak isterseniz, detaylı talimatlar için bu bağlantıya tıklayabilirsiniz.

2. Vba İle Yukarı Yuvarlama Makrosu Nasıl Yazılır?

Kodu yazmak için öncelikli olarak üst menüden geliştirici sekmesinin aktif olduğundan emin olunuz. Eğer değilse, İlk olarak, Excel’de Geliştirici sekmesini etkinleştirmek için "Dosya" > "Seçenekler" > "Şeridi Özelleştir" menüsünden "Geliştirici"yi işaretleyin. Detaylı bilgi için linke tıklayabilirsiniz. Ardından, "Geliştirici" sekmesinden "Visual Basic" butonuna tıklayarak VBA Düzenleyicisini açabilir ve "Ekle" > "Modül" ile yeni bir modül ekleyebilirsiniz. Daha fazla bilgi için linke tıklayabilirsiniz.

Bu adımlar tamamlandıktan sonra, açtığınız modülde; Excel Vba İle Yukarı Yuvarlama İşlemi, Aşağıdaki VBA Kodu İle Gerçekleştirilebilir:

Vba İle Yukarı Yuvarlama Makrosu Kullanımı

Kopyalandı

Sub YukariYuvarlama()
    ' Yukarıya Yuvarlama İşlemi
    Dim Sayi As Double
    Sayi = 12.6789
    ' Sayıyı 2 Ondalık Basamağa Kadar Yukarı Yuvarla
    Sayi = WorksheetFunction.Ceiling(Sayi, 0.01)
    MsgBox Sayi
End Sub

3. Kodun Parametreleri ve Açıklaması

• Sayi: Yukarı yuvarlanacak sayıyı belirtir.
• WorksheetFunction.Ceiling: Excel VBA'nın yerleşik fonksiyonlarından biri olan Ceiling, sayıyı belirli bir değere yuvarlar. Bu örnekte, 0.01'e yuvarlanmaktadır.

Kodun Açıklanması

• Makronun Başlangıcı: Sub YukariYuvarlama() komutu ile makro başlatılır.
• Sayı Belirleme: Sayi = 12.6789 komutuyla sayıyı tanımlarız. Bu örnekte, 12.6789 sayısı kullanılmaktadır.
• Yukarı Yuvarlama: Sayi = WorksheetFunction.Ceiling(Sayi, 0.01) komutuyla sayıyı 0.01'e kadar yukarı yuvarlarız.

4. Dikkat Edilmesi Gerekenler

Uyarı: Yukarı yuvarlama işlemi, verilen değere en yakın büyük sayıya yuvarlama yapar. Bu yüzden doğru bir yuvarlama işlemi yapmak için dikkat edilmesi gerekir.

5. Ekstra İpucu

İpucu: Eğer sayıyı en yakın tam sayıya yuvarlamak istiyorsanız, WorksheetFunction.Ceiling(Sayi, 1) komutunu kullanabilirsiniz.

Yukarı Yuvarlama Makrosu - Sonuç

Excel VBA ile yukarı yuvarlama yapmak, sayılarınızı hızlı ve etkili bir şekilde düzenlemenizi sağlar. Bu makro ile sayılarınızı otomatik olarak yuvarlayarak zamandan tasarruf edebilirsiniz.

Alakalı Makaleler