ilogic kural aktivasyon

[tonygancio]

Her şeye merhaba, bir ilogic kuralı aktive etmek için anahtar bir kombinasyon oluşturmak için bir ipucuna ihtiyacım var.
Örneğin ctrl+p için bir kural yapmak istiyorum; bu kural başka bir kural başlatma görevine sahiptir ve sonra bir modül.
Bu otomatizmle, i.e. baskı ctrl+p Iproperty + diğer özel özellikleri eklemek için bir maske açın.
Çok teşekkür ederim!
Hayır hayır hayır

 

[Catafratto]

https://www.cadlinecommunity.co.uk/...9309-inventor-run-ilogic-rules-from- your-bon

 

[Catafratto]

Anahtar kombinasyonunuzu kurdele > özelleştirilmiş kullanıcı komutları üzerinde makro / düğmeye bağlayın

 

[tonygancio]

Bana bir hata mesajı verin, rastgele listedeki bir şeyi değiştirmem gerekiyor mu?

 

[Catafratto]

Hata mesajına bağlıdır.

 

[tonygancio]

Hata mesajına bağlıdır.

 

[Catafratto]

Public sub internal_ilogic()
"From" https://www.cadlinecommunity.co.uk/hc/en-us/articles/115000859309
dim addin as applicationaddin
dim addins as applicationaddins

set addins = thisapplication. Applicationaddins
Her Addin in addins
Eğer instr (addin.displayname, "ilogic") > 0 Sonra 0
Addin.activate
dim ilogicauto as object
set ilogicauto = addin. autoion
Çıkış için
Sonunda, eğer sona erirse
Bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki
Debug.print addin.displayname


dim externalrule as string
dim internalrule as string

Dışlama = "3d pdf"

internalrule = "regola0"

dim odoc belge olarak

set odoc = buapplication.activedocument
Eğer odoc bir şey değilse o zaman
msgbox "missing mucit document"
çıkış alt alt alt
Sonunda, eğer sona erirse

ilogicauto.runrule odoc, internalrule 'for internal rule
"ilogicauto.runexternalrule odoc, dışsal kural için"

Sonunda alt alt

Bir sözcü hatası vardı (kırmızı çizgiler)

mavi sıralarda kuralınızın adını koyar

 

[Catafratto]

Renkler gitti ama kuralların isimlerini koymanın aynı olduğunu düşünüyorum

 

[tonygancio]

Bir sözcü hatası vardı (kırmızı çizgiler)

mavi sıralarda kuralınızın adını koyar[/QUOTE]merhaba, her şeyden önce size yardım için teşekkür ederim, ama hala çalışmıyor... mavi çizgiler yok ve kural adını değiştirmek için bana açık değil. .
Size kuralın başlangıç olarak adlandırıldığını söyledim ve bunu baskılı ctrl+d ile etkinleştirebilmek istiyorum?
Çok teşekkür ederim!
Hayır hayır hayır

 

[Catafratto]

Daha az kötü sadece düz bir şeydi

Public sub internal_ilogic()
"From" https://www.cadlinecommunity.co.uk/hc/en-us/articles/115000859309
dim addin as applicationaddin
dim addins as applicationaddins
set addins = thisapplication. Applicationaddins
Her Addin in addins
Eğer instr (addin.displayname, "ilogic") > 0 Sonra 0
Addin.activate
dim ilogicauto as object
set ilogicauto = addin. autoion
Çıkış için
Sonunda, eğer sona erirse
Bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki
Debug.print addin.displayname

‘dim externalrule as string
dim internalrule as string

'externalrule = "3d pdf"

“ ► guarda qui! ---- ►
internalrule = "start"


dim odoc belge olarak
set odoc = buapplication.activedocument
Eğer odoc bir şey değilse o zaman
msgbox "missing mucit document"
çıkış alt alt alt
Sonunda, eğer sona erirse

ilogicauto.runrule odoc, internalrule 'for internal rule

"ilogicauto.runexternalrule odoc, dışsal kural için"

Sonunda alt alt

 

[Catafratto]

Ctrl-d için ayarlamanız gerekir, eğer daha yüksek okursanız zaten nasıl yapacağımı yazdım.

 

[Adahm]

Daha az kötü sadece düz bir şeydi

Public sub internal_ilogic()
"From" https://www.cadlinecommunity.co.uk/hc/en-us/articles/115000859309
dim addin as applicationaddin
dim addins as applicationaddins
set addins = thisapplication. Applicationaddins
Her Addin in addins
Eğer instr (addin.displayname, "ilogic") > 0 Sonra 0
Addin.activate
dim ilogicauto as object
set ilogicauto = addin. autoion
Çıkış için
Sonunda, eğer sona erirse
Bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki
Debug.print addin.displayname

‘dim externalrule as string
dim internalrule as string

'externalrule = "3d pdf"

“ ► guarda qui! ---- ►
internalrule = "start"


dim odoc belge olarak
set odoc = buapplication.activedocument
Eğer odoc bir şey değilse o zaman
msgbox "missing mucit document"
çıkış alt alt alt
Sonunda, eğer sona erirse

ilogicauto.runrule odoc, internalrule 'for internal rule

"ilogicauto.runexternalrule odoc, dışsal kural için"

Sonunda alt alt

Kısacası, her zaman onları size gönderdiğim çözümlere ihtiyacım var: teşekkür ederim!