Microsoft PowerPoint’te Slayt İlerleme Çubuğu Nasıl Oluşturulur
İlerleme çubuğu, PowerPoint‘te tamamlanan slayt gösterisinin yüzdesini görsel olarak temsil eden bir grafiktir. Microsoft PowerPoint‘te bir ilerleme çubuğunun nasıl oluşturulacağı aşağıda açıklayacağım.
Her slaydın altına bir şekil ekleyerek manuel olarak bir ilerleme çubuğu oluşturabilirsiniz . Bir slayt ekler veya çıkarırsanız, slayt gösterisindeki her slaytta ilerleme çubuğunu manuel olarak yeniden yapmanız gerekir.
İlk olarak, ilerleme çubuğu oluşturmak istediğiniz PowerPoint sunumunu açın. Açıldığında, “Görünüm” sekmesini tıklayın ve ardından “Makrolar” ı seçin.
“Makro” penceresi görünecektir. “Makro Adı” altındaki metin kutusuna yeni makronuz için bir ad yazın. Girdikten sonra, “Oluştur” u tıklayın.
“Uygulamalar için Microsoft Visual Basic (VBA)” penceresi şimdi açılacaktır.
İlk olarak, imlecinizi iki kod satırı arasına yerleştirin.
Ardından, bu kodu kopyalayıp yapıştırın:
On Error Resume Next
With ActivePresentation
For X = 1 To .Slides.Count
.Slides(X).Shapes("PB").Delete
Set s = .Slides(X).Shapes.AddShape(msoShapeRectangle, _
0, .PageSetup.SlideHeight - 12, _
X * .PageSetup.SlideWidth / .Slides.Count, 12)
s.Fill.ForeColor.RGB = RGB(127, 0, 0)
s.Name = "PB"
Next X:
End With
Yapıştırıldıktan sonra, kodunuz düzenleyicide böyle görünmelidir.
Ardından “Çalıştır” ı tıklayın.
Artık VBA penceresini kapatabilirsiniz. Microsoft PowerPoint‘e geri dönün
İlerleme çubuğu şimdi sunumunuzun her slaytının altında görünecektir.
Bir slaytı silerseniz, ilerleme çubuğu otomatik olarak kendini ayarlayacaktır. Yeni bir slayt eklerseniz, makroyu tekrar çalıştırmanız gerekir (Görünüm> Makro> Çalıştır).
Umarım bu yazım size “Microsoft PowerPoint’te Slayt İlerleme Çubuğu Nasıl Oluşturulur” için hızlı bir bakış sağlamıştır. Herhangi bir sorunuz varsa, yorum bırakmaktan çekinmeyin
Ayrıca
“PowerPoint Slaytlarını Birleştirme“
“PowerPoint’te Üstbilgi Altbilgi Ekleme ve Düzenleme“
“Microsoft PowerPoint Klavye Kısayolları“
gibi konulardan faydalanabilirsiniz.
