Reklamlar
VBA kullanarak makro ile Power Point Eventlarini yakalamak

VBA kullanarak makro ile Power Point Eventlarini yakalamak » Bu dökümanı yazmakdaki amacım Power Point içerisinden kendi makro dosyalarınızı oluşturarak Power Point eventlerinin nasıl yakalayacağınızı

Gönderen Konu: VBA kullanarak makro ile Power Point Eventlarini yakalamak  (Okunma sayısı 6603 defa)

0 Üye ve 3 Ziyaretçi konuyu incelemekte.

Çevrimdışı administrator

  • Administrator
  • General
  • *****
  • İleti: 24517
  • Karma: +3/-1
    • Profili Görüntüle
    • Toplist Ekle Site Ekle

VBA kullanarak makro ile Power Point Eventlarini yakalamak
« : Mayıs 01, 2009, 12:13:15 ÖS »
Bu dökümanı yazmakdaki amacım Power Point içerisinden kendi makro dosyalarınızı oluşturarak Power Point eventlerinin nasıl yakalayacağınızı açıklamak.

Bildiğiniz gibi VBA kullanarak Office programları için makrolar oluşturup bu makrolarla işlerimizi oldukça kolaylaştırabiliyoruz. Fakat power point eventlerini yakalamak için ek işlemler yapmanız gerekmektedir.



Power point içerisinden programlama yaparken Power Point eventlarına ulaşabilmek için projenize ilk önce bir class dosyası eklemeniz gerekmektedir.Eventleri görebilmek içinse eklemeniz gereken kod parçası:

    Public WithEvents PPTEvent As Application

şeklindedir.Artık Power Pointin bir çok eventini PPtEvent ile ulaşabilirsiniz.


Eklenen bu class dosyasının tanımı yapmak içinse projeye bir module dosyası eklemelisiniz.Eklediğiniz bu module dosyasına class tanımı yapmak için

Dim eklenenClass As New Class1
Dim acildi as Boolean
Sub auto_open()
   
   If acildi Then
      MsgBox "Makro zaten aktif."       
      Exit Sub
   End If
   
   Set eklenenClass.PPTEvent = Application
   acildi = True
   
End Sub


Bu module de yapılan set işleminde class dosyası içerisindeki Initialize işlemi yapılacaktır.Class dosyasının içerisine şu kodları ekleyebiliriz.

Private Sub Class_Initialize()
 
   MsgBox "Class tanımlandı."
   
End Sub
Private Sub Class_Terminate()
   
   MsgBox "Class inaktif edildi."
   
End Sub
Private Sub PPTEvent_SlideShowBegin(ByVal Wn As SlideShowWindow)
Dim fileName As String
     
   MsgBox "Slide Show Başladı."
         
End Sub   
Private Sub PPTEvent_SlideShowEnd(ByVal Pres As Presentation)
   
   MsgBox "Slide Show Bitti. :)"   
   Class_Terminate

End Sub


Bu makroyu çalıştırdığınızda class tanımlanacak ve ardından  Power Pointde slide show yapıp kapttiğinizda class Terminate edilip kapatılacak.Ben Terminate işlemini SlideShowEnd eventinde yaptım görmek için fakat siz uygulamanıza göre bunu başka eventlerada atabilirsiniz.
Artık bu makroyu çalıştırabiliriz.:)

Tool->Macro->Macros dan auto_open 'a secerek.

Bu sadece bir başlangıç daha sonrasında ise neler yapacağınız size kalmış.İyi çalışmalar



Not: Konular İnternet Sitelerinden derlenerek alıntı yapılmıştır.








BilX.Net

Çevrimdışı neynasuh

  • Çavuş
  • *
  • İleti: 7
  • Karma: +0/-0
    • Profili Görüntüle

Ynt: VBA kullanarak makro ile Power Point Eventlarini yakalamak
« Yanıtla #1 : Şubat 01, 2011, 06:39:50 ÖS »
üstadım iyi akşamlar diliyorum

Ben bir kamu kuruluşunda teknisyen olarak çalışıyorum.İşmle ilgili bazı animasyonlar yapıyorum.Fakat power piantte bazı istediğim şeyleri yapamıyorum tıkanıp kaldım.Eğer uygun görürseniz yaptığım animasyonları sizinle paylaşmak ve yapmak isteyipte yapamadıklarımı sizinle öğrenmek isterim.Yardımıcı olursanız çok sevinirim. Selamlar

Çevrimdışı administrator

  • Administrator
  • General
  • *****
  • İleti: 24517
  • Karma: +3/-1
    • Profili Görüntüle
    • Toplist Ekle Site Ekle

Ynt: VBA kullanarak makro ile Power Point Eventlarini yakalamak
« Yanıtla #2 : Şubat 02, 2011, 11:17:40 ÖÖ »
power pointte yapmak istediklerin nelerdir ?
BilX.Net

Çevrimdışı neynasuh

  • Çavuş
  • *
  • İleti: 7
  • Karma: +0/-0
    • Profili Görüntüle

Ynt: VBA kullanarak makro ile Power Point Eventlarini yakalamak
« Yanıtla #3 : Şubat 02, 2011, 06:27:33 ÖS »
hocam size bir animasyon nasıl gönderebilirim

Çevrimdışı neynasuh

  • Çavuş
  • *
  • İleti: 7
  • Karma: +0/-0
    • Profili Görüntüle

Ynt: VBA kullanarak makro ile Power Point Eventlarini yakalamak
« Yanıtla #4 : Şubat 04, 2011, 06:19:51 ÖÖ »
hocam büyük bir heyecanla cevabınızı bekliyorum

Çevrimdışı administrator

  • Administrator
  • General
  • *****
  • İleti: 24517
  • Karma: +3/-1
    • Profili Görüntüle
    • Toplist Ekle Site Ekle

Ynt: VBA kullanarak makro ile Power Point Eventlarini yakalamak
« Yanıtla #5 : Şubat 04, 2011, 03:41:29 ÖS »
oncelikle yapmak istediginiz şeyi hala anlamadım , info@bilx.net mail adresine yapmak istediğiniz ek ile birlikte isteğinizi söylerseniz elimden gelen yardımı yaparım ,
BilX.Net

Çevrimdışı neynasuh

  • Çavuş
  • *
  • İleti: 7
  • Karma: +0/-0
    • Profili Görüntüle

Ynt: VBA kullanarak makro ile Power Point Eventlarini yakalamak
« Yanıtla #6 : Şubat 04, 2011, 07:16:02 ÖS »
üstad gönderdim

Çevrimdışı neynasuh

  • Çavuş
  • *
  • İleti: 7
  • Karma: +0/-0
    • Profili Görüntüle

Ynt: VBA kullanarak makro ile Power Point Eventlarini yakalamak
« Yanıtla #7 : Şubat 06, 2011, 09:37:35 ÖS »
hocam sunuları alabildinizmi

Çevrimdışı neynasuh

  • Çavuş
  • *
  • İleti: 7
  • Karma: +0/-0
    • Profili Görüntüle

Ynt: VBA kullanarak makro ile Power Point Eventlarini yakalamak
« Yanıtla #8 : Şubat 08, 2011, 05:09:03 ÖS »
üstad cevabınızı heyecanla bekliyorum.Power point eventleri derken neyi kastediyorsunuz

Çevrimdışı administrator

  • Administrator
  • General
  • *****
  • İleti: 24517
  • Karma: +3/-1
    • Profili Görüntüle
    • Toplist Ekle Site Ekle

Ynt: VBA kullanarak makro ile Power Point Eventlarini yakalamak
« Yanıtla #9 : Şubat 09, 2011, 07:59:25 ÖÖ »
hocam selam , iş yogunlugundan dolayı cvp veremedım kusura bakma , vba visual basic programlama dilinde power point similasyonlarının bağlantıları ile alakali bu konu gondermiş oldugunuz eklere baktım , siz power point üzerinde işlem yapacaksınız o konuda cok bilgim yok , üzgünüm,
BilX.Net

Çevrimdışı neynasuh

  • Çavuş
  • *
  • İleti: 7
  • Karma: +0/-0
    • Profili Görüntüle

Ynt: VBA kullanarak makro ile Power Point Eventlarini yakalamak
« Yanıtla #10 : Şubat 09, 2011, 08:50:32 ÖS »
eyvalla çok teşekkür ediyorum.o zaman siz bana bir program önerbilirmisiniz

Çevrimdışı Sasaka-4628

  • Çavuş
  • *
  • İleti: 2
  • Karma: +0/-0
    • Profili Görüntüle

Ynt: VBA kullanarak makro ile Power Point Eventlarini yakalamak
« Yanıtla #11 : Kasım 08, 2018, 11:44:59 ÖÖ »
üstadım iyi akşamlar diliyorum

ทางเข้า จีคลับ

Çevrimdışı kissana

  • Çavuş
  • *
  • İleti: 4
  • Karma: +0/-0
    • Profili Görüntüle

Ynt: VBA kullanarak makro ile Power Point Eventlarini yakalamak
« Yanıtla #12 : Kasım 14, 2018, 05:26:13 ÖÖ »
Bu dökümanı yazmakdaki amacım Power Point içerisinden kendi makro dosyalarınızı oluşturarak Power Point eventlerinin nasıl yakalayacağınızı açıklamak.





คาสิโนออนไลน์