Macro to add Prefix / Suffix on çizim kotaları

  • Konuyu başlatan Konuyu başlatan romy
  • Başlangıç tarihi Başlangıç tarihi

romy

Guest
İyi sabaha,

Bir metin eklemek mümkün mü, sembolü = tasarım ortamının kotalarına mı?

Sık sık sık simetrik kotaları işaret etmek için kullanırım ve her zaman elle yapılır, ancak bir makro çağıran bir düğme uygun olurdu

Herkes bana yardım edebilir mi?

Selamlar
 

Ekli dosyalar

  • Prefisso - Suffisso.jpg
    Prefisso - Suffisso.jpg
    22 KB · Görüntüleme: 24
İyi sabaha,

Bir metin eklemek mümkün mü, sembolü = tasarım ortamının kotalarına mı?

Sık sık sık simetrik kotaları işaret etmek için kullanırım ve her zaman elle yapılır, ancak bir makro çağıran bir düğme uygun olurdu

Herkes bana yardım edebilir mi?

Selamlar
"**************
"copyright(c) 2024 xarial pty sınırlı
"reference: Katı işleri kullanarak boyuta denklem ekleyin'license: Lisans lisansı"**************

dim, işleri mahvediyor. sldworks
dim swmodel as sldworks.modeldoc2
dim swselmgr as sldworks.selectionmgr

dize olarak eklenme = " = " = " ="
dize olarak eklenme = " ="

alt ana()

Ayarlama = uygulama. sldworks

swmodel = exchangep.activedoc

Eğer swmodel bir şey değilse o zaman

swselmgr = swmodel.selectionmanager

dim swdispdim as sldworks.displaydimension

swdispdim = swselmgr.gets selectedobject6 (1,1)

Eğer swdispdim hiçbir şey değilse o zaman
swdispdim.settext 1, prefix
swdispdim.settext 2, suffix
Başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka
msgbox "Lütfen boyutu seçin"
Sonunda, eğer sona erirse
Başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka
msgbox "Lütfen açık model"
Sonunda, eğer sona erirse

Sonunda alt alt

selezioni la kota e lanci la makro.

Modeificato Questa
 

Ekli dosyalar

Merhaba ve teşekkür ederim

Mükemmel işler

Orada olduğundan...:-)

Kutunun altında bile mümkündür?

Görüntüden mi?

Teşekkür ederim.
 

Ekli dosyalar

  • Casella testo.jpg
    Casella testo.jpg
    12.2 KB · Görüntüleme: 18
İyi sabahlar.

Hepinize teşekkürler

Her iki yöntem de denedim

Bir makro kusuru, bir tane seçmek zorunda olduğunuz olasılıklardır

+ctrl ile multiseleksiyona sahip olmak için değişebilirseniz bilmiyorum

Selamlar
 
Masonik bahane

Kimseye saygı duymak istemiyordum

Sadece bana verilmezdi ama tüm kullanıcılar için

Elbette her şey daha iyi

Selamlar
 

Ekli dosyalar

Hi giancarlo,

Mükemmel bir ejderhasın

Her şey çalışır ve şimdiden ona özelleştirilmiş oldum

Bunu daha da zor yapacağım...

Deliğin üzerine bile mümkün mü?

En son rigo'ya bir sıçrama eklemek istiyorum

Selamlar
 

Ekli dosyalar

  • Didascalia.jpg
    Didascalia.jpg
    30.3 KB · Görüntüleme: 19
Hi giancarlo,

Mükemmel bir ejderhasın

Her şey çalışır ve şimdiden ona özelleştirilmiş oldum

Bunu daha da zor yapacağım...

Deliğin üzerine bile mümkün mü?

En son rigo'ya bir sıçrama eklemek istiyorum

Selamlar
Hızlı bir şekilde, seçim kotalarının çeşitli tür olduğunu unutmayın, böylece herhangi bir metinlerin eklenmesi bile zaten mevcut metni korumalıdır.
Bunu, sağlam işlerden yardım ederek değiştirmeye çalışabileceğinizden beri.
 

Ekli dosyalar

Herkese merhaba

Yazıyı makro kibar olarak kullandığım gibi gönderiyorum.

Ama bir şey fark ettim:

Makro uygularken, dalgaların parametrelerini silmeye ve basit metindeki parametreleri basit metinde hemen patlamaya gider.

Bu parametrik notlar yapar ve örneğin delik veya lamatura ölçümlerini değiştirirsem bu güncellemeyi güncellemez

Doğru olmak mümkün mü?

Selamlar
 

Ekli dosyalar

  • Errore macro.jpg
    Errore macro.jpg
    221.5 KB · Görüntüleme: 9

Forum İstatistikleri

Konular
58,521
Mesajlar
499,056
Kullanıcılar
104,110
Son Üye
ChristianR

Çevrimiçi Üyeler

Şu anda çevrimiçi üye yok.
Geri
Üst