Butonla Word Sayfası

[Mdemir63]

Selamlar,



kodlarda ki Picture 3 ne anlama geliyor

Saygılar

 

[Mdemir63]

Selamlar,

Arkadaşlar gönderdiğim dosyadaki kodları başka bir excel kitabına uyguladığımda çalışmıyor onun için Kodlardaki açıklamayı istemiştim. Ya da başka kitaba uygularken ne gibi değişiklikler yapmalıyım? İlgilenirseniz çok memnun olurum.

Saygılar

 

[Mdemir63]

Selamlar
Arkadaşlar kodlarda nasıl değişiklik yapmalıyım.
Saygılar

 

[leumruk]

Selamlar
Arkadaşlar kodlarda nasıl değişiklik yapmalıyım.
Saygılar

Merhaba,
Ne yapmak istediğinizi belirtirseniz, isteğinizi kolaylıkla halletmek mümkün olacaktır.
Dosya içinde açıklanmasını istediğiniz kodları açıklaması kısaca şöyle: "Excel dosyası içinde bulunan gizlenmiş "word nesnesini" görünür kıl ve aç ardından nesne simgesini yeniden gizle.
Muhtemelen sizdeki hatanın sebebi bu. Kod Word nesnesini açmak için talimat veriyor; ancak sizin dosyanızın içinde word nesnesi bulunmadığından işlem sonuçsuz kalıyor ve hata alıyorsunuz.

 

[Mdemir63]

Merhaba,
Ne yapmak istediğinizi belirtirseniz, isteğinizi kolaylıkla halletmek mümkün olacaktır.
Dosya içinde açıklanmasını istediğiniz kodları açıklaması kısaca şöyle: "Excel dosyası içinde bulunan gizlenmiş "word nesnesini" görünür kıl ve aç ardından nesne simgesini yeniden gizle.
Muhtemelen sizdeki hatanın sebebi bu. Kod Word nesnesini açmak için talimat veriyor; ancak sizin dosyanızın içinde word nesnesi bulunmadığından işlem sonuçsuz kalıyor ve hata alıyorsunuz.

Selamlar,

Hocam dediğiniz doğrudur herhalde. Çünkü başka bir dosyama buradaki kodları yazıp bir butona atıyorum. Ancak dediğiniz hatayı veriyor. Peki bu dediğiniz word nesnesini kullanmak istediğim dosyama nasıl getireceğim

Saygılar

 

[leumruk]

Selamlar,

Hocam dediğiniz doğrudur herhalde. Çünkü başka bir dosyama buradaki kodları yazıp bir butona atıyorum. Ancak dediğiniz hatayı veriyor. Peki bu dediğiniz word nesnesini kullanmak istediğim dosyama nasıl getireceğim

Saygılar

Merhaba,
Aşağıdaki kodla nesneyi görünür kılın. Sonrasında kopyalayıp kendi dosyanıza yapıştırın.

Sub Göster()
       ActiveSheet.Shapes("Picture 3").Visible = True
End Sub

 

[Mdemir63]

Merhaba,
Aşağıdaki kodla nesneyi görünür kılın. Sonrasında kopyalayıp kendi dosyanıza yapıştırın.

Sub Göster()
       ActiveSheet.Shapes("Picture 3").Visible = True
End Sub

Selamlar,

Hocam teşekkür ederim.

Saygılar