SolidWorks için ilginç Makro

  • Konuyu başlatan Konuyu başlatan cubalibre00
  • Başlangıç tarihi Başlangıç tarihi
İyi sabaha,
Birisi otomatik olarak oluşturulan dosyayı atamak için bir .dwg (yarı 2000) oluşturmanıza izin veren bir makro varsa bilir:
filename_gang indexrevizyon indeksi, masadaki modelin özellikleri arasındadır.

Örneğin:

3d model: case123. revizyon index b
2d_sw: cassa123.slddrw (sadece ve her zaman 3d modelle bağlantılı)
2d_dwg: cassa123_b.dwg ( revizyon ile ilgili çok sayıda çizim)

.dwg'de tasarruf eden bir makroa sahip olmak ve bu şekilde revizyon indeksinin değiştirilmediğini yazmak güzel olurdu.

Tüm önceden sayesinde.
 
.dxf veya .dwggg
ve
.step veya .igs içinde dönüşüm parçası / birlikte;
Bir makro var mı?
 
Herkes bir sette bulunan tüm eksenleri seçen bir makro hakkında biliyor ve onları esnek veya katı hale getiriyor mu? Elle bunu yapmayı başardım, ama her seferinde makro'u yeniden kaydetmeniz gereken yeni toplantıları ekledim...

Teşekkür ederim.
 
.dxf veya .dwggg
ve
.step veya .igs içinde dönüşüm parçası / birlikte;
Bir makro var mı?
Katı iş sitelerinden gelen makroı yapıştırıyorum ve sonra gizli olarak değiştirildim.
Bir açılış tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım Ve makro çalıştırın bir arayüz görünecektir
Aşağıdaki formatlarda ihracat olasılığı ile:
-pdf
- Evet.
-pdf and dxf
-pdf ve dxf ve adım


Merhaba.
Gabriele
 

Ekli dosyalar

Herkese merhaba

Size bir makro inşa etmeye başlayan bir rehber olup olmadığını sormak istedim?

Fikri daha iyi hale getirmek için, yapmak istediğim şey, bir dizi değer ve bu çizim objelerinden başlayarak mükemmel bir dosyadan okunur.
Bir başlangıç olarak, basit bir çember ve ekstrüderin nasıl atılacağını anlamak istiyorum, bir dikdörtgen çizer ve ekstrüder, bir nesne döndürür ve belirli bir pozisyona taşınırdım.

Teşekkür ederim.
 
Katı iş sitelerinden gelen makroı yapıştırıyorum ve sonra gizli olarak değiştirildim.
Bir açılış tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım tasarım Ve makro çalıştırın bir arayüz görünecektir
Aşağıdaki formatlarda ihracat olasılığı ile:
-pdf
- Evet.
-pdf and dxf
-pdf ve dxf ve adım


Merhaba.
Gabriele
Yaptığım iş için bu çok uygun makroayı aldım ve indirdim ama kurtarma klasörüni değiştiremiyorum ya da daha iyi bunu asla kabul etmediğim gibi masaüstü dışında hiçbir yere koyabilirim.


Teşekkür ederim.
 
Yaptığım iş için bu çok uygun makroayı aldım ve indirdim ama kurtarma klasörüni değiştiremiyorum ya da daha iyi bunu asla kabul etmediğim gibi masaüstü dışında hiçbir yere koyabilirim.
Teşekkür ederim.
Bu şekilde kodu değiştirmeye çalışın:

......Cevap = vsno o zaman
Dosya adı = createobject ("wscript.shell.shell.shell.shell.type("desktop") & "\" & right(filename, len(filename) - len(workdir)
Başka bir yanıt = vscancel o zaman......


I tried and works (swx 2012 sp.4 on win7 64bit)
Bye.
 
Teşekkür ederim! !!

Küçük bir not satırında "desk üst" bir hata var, bunun yerine masaüstü

Merhaba.
 
stesso problema consearcho codiceo diceto per caso?

dim boolstatus as boolean
dim longstatus uzun, uzun zamandır, uzun zamandır

alt ana()

Set değiştirici = _
Uygulama.sldworks

Bölüm = exchangep.activedoc

spathname = part.getpathname
srev = part.custominfo ()
Elenco_rev = "abcdefghilmnopqrstuvz"
K = 0
w = ""
x = 1 to len(spathname)
y = orta (spathname, x, 1)
Eğer y = ""
w = w + y
Eğer y = "\" o zaman
k = k + 1
w = ""
Sonunda, eğer sona erirse
Sonraki x x x x
ex:
a = "c:\utenti\ufftecnico2\desktop" + w + ".step"
b = w + ".x_t"
Uzunstatus = part.saveas3 (a, 0, 0)
Uzunstatus = part.saveas3 (b, 0, 0)
Sonunda alt alt
 
Teşekkür ederim! !!

Küçük bir not satırında "desk üst" bir hata var, bunun yerine masaüstü

Merhaba.
Lütfen:rolleyes:
Bunun nedeni değil, ancak bu forumdaki kodu bu forumda, masaüstü yazının kendi kendine ait olduğuydu:confüzyon:


nispeten son yazı problemin olduğunu düşünüyorum:
"kullanıcılar", İtalyan pencereleri kullanıyorsanız bile "kullanıcılar" olarak değiştirildi.
....\desktop" son darbeyi özlüyor: ....\desktop\"


Bye.
 
Lütfen:rolleyes:
Bunun nedeni değil, ancak bu forumdaki kodu bu forumda, masaüstü yazının kendi kendine ait olduğuydu:confüzyon:


nispeten son yazı problemin olduğunu düşünüyorum:
"kullanıcılar", İtalyan pencereleri kullanıyorsanız bile "kullanıcılar" olarak değiştirildi.
....\desktop" son darbeyi özlüyor: ....\desktop\"


Bye.
"çok ilginç makro" ünvanı

Teşekkür ederim çok teşekkür ederim
 
Bu şekilde kodu değiştirmeye çalışın:

......Cevap = vsno o zaman
Dosya adı = createobject ("wscript.shell.shell.shell.shell.type("desktop") & "\" & right(filename, len(filename) - len(workdir)
Başka bir yanıt = vscancel o zaman......


I tried and works (swx 2012 sp.4 on win7 64bit)
Bye.
Macro very useful, onu değiştirmek için bir yardım istiyorum.
Dwg'deki dxfs kurtarmasını değiştirerek ilk adım, şimdi kurtarma dizisini değiştirmek istiyorum, bu:
Onları her zaman alt bir dizi "\pdf + dwg" içinde kurtarırım, ana kayıt değişiklikleri sözleşmeye göre.
Bu yüzden otomatik pozisyon almak için nasıl yapabilirim "z:\xxx\pdf + dwg."
Umarım açık oldum.
Bu makro için teşekkürler ve tebrikler.
 
ciao, sto ancora kanıtndo, l'ho modta in Questo modunda:İşdir = exchangep.getcurrentworkingdirectory & ("pdf + dwg") & "\" şu anki dizinMesaj kutusunda bana doğru yolu gösterir, ancak dosyalar her zaman beni iş dizininde kurtarır.
Nerede yanlışım?
Bye.
 
ciao, sto ancora kanıtndo, l'ho modta in Questo modunda:İşdir = exchangep.getcurrentworkingdirectory & ("pdf + dwg") & "\" şu anki dizinMesaj kutusunda bana doğru yolu gösterir, ancak dosyalar her zaman beni iş dizininde kurtarır.
Nerede yanlışım?
Bye.
Bölgedeki makroı değiştirdim ...workdir = takas.... ve dosya tanımında ‘önem’ için ilgili kod.
allego makro.


Merhaba.
Gabriele
 

Ekli dosyalar

Herkese merhaba, bu makrou bir latra rehberinde pdf dosyasını kurtarmak için değiştirmeye yardımcı olurum. Birisi bana yardım edebilir mi? Çok teşekkür ederim.
Makro aşağıdakidir.

metaal uden endüstrileri bvv
‘ ‘ ‘ www.metaalindustrieudenbv.nl‘ ‘ ‘ [email protected]dim Changep as object
dim part as object
dim boolstatus as boolean
dim longstatus uzun, uzun zamandır, uzun zamandır
dim locatie as string
dim locatie_aangepast as string
dim opendoc as object
dim extensie_nieuw as string
dim extensie_oud as string
dim retval as string
dim naam as string
dim naam_aangepast as string




alt ana()

Ayarlama = createobject ("sldworks.application")
swmodel = exchangep.activedoc
opendoc = exchangep.activedoc()

extensie_oud = ".slddrw"
extensie_nieuw = ".pdf"
locatie = opendoc.getpathname
locatie_aangepast = sol (locatie, len(locatie) - 7)
retval = dir$(locatie_aangepast & extensie_oud)
naam = dir$(locatie)
naam_aangepast = sol(naam, len(naam) - 7)
titel = opendoc.gettitle
titel = sol(titel, (len(titel))


Eğer retval = naam sonra
nretval = exchangep.sendmsgtouser2(naam_aangepast & " wordt geupdate!", swmbok)
Sonunda, eğer sona erirse


Bölüm = exchangep.activedoc
Uzunstatus = part.saveas3 (naam_aangepast & extensie_nieuw, 0, 0)
takas.closedoc titel
Sonunda alt alt
 
Merhaba.

tasarımlarımda her zaman özel boyut birimleri kullanmak istiyorum: özellikle "mmgs (millimeter,gram, saniye)" dan ayrılıyorum ve gramı kilogramla değiştiriyorum.
Yeni dosyalarda sorun yok (özel bir şablon yarattım) ama eski dosyalar için bunu bir tane ve prosedür kesinlikle yavaş.

Bu birim değişikliği işlemi hızlandırabileceğiniz bir makro biliyor musunuz? Belki belirli birimler kurdular ve basit bir oyunla onları yere koyuyorlar:


Bana yardım et... Teşekkür ederim!
 

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