Powerpointte sunuya açılır pencere ekleme

Kodla Büyü
Y

yunus48

Site Gezgini
Mesajlar
54
Merhaba günaydın arkadaşlar, powerpointte sunu hazırlarken sununun bir kelimesini link olarak ayarlayıp tıklandığında word de yazdığımız mektup açılsın istiyorum. Bunu köprü olarak ayarlayarak yaparsınız diyeceksiniz fakat onu denedim tıkladığımda word açılıyor ama word araç çubukları falan olduğundan yazı tam ekranda gelmiyor. Mektubun sunu da tam ekranda tıklanarak açılmasını nasıl sağlarım.
 
Mektubu sunu içinde bir sayfaya istediğin gibi yerleştir. köprüyü o sayfaya ver mesela en son sayfaya ver yada tek sayfa pps olarak hazırla ona köprü ver.
 
başka bir sunuya mektubu oluştur ve powerpoint gösterisi (ppsx uzantılı) olarak kaydet.Daha sonra kendi sunundan mektup gösterisine köprü ver.Direk tam ekran açılır.
 
bu kodu modüle yazın istediğiniz olur hocam.kolay gelsin. :+1:

Sub AutoOpen()
ActiveWindow.View.Type = 7 'Full Screen Reading layout
ActiveWindow.View.Zoom.Percentage = 100 'or your preference
End Sub
 
avy' Alıntı:
bu kodu modüle yazın istediğiniz olur hocam.kolay gelsin. :+1:

Sub AutoOpen()
ActiveWindow.View.Type = 7 'Full Screen Reading layout
ActiveWindow.View.Zoom.Percentage = 100 'or your preference
End Sub
Genişletmek için tıkla ...

İlginiz için teşekkür ederim. Yeni modül oluştur deyip mi yapıştıracağım?
 
evet hocam vb moduna geçip yeni modül ekleyin.oraya yapıştırıp makro olarak farklı kaydedin.

yunus48' Alıntı:
avy' Alıntı:
bu kodu modüle yazın istediğiniz olur hocam.kolay gelsin. :+1:

Sub AutoOpen()
ActiveWindow.View.Type = 7 'Full Screen Reading layout
ActiveWindow.View.Zoom.Percentage = 100 'or your preference
End Sub
Genişletmek için tıkla ...

İlginiz için teşekkür ederim. Yeni modül oluştur deyip mi yapıştıracağım?
Genişletmek için tıkla ...
 
Merhaba ekledim type = 7 de hata veriyor. :(

avy' Alıntı:
evet hocam vb moduna geçip yeni modül ekleyin.oraya yapıştırıp makro olarak farklı kaydedin.

yunus48' Alıntı:
avy' Alıntı:
bu kodu modüle yazın istediğiniz olur hocam.kolay gelsin. :+1:

Sub AutoOpen()
ActiveWindow.View.Type = 7 'Full Screen Reading layout
ActiveWindow.View.Zoom.Percentage = 100 'or your preference
End Sub
Genişletmek için tıkla ...

İlginiz için teşekkür ederim. Yeni modül oluştur deyip mi yapıştıracağım?
Genişletmek için tıkla ...
Genişletmek için tıkla ...
 
yunus48' Alıntı:
Merhaba ekledim type = 7 de hata veriyor. :(

avy' Alıntı:
evet hocam vb moduna geçip yeni modül ekleyin.oraya yapıştırıp makro olarak farklı kaydedin.

yunus48' Alıntı:
avy' Alıntı:
bu kodu modüle yazın istediğiniz olur hocam.kolay gelsin. :+1:

Sub AutoOpen()
ActiveWindow.View.Type = 7 'Full Screen Reading layout
ActiveWindow.View.Zoom.Percentage = 100 'or your preference
End Sub
Genişletmek için tıkla ...

İlginiz için teşekkür ederim. Yeni modül oluştur deyip mi yapıştıracağım?
Genişletmek için tıkla ...
Genişletmek için tıkla ...
Genişletmek için tıkla ...
 

Ekli dosyalar

  • o.rar
    2.1 MB · Görüntüleme: 133
Cevap yazmak için giriş yap yada kayıt ol.
Geri
Üst