Ole Nesnesİ

[uzmanbey]

arkadaşlar örnek uygulama ektedir yardımlarınızı bekliyorum

 

[uzmanbey]

cevap yokmu arkadaşlar

 

[modalı]

Sayın uzmanbey,

Lütfen forum kurallarını okuyun. Sorularınızı üşenmeden açık olarak forum üsütünden sorun ki hem yardım edeceklere hem forumu inceleyenlere kolaylık olsun.

Siz bir satırlık yazı yazmaktan üşeniyorsunuz, bazen cevapları bulabilmek günleri alıyor.

 

[uzmanbey]

saygı değer üstadım eğer örneği incelediyseniz yeterince açıklama var (örneğin üzerinde)

 

[serkandemirci]

soru anlaşılmadı galiba uzmanbey

 

[serkandemirci]

uzmanbeyin yapmaya çalıştığı şey şu

bir nesneye Word belgesi eklenirken sağ click yapmadan direk açılması anladığım kadarıyla

 

[serkandemirci]

Private Sub Komut16_Click()
If Me.Nesne.OLEType <> acOLENone Then
DoCmd.GoToControl "Nesne"
DoCmd.RunCommand acCmdOLEObjectDefaultVerb
End If
End Sub

 

[modalı]

Sayın serkandemirci

Sanırım bu kodda aynı işi yapıyor. Ayrıca bir word belgesi açmıyor.

İyi çalışmalar

 

[uzmanbey]

sayın serkan demircinin verdiği kodları uyguladım sonuç ekli dosyada

 

[modalı]

Evet ama ilk gönderilen örnekte OLE nesnesinin içeriği görünüyor, ikonu değil. Aradaki fark bu.

Ben gömülü ole nesnesi kullanmıyorum, fotoğraf kullanmadığım gibi. Word dökümanlarını dosya halinde tutuyorum.

İyi çalışmalar

 

[uzmanbey]

say&#305;n modal&#305; ben de bukadar ileri gidebildim
umar&#305;m sizin gibi &#252;statlar cevap verirler
biz daha &#231;&#246;meziz sizi hayranl&#305;kla izliyoruz

hocam acaba 2gb fazla veri g&#246;mebilirmiyiz
http://excel.web.tr/forumdisplay.php?f=58
uygulama nas&#305;l olmu&#351;