vba ile autocad dwg dosyası açma (yardım)

[berks]

kolay gelsın arkadaşlar herkese

ben excelde bır commandbutton komutu oluşturdum.bu butona tıkladıgımda bilgisayarımdaki bir autocad(dwg) dosyasının açılmasını ıstıyorum,

butona tıkladıgımda excel(xls) olarak dosya açtırabılıyorum,fakat dwg dosyalarında hata verıyor

bana bır ornek gosterebılırsenız sevınırım.şimdiden teşekkürler...

 

[Emir Hüseyin Çoban]

Merhaba,
dwg dosyasını çalıştıran bir program olmadan açamazsınız. Excelden o programın exe sine gidip, daha sonra o programla dwg dosyasını açabilirsiniz.

 

[efeksk]

Sn. berks
.dwg uzantısı bir mühendislik programı olan autocad programının uzantısıdır. Bahsetmiş olduğunuz dosyayı görüntülemek için ilmi çok derin bir dil gerekir ki bunu vba ile başarmak tamamen imkansızdır. Ha hüseyincoban arkadaşımında dediği gibi eğer sisteminizde AutoCad yüklü ise onun .exe sinibulup vba da kısa yol olarak bir makro ile bağlayabilirsiniz ki bu çok gereksiz bir uygulama olur.

Kolaylıklar dilerim

 

[berks]

teşekkürler arkadaşlar sonunda hallettım ,

 

[cebelitarık]

Sayın Berks
Sorunu nasıl hallettiğinide bizimle paylaşırsan menun oluruz.
Sonunda çözümü kendinize saklayınca bir anlamı olmuyor.
Saygılarımla

 

[Skorpiyon]

Merhabalar,

Bilgisayarınızda Autocad programı yüklü ise ".dwg" uzantılı bir çizimi aşağıdaki şekilde açabilirsiniz. Bende A9Cad isimli bir program yüklü idi. Siz kodu uygun şekilde değiştirin.

Shell Dosya Yolu & Açılacak dosya ismi & ".dwg"

Shell "C:\Program Files\A9Tech\A9Cad\A9Cad.exe &D:\" & cizim1 & ".dwg "

 

[berks]

Private Sub CommandButton1_Click()
CreateObject("Shell.Application").Open _
"\\Bilgisayar adı\d\RESİMLER\firma RESİMLER\dosya ismi.dwg"
End Sub

Dosya Ağ üzerinden kullanılacagı için bu şekilde hazırladım çalıştı.

herkese teşekkürler