| Yazar | Mesaj |
mehoza
| | Tarih: 15.02.2007, 23:54 Mesaj konusu: ENH Profil Çizim Programı | |
| Program içmesuları boy profili çiziminde kullanılıyor.
Ancak ufak bir değişiklikle ENH Profilinin çiziminde de kullanılalabilir.
Açıklama excel içerisinde
Faydalı olacağına inanıyorum
|
|
|
|
mehoza
| | Tarih: 19.02.2007, 12:00 Mesaj konusu: güncelleme | |
| ENH profili çizmek için kullanılan ve düzeltme yapılan excel dosyasa ektedir.
|
|
basaranbilal
| | Tarih: 19.02.2007, 14:36 Mesaj konusu: yardım | |
| verdiğiniz dosyayı indirdim
fakat autocad i çalıştırdığımda asa makrosunu bulamıyorum. bende autocad 2007 var bunla alakalı olabilirmi. yardımcı olursan sevinirim.
|
|
mehoza
| | Tarih: 19.02.2007, 16:43 Mesaj konusu: asa | |
| AutoCAD 2007'de de çalışıyor.
bunun için aşağıdaki işlemi yapıyoruz.
egehal.xls dosyasını c: ' nin içine kaydettikten sonra
1-AutoCAD’i açıp tools menüsünden macro-load project’i seçip açılan open VBA Project’ten asa dosyasının bulunduğu konumu seçip aç’a tıklıyoruz.
2- Sonra tools menüsünden macro-run yapıp asayı çalıştırıyoruz. Profil çizilmiş oluyor.
|
|
Yasin38
| | Tarih: 20.02.2007, 14:27 Mesaj konusu: | |
| Aç dediğimiz zaman xls uzantılı dosyayı almıyor. Hata veriyor.
Daha doğrusu asa dosyasının yeri tam olarak neresi onu anlamadım.
Burda anlatırken kaçırdığınız bir nokta olmalı, detaylı anlatırsanız sevinirim.
|
|
basaranbilal
| | Tarih: 20.02.2007, 14:36 Mesaj konusu: asa | |
| evet mehoza kardeş şu elektrik hatları için asa dosyasını göndermemişsin onu da gönderebilirsen sevinirim
|
|
mehoza
| | Tarih: 20.02.2007, 14:38 Mesaj konusu: asa makrosu | |
| asa makrosu boykesit programi.rar'ın içinde ama yine de ben tekrar gönderiyorum
|
|
basaranbilal
| | Tarih: 20.02.2007, 14:42 Mesaj konusu: cevap | |
| mehoza kardeş bu dosyaya göre bizim dikey yükseltiler yer altında çıkıyor bunu düzeltip gönderebilirmisin
saygılarımla
|
|
Yasin38
| | Tarih: 20.02.2007, 15:22 Mesaj konusu: | |
| Ben yaptım ama çalışmadı, daha doğrusu aşağıdaki hatayı verdi.
Bu arada asa dosyasının nerede olacağı önemli mi?
Makro da aşağıdaki kısımda hata verdi belki ora düzelse bile belki başka yerlerde de verebilir.
Set txtyazı = ThisDrawing.ModelSpace.AddText(FormatNumber((xlsheet.Cells(i, 4) - xlsheet.Cells(i, 5)) / (10 * (xlsheet.Cells(i + 1, 1) - xlsheet.Cells(i, 1))), 4), yazı, 2)
'txtyazı.Rotate yazı, 3.14 / 2
|
|
mehoza
| | Tarih: 20.02.2007, 17:30 Mesaj konusu: program düzgün çalışıyor | |
| program yazılanlar aynen uygulanırsa düzgün çalışıyor.
makro yeri önemli değil yeterki makronun bulunduğu yeri düzgün gösterin.
çizim gereği bazen çizim aşağıda yazılar yukarıda görünüyor.
bu da normal, zaten bize profil kısmı lazım. profil dışındaki kısımları silersiniz
|
|
|
