VBA di Solidworks

titurbina

Utente Junior
Professione: studente
Software: Excel,Fluent
Regione: Lazio
#1
Come devo fare a togliere la richiesta fastidiosa di conferma della quota in VBA di Solidworks.
MI spiego meglio:
Nella macro sotto indicata inserisco attraverso VBA di Solidworks un rettangolo , ma quando devo confermare la quota il programma si ferma e mi richiede la conferma, come da allegato in Pdf, come faccio a non farmi richiedere ogni volta la conferma ?


vSkLines = Part.SketchManager.CreateCornerRectangle(XPianoCoord, YPianoCoord, ZPianoCoord, XRettangolo, YRettangolo, ZRettangolo)
Set Part = swApp.ActiveDoc
Set SelMgr = Part.SelectionManager
boolstatus = Part.Extension.SelectByID2("Piano frontale", "PLANE", 0, 0, 0, False, 0, Nothing, 0)
Part.SketchManager.InsertSketch True
Part.ClearSelection2 True
Grazie
:finger::finger::smile::smile:
 

Allegati

jenuary

Utente Standard
Professione: Progettista e Programmatore VB.Net
Software: Solidworks
Regione: Veneto
#2
Ciao,
per risolvere il tuo problema fai in questo modo:
- prima di inserire la quota o ad inizio del tuo modulo (deve essere sotto al settaggio della variabile swapp) inserisci questa riga

swapp.SetUserPreferenceToggle swInputDimValonCreate, False

Questo elimina la richiesta di conferma ed è come se andassi a togliere il flag "all'interno di Strumenti ->Opzioni ->Genarale -> "Chiedi il valore della quota in creazione".

Ti consiglio al termine della tua macro di scrivere

swapp.SetUserPreferenceToggle swInputDimValonCreate, True

in quanto resterebbe il flag disattivato non chiedendoti piu in fase di progettazione la conferma.

Con "swapp.SetUserPreferenceToggle" seguito da una variabile (vedi manuale Api) puoi personalizzare tutti i settaggi delle opzioni mediante macro.

Fammi sapere se funziona e se hai bisogno di altro fammi sapere, ti aiuto volentieri.

Buona programmazione
 

Paco

Utente Junior
Professione: Libero Professionista
Software: SWX-SEdge-Acad-Me10
Regione: Toscana
#4
Mi inserisco qui perchè potrebbe essere utile come discussione per raccogliere i problemi sulle varie VBA che troviamo o facciamo.
Io ho trovato la segunte che sarebbe utile, ma purtroppo non riesco a farla funzionare.
 

Allegati

jenuary

Utente Standard
Professione: Progettista e Programmatore VB.Net
Software: Solidworks
Regione: Veneto
#5
Scusami per il ritardo:rolleyes:
Ho amodificato la macro ed adesso è funzionante.
I motivi per cui non funzionava erano principalmente due:
- Non era dichiarata la variabile Swapp
- Il file di parte aperto deve avere una lunghezza di nomefile lunga più di 15 caratteri altrimenti da errore.
Nel caso ti servisse si può svilupparla inmodo tale da gestire gli errori e gestire le proprietà personalizzate da interfaccia o da file di testo esterno.
Io l'ho modificata sulla 2009, e in automatico ti si dovrebbero aggiornare i riferimenti per la 2010.:smile:
Fammi sapere se ti funziona.

Sono a disposizione per chi gli servisse aiuto nel limite delle mie conoscienze.:wink:

Ciao
 

Paco

Utente Junior
Professione: Libero Professionista
Software: SWX-SEdge-Acad-Me10
Regione: Toscana
#6
Scusami per il ritardo:rolleyes:
Ho amodificato la macro ed adesso è funzionante.
I motivi per cui non funzionava erano principalmente due:
- Non era dichiarata la variabile Swapp
- Il file di parte aperto deve avere una lunghezza di nomefile lunga più di 15 caratteri altrimenti da errore.
Nel caso ti servisse si può svilupparla inmodo tale da gestire gli errori e gestire le proprietà personalizzate da interfaccia o da file di testo esterno.
Io l'ho modificata sulla 2009, e in automatico ti si dovrebbero aggiornare i riferimenti per la 2010.:smile:
Fammi sapere se ti funziona.

Sono a disposizione per chi gli servisse aiuto nel limite delle mie conoscienze.:wink:

Ciao
Moolto gentile grazie. Ammetto che ne so ben poco di VBA e solo ora inizio a metterci il naso dentro. Mi rendo conto dell'importanza di poter fare almeno le cose poco più che banali per poter discuterne con te di questa macro, che ho trovato interessante per chi come me, ha da gestire i files con il sistema delle directory e dare con il nome del file dei riferimenti sia per le principali proprietà personalizzate ( univocità fra file e proprietà) oltre a permettermi di individuare a colpo d'occhio la cosa ricercata nell'elenco file. Esempio di denominazione di tubo in impianto piping: identificativo tubo(assieme in questo caso)-commessa-codice disegno = SPT001-300_C481PM1_PI-37380.
Ti chiedo se puoi allegare il file con il codice corretto che provo a spippolarci anch'io.
 

jenuary

Utente Standard
Professione: Progettista e Programmatore VB.Net
Software: Solidworks
Regione: Veneto
#9
Scusa ma l'allegato è una macro? che estensione è? non riesco sd aprirla.
Ciao:tongue:
 

jenuary

Utente Standard
Professione: Progettista e Programmatore VB.Net
Software: Solidworks
Regione: Veneto
#11
Ho visto che hai cambiato il nome delle proprietà.
La macro comè adesso è come ti interessa o la vorresti ampliata? non ho capito bene.
Ciao:wink:
 

Paco

Utente Junior
Professione: Libero Professionista
Software: SWX-SEdge-Acad-Me10
Regione: Toscana
#12
Beh! In effetti se ci fosse il modo di personalizzarla in modo un pò più semplice che non andando a contare quante lettere ci sono nel nome file, dove andare a tagliare, ecc. Tipo con un preview dei risultati inserendo maschere dati e simili...:biggrin: :4410:
 

jenuary

Utente Standard
Professione: Progettista e Programmatore VB.Net
Software: Solidworks
Regione: Veneto
#14
Eccomi, meglio tardi che mai.:biggrin:
Allego una mascherina riepilogativa di tre metodi per le proprieta del componente, dove a tuo piacere potrai divertirti e adattarlo alle tue esigenze.
Se hai qualche altra esigenza fammi sapere.
Io mi sono creato da tempo una addin sul taskpane (vedi immagine allegata), personalizzato secondo il mio standard.
Ciao e scusami per il ritardo, ma il lavoro mi pressa....:eek:
 

Allegati

Paco

Utente Junior
Professione: Libero Professionista
Software: SWX-SEdge-Acad-Me10
Regione: Toscana
#15
Eccomi, meglio tardi che mai.:biggrin:
Allego una mascherina riepilogativa di tre metodi per le proprieta del componente, dove a tuo piacere potrai divertirti e adattarlo alle tue esigenze.
Se hai qualche altra esigenza fammi sapere.
Io mi sono creato da tempo una addin sul taskpane (vedi immagine allegata), personalizzato secondo il mio standard.
Ciao e scusami per il ritardo, ma il lavoro mi pressa....:eek:
MITTICCOOO! Sei un ganzo. :4425:Se potessi ti darei un pò una mano nel lavoro per riconoscenza. Sono mooolto lontano dalle tue conoscenze di VBA ma ..pian piano mi avvicino.:36_1_12: