Excel VBA ile Yukarı Yuvarlama: Ceiling ile Kolay Yuvarlama
1. Örnek Veri Tablosu
Aşağıdaki tabloda 5 adet ondalıklı sayı var. Bu sayıları 2 basamak yukarı yuvarlayacağız.
Tablo Bilgisi
5 sayıyı Ceiling fonksiyonu ile 2 ondalık basamağa yukarı yuvarlayacağız.
2. Yöntem 1: Tek Sayıyı Yukarı Yuvarlama
Ceiling fonksiyonu ile tek bir sayıyı yukarı yuvarlarız. Örnek: 12.6789'u 2 basamak yuvarlayalım.
Sub TekSayiYukariYuvarla()
Dim sayi As Double
sayi = 12.6789
sayi = WorksheetFunction.Ceiling(sayi, 0.01)
MsgBox "Yuvarlanmış: " & sayi
End Sub
Kod Açıklaması
- Dim sayi As Double → Ondalık sayı değişkeni
- WorksheetFunction.Ceiling(sayi, 0.01) → 2 basamak yukarı yuvarlar
- MsgBox → Sonucu gösterir
Sonuç:
3. Yöntem 2: Tablodaki Tüm Sayıları Yukarı Yuvarlama
For Each döngüsü ile tablodaki tüm sayıları yukarı yuvarlayalım.
Sub TumSayilariYukariYuvarla()
Dim hucre As Range
For Each hucre In Range("A2:A6")
hucre.Value = WorksheetFunction.Ceiling(hucre.Value, 0.01)
Next hucre
End Sub
Kod Açıklaması
- Dim hucre As Range → Hücre değişkeni
- For Each hucre In Range("A2:A6") → Her hücreyi dolaşır
- Ceiling(hucre.Value, 0.01) → Her hücreyi 2 basamak yukarı yuvarlar
Tablo: 🔵 Yuvarlanmış sayılar:
📌 Sonuç: Tüm sayılar 2 ondalık basamağa yukarı yuvarlandı. (12.6789 → 12.68, 8.9999 → 9.00)
4. VBA Makroları için Ön Hazırlık
1. Geliştirici Sekmesini Aktifleştirin
Excel'de VBA kodlarını yazabilmek için önce Geliştirici sekmesini aktif etmelisiniz. Detaylı bilgi için tıklayın.
3. Modül Ekleyin
Kodlarınızı yazmak için bir Modül eklemelisiniz. Makro yazma rehberi için tıklayın.
2. Visual Basic Düzenleyici'yi Açın
Alt + F11 (Windows) veya Option + F11 (Mac) ile hızlıca açabilirsiniz.
4. Kodu Çalıştırın
Yazdığınız kodu çalıştırmak için F5 tuşuna basın veya Çalıştır butonuna tıklayın. VBA makro nedir? öğrenmek için tıklayın.
F5
▶️ Makroyu çalıştır
5. Sıkça Sorulan Sorular
01 VBA'da yukarı yuvarlama nasıl yapılır?
WorksheetFunction.Ceiling(sayi, 0.01) ile 2 basamak yukarı yuvarlanır.
02 Ceiling fonksiyonu ne işe yarar?
Sayıyı belirtilen katın en yakın üst katına yuvarlar. Örnek: 12.6789 → 12.68
03 Floor ve Ceiling arasındaki fark nedir?
Floor aşağı, Ceiling yukarı yuvarlar. Örnek: 12.6789 → Floor:12.67, Ceiling:12.68
04 Negatif sayılarda Ceiling nasıl çalışır?
Negatif sayılarda da yukarı yuvarlar. Örnek: -3.2 → -3
05 Tam sayıya yukarı yuvarlama nasıl yapılır?
Ceiling(sayi, 1) ile en yakın tam sayıya yukarı yuvarlanır.
06 Mac'te VBA Ceiling çalışır mı?
Evet, Mac'te de aynı kodlar çalışır.