Vba'da saat nasıl formatlanır (örneklerle)

Excel’deki saatleri belirli bir şekilde biçimlendirmek için VBA’daki Format işlevini aşağıdaki bağımsız değişkenlerle kullanabilirsiniz:

• h : sıfırsız saat
• hh : sıfırlı saatler
• n : sıfırsız dakikalar
• nn : sıfırlı dakikalar
• s : sıfırsız saniye
• ss : sıfırlı saniye
• AM/PM : AM/PM ekranı

Aşağıdaki örnek, pratikte VBA kullanılarak saatlerin nasıl biçimlendirileceğini gösterir.

Örnek: Zamanları VBA Kullanarak Biçimlendirme

Excel’de aşağıdaki tarih/saat sütununa sahip olduğumuzu varsayalım:

A sütunundaki saatleri özel olarak biçimlendirmek ve biçimlendirilmiş süreleri B’den E’ye kadar sütunlarda görüntülemek için aşağıdaki makroyu oluşturabiliriz:

 SubFormatTime ()

Dim i As Integer

For i = 2 To 8
  Range(" B " & i) = Format(Range(" A " & i), " h ")
  Range(" C " & i) = Format(Range(" A " & i), " h:nn ")
  Range(" D " & i) = Format(Range(" A " & i), " h:nn:ss ")
  Range(" E " & i) = Format(Range(" A " & i), " h:nn:ss AM/PM ")
Next i

End Sub

Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:

B’den E’ye kadar olan sütunlar artık her seferinde A sütununda belirli bir şekilde biçimlendirilmiş olarak görüntüleniyor.

Ayrıca Kısa Süre , Orta Süre ve Uzun Süre kısayol biçimlerini de kullanabileceğinizi unutmayın:

 SubFormatTime ()

Dim i As Integer

For i = 2 To 8
  Range(" B " & i) = Format(Range(" A " & i), " Short Time ")
  Range(" C " & i) = Format(Range(" A " & i), " Medium Time ")
  Range(" D " & i) = Format(Range(" A " & i), " Long Time ")
Next i

End Sub

Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:

Artık B’den D’ye kadar olan sütunlar her seferinde A sütununda belirli bir şekilde biçimlendirilmiş olarak görüntüleniyor.

Ek kaynaklar

Aşağıdaki eğitimlerde VBA’da diğer ortak görevlerin nasıl gerçekleştirileceği açıklanmaktadır:

VBA: tarih formatı olarak aa/gg/yyyy nasıl kullanılır?
VBA: Hücreleri yüzde olarak biçimlendirme
VBA: Hücrelere koşullu biçimlendirme nasıl uygulanır?