Ansys.com


Pagina 5 di 8 PrimaPrima ... 34567 ... UltimaUltima
Risultati da 41 a 50 di 73
  1. #41
    Utente Standard
    Iscritto dal
    2009
    Messaggi
    125
    Professione
    Ingegnere progettista
    Regione
    Toscana
    Software
    Solidworks - Inventor - Cosmos - Ansys

    Predefinito

    Buongiorno a tutti,
    qualcuno sa se esiste una macro che consenta in automatico di creare un .DWG (megli versione 2000) partendo da una tavola SW nominando il file creato come:

    nomefile_indice di revisione

    L'indice di revisione Ŕ tra le proprietÓ del modello nella tavola

    ESEMPIO:

    modello 3D: cassa123.sldprt con indice di revisione B
    tavola 2D_SW: cassa123.slddrw (unica e sempre collegata al modello 3D)
    tavola 2D_dwg: cassa123_B.dwg (disegni molteplici collegati alla revisione)

    Sarebbe bello avere una macro che salva in .dwg e rinomina in questo modo sovrascrivendo se l'indice di revisione non Ŕ cambiato.

    Grazie a tutti anticipatamente.

  2. #42
    Utente Standard
    Iscritto dal
    2008
    Messaggi
    189
    Professione
    Progettista
    Regione
    Emilia Romagna
    Software
    Solid Edge / Solid Works

    Predefinito

    trasformazione tavola tecnica in .DXF o .DWG
    e
    trasformazione parte/ assieme in .STEP o .IGS;
    avete una macro?

  3. #43
    Utente Standard L'avatar di Pablo
    Iscritto dal
    2008
    Messaggi
    334
    Professione
    Progettista
    Regione
    Piemonte
    Software
    Solidworks

    Predefinito

    Qualcuno sa di una macro che selezioni tutti gli assiemi contenuti in un assieme e li renda flessiili o rigidi? a mano sono riuscito a farlo, ma ogni volta che inserisco nuovi assiemi bisogna ri-registrare la macro.....

    grazie

  4. #44
    Utente Junior L'avatar di Gabryn
    Iscritto dal
    2007
    Messaggi
    82
    Professione
    Tiralinee
    Regione
    Bs
    Software
    Acad2012,Me10 10.5,Swx16 sp4

    Predefinito

    Citazione Originariamente Scritto da -Mc- Visualizza Messaggio
    trasformazione tavola tecnica in .DXF o .DWG
    e
    trasformazione parte/ assieme in .STEP o .IGS;
    avete una macro?

    Allego la macro scaricata tempo fÓ dal sito solidworks e poi discretamente modificata.
    Aprendo un disegno ed eseguendo la macro apparirÓ una interfaccia
    con la possibilitÓ di esportare nei seguenti formati:
    -pdf
    -dxf
    -pdf e dxf
    -pdf e dxf e step


    Ciao
    Gabriele
    File Allegati File Allegati
    -Quando tutto va bene, qualcosa andra' male. Corollari: 1. Quando non puo' andar peggio di cosi', lo -fara'.
    2. Se le cose sembrano andar meglio, c'e' qualcosa di cui non stiamo tenendo conto.

  5. #45
    Utente poco attivo
    Iscritto dal
    2014
    Messaggi
    3
    Professione
    Ingegnere Elettrico
    Regione
    Veneto
    Software
    Solidworks 2014

    Predefinito

    Ciao a tutti

    Volevo chiedervi se avete una guida per chi parte da zero con la costruzione di una macro?

    Per rendere meglio l'idea, quello che voglio fare Ŕ leggere da un file excel una serie di valori e a partire da questi disegnare gli oggetti.
    Come partenza vorrei capire come far disegnare a sw un semplice cerchio ed estrudere, tracciare un rettangolo ed estrudere, ruotare un oggetto e spostarlo in una specifica posizione.

    Grazie

  6. #46
    Utente Standard L'avatar di teseo
    Iscritto dal
    2011
    Messaggi
    427
    Professione
    Cantinaro
    Regione
    Lombardia
    Software
    solidworks2016 sp4.0, autocad2013, pochino solidedge st7

    Predefinito

    Citazione Originariamente Scritto da Gabryn Visualizza Messaggio
    Allego la macro scaricata tempo fÓ dal sito solidworks e poi discretamente modificata.
    Aprendo un disegno ed eseguendo la macro apparirÓ una interfaccia
    con la possibilitÓ di esportare nei seguenti formati:
    -pdf
    -dxf
    -pdf e dxf
    -pdf e dxf e step


    Ciao
    Gabriele
    ciao a tutti ho preso e scaricato questa macro molto comoda per il lavoro che faccio ma non riesco a cambiare la cartella di salvataggio o meglio riesco a metterala ovunque tranne che sul desktop come mai non mi accetta questa directory


    grazie ciao

  7. #47
    Utente Junior L'avatar di Gabryn
    Iscritto dal
    2007
    Messaggi
    82
    Professione
    Tiralinee
    Regione
    Bs
    Software
    Acad2012,Me10 10.5,Swx16 sp4

    Predefinito

    Citazione Originariamente Scritto da teseo Visualizza Messaggio
    ciao a tutti ho preso e scaricato questa macro molto comoda per il lavoro che faccio ma non riesco a cambiare la cartella di salvataggio o meglio riesco a metterala ovunque tranne che sul desktop come mai non mi accetta questa directory
    grazie ciao
    Prova a modificare il codice in questo modo:

    .......
    If Response = vbNo Then
    filename = CreateObject("WScript.Shell").specialfolders("Desk top") & "\" & Right(filename, Len(filename) - Len(WorkDir))
    ElseIf Response = vbCancel Then
    .......


    Io ho provato e funziona (Swx 2012 sp.4 su Win7 64bit)
    Ciao.
    -Quando tutto va bene, qualcosa andra' male. Corollari: 1. Quando non puo' andar peggio di cosi', lo -fara'.
    2. Se le cose sembrano andar meglio, c'e' qualcosa di cui non stiamo tenendo conto.

  8. #48
    Utente Standard L'avatar di teseo
    Iscritto dal
    2011
    Messaggi
    427
    Professione
    Cantinaro
    Regione
    Lombardia
    Software
    solidworks2016 sp4.0, autocad2013, pochino solidedge st7

    Predefinito

    grande grazie!!!!!!!

    un piccolo appunto c'Ŕ un errore nella riga "desk top" invece Ŕ desktop

    ciao

  9. #49
    Utente Standard L'avatar di teseo
    Iscritto dal
    2011
    Messaggi
    427
    Professione
    Cantinaro
    Regione
    Lombardia
    Software
    solidworks2016 sp4.0, autocad2013, pochino solidedge st7

    Predefinito

    stesso problema con questo codice ho provato in questo modo ma non fa nulla.....ho provato solo nella cartella utenti ma niente la cartella del desktop Ŕ protetta per caso?

    Dim boolstatus As Boolean
    Dim longstatus As Long, longwarnings As Long

    Sub main()

    Set swApp = _
    Application.SldWorks

    Set Part = swApp.ActiveDoc

    sPathName = Part.GetPathName
    SREV = Part.CustomInfo("Revisione")
    ELENCO_REV = "ABCDEFGHILMNOPQRSTUVZ"
    K = 0
    W = ""
    For X = 1 To Len(sPathName)
    Y = Mid(sPathName, X, 1)
    If Y = "." Then GoTo EX
    W = W + Y
    If Y = "\" Then
    K = K + 1
    W = ""
    End If
    Next X
    EX:
    A = "C:\utenti\ufftecnico2\desktop" + W + ".STEP"
    B = W + ".X_T"
    longstatus = Part.SaveAs3(A, 0, 0)
    longstatus = Part.SaveAs3(B, 0, 0)
    End Sub

  10. #50
    Utente Junior L'avatar di Gabryn
    Iscritto dal
    2007
    Messaggi
    82
    Professione
    Tiralinee
    Regione
    Bs
    Software
    Acad2012,Me10 10.5,Swx16 sp4

    Predefinito

    Citazione Originariamente Scritto da teseo Visualizza Messaggio
    grande grazie!!!!!!!

    un piccolo appunto c'Ŕ un errore nella riga "desk top" invece Ŕ desktop

    ciao
    Prego.
    Non s˛ perchŔ ma nell'incollare il codice in questo forum la scritta desktop Ŕ stata autocorretta in desk top


    Relativamente l'ultimo post penso che il problema sia:
    "utenti" Ŕ da cambiare in "users" anche se si usa Windows in italiano.
    .....\desktop" manca lo slash finale: .....\desktop\"


    Ciao.
    -Quando tutto va bene, qualcosa andra' male. Corollari: 1. Quando non puo' andar peggio di cosi', lo -fara'.
    2. Se le cose sembrano andar meglio, c'e' qualcosa di cui non stiamo tenendo conto.


  • Pagina 5 di 8 PrimaPrima ... 34567 ... UltimaUltima

    Discussioni Simili

    1. Macro solidworks
      Di matty nel forum Solidworks
      Risposte: 16
      Ultimo Messaggio: 03-02-2012, 11: 51
    2. Lavorare con solidworks 2005 e solidworks 2010
      Di angelogianni08 nel forum Altri CAD per la Meccanica
      Risposte: 5
      Ultimo Messaggio: 03-08-2011, 08: 58
    3. Aggiungere "TAG" a sottoscrizioni per trovare post interessanti
      Di reggio nel forum Proposte di modifiche al sito
      Risposte: 9
      Ultimo Messaggio: 27-01-2011, 16: 34
    4. Risposte: 2
      Ultimo Messaggio: 13-12-2010, 09: 36
    5. Link interessanti
      Di arri nel forum Lisp per Autocad
      Risposte: 3
      Ultimo Messaggio: 11-01-2008, 09: 14

    Segnalibri

    Segnalibri

    Permessi di Scrittura

    • Tu non puoi inviare nuove discussioni
    • Tu non puoi inviare risposte
    • Tu non puoi inviare allegati
    • Tu non puoi modificare i tuoi messaggi
    •  



    CAD3D.it - la community dei progettisti