MACRO - Quota Filettatura

Be_on_edge

Moderatore
Membro dello Staff
Professione: Progettazione
Software: Solid Edge
Regione: Emilia Romagna
Come richiesto in una precedente discussione ecco la macro per quotare le filettature.

Si selezionano le quote in cui si vuole far comparire il nome della filettatura ed eliminare il valore visualizzato.

Fatemi sapere cosa ne pensate e/o cosa implementare.

Vedi l'allegato Quota Fil.rar

Ciao
 

cacciatorino

Moderatore SolidEdge
Membro dello Staff
Professione: Ingegnere meccanico
Software: SolidEdge CoCreate Salome-Meca
Regione: Porto Recanati, ma con l'appennino nel cuore
Provata sulla V18 D&D e funziona.
 

cacciatorino

Moderatore SolidEdge
Membro dello Staff
Professione: Ingegnere meccanico
Software: SolidEdge CoCreate Salome-Meca
Regione: Porto Recanati, ma con l'appennino nel cuore
Pensandoci:
sarebbe fattibile, a livello di programmazione, che la macro mi apra un pop-up dal quale scegliere un suffisso da applicare al gruppo di quote selezionate, tipo:

- N.4 a 90°
- passante
- Prof. fil. %TD

Magari personalizzabili dall'utente.
 

Be_on_edge

Moderatore
Membro dello Staff
Professione: Progettazione
Software: Solid Edge
Regione: Emilia Romagna
Pensandoci:
sarebbe fattibile, a livello di programmazione, che la macro mi apra un pop-up dal quale scegliere un suffisso da applicare al gruppo di quote selezionate, tipo:

- N.4 a 90°
- passante
- Prof. fil. %TD

Magari personalizzabili dall'utente.
Si è fattibile ma di fatto questo lo fai già con il comando "Prefisso" che funziona anche su un gruppo di quote selezionate.

Ciao
 

vespa_83

Utente Standard
Professione: disegnatore
Software: Solid Edge
Regione: Romagna
io mi sono abituato ad usare il Richiamo di testo per non usare le quote.
poi o parte la freccia da un bordo foro o lo metto in orizontale/verticale con la freccia che tocca solo un bordo, non è brutto da vedere.

impostazioni salvate
n°2 fori %HC , n°4 fori %HC, ...

e ho corretto in Richiamo/Profondità Smart/Profondità Filettatura con:
utile %TD
 

cacciatorino

Moderatore SolidEdge
Membro dello Staff
Professione: Ingegnere meccanico
Software: SolidEdge CoCreate Salome-Meca
Regione: Porto Recanati, ma con l'appennino nel cuore
io mi sono abituato ad usare il Richiamo di testo per non usare le quote.
Si, infatti sarebbe la modalita' predefinita di SE che e' progettato secondo lo standard americano (ANSI) ma i richiami non sono contemplati nello standard ISO.

P.S. Ho richiesto sia sul forum americano che presso il mio rivenditore che venga riconosciuto il filetto anche sulle quote standard secondo ISO, e non solo sui callout, ma per adesso nessuna risposta.
 

Focus

Moderatore
Membro dello Staff
Professione: Odio il sitema italiota e gli italioti di professione.
Software: Solid Edge
Regione: Toscana
Ottima macro, molto utile! è possibile mettere a zero in automatico la "Distanza Prefisso/Suffisso" in modo da centrare la quota in automatico?.


Grazie e ciao
 

looksin87

Utente Junior
Professione: disegnatore
Software: solid edge st4
Regione: abruzzo
buongiorno e scusate l'ignoranza in materia...ma come faccio a lanciare un file.rar nel solid edge?
 

Tequila

Utente Senior
Professione: teorico del paleocontatto
Software: Solid Edge ST7, scarabocchi su carta
Regione: Veneto (PD)
buongiorno e scusate l'ignoranza in materia...ma come faccio a lanciare un file.rar nel solid edge?
non lo lanci... il .rar è un file compresso. Devi scompattarlo tramite programmi appositi che trovi tranquillamente sul web (winrar, 7zip, powerarchiver, winzip, ecc.) ed una volta estratto il contenuto lo lanci con solid edge
 

vespa_83

Utente Standard
Professione: disegnatore
Software: Solid Edge
Regione: Romagna
con SolidEdge dalla versione ST4:
per quotare M10 un foro puoi scegliere dal pulsante "tipo di quota" (sezione "Tolleranza") il tipo "Richiamo Foro"
che fa la stessa cosa della Macro in oggetto a questo topic
 

f.d

Utente poco attivo
Professione: ingegnere
Software: Inventor
Regione: Piemonte
Ciao, grazie mille della macro!

Per caso riusciresti a condividere il codice sorgente, se ce l'hai ancora? Vorrei fare lo stesso ma invece di aggiungere %TS vorrei aggiungere %DI (senza nascondere la quota) in modo da mettere in batch il simbolo del diametro davanti a tutti i diametri selezionati.

So che potrei farlo con Seleziona - Prefisso ma sono pigro nell'anima, e un tasto diretto sarebbe più comodo 😅
 

Be_on_edge

Moderatore
Membro dello Staff
Professione: Progettazione
Software: Solid Edge
Regione: Emilia Romagna
Ciao, grazie mille della macro!

Per caso riusciresti a condividere il codice sorgente, se ce l'hai ancora? Vorrei fare lo stesso ma invece di aggiungere %TS vorrei aggiungere %DI (senza nascondere la quota) in modo da mettere in batch il simbolo del diametro davanti a tutti i diametri selezionati.

So che potrei farlo con Seleziona - Prefisso ma sono pigro nell'anima, e un tasto diretto sarebbe più comodo 😅
Eccolo (non mi ricordavo nemmeno dell'esistenza di questa macro 😅 )

Codice:
Dim objApp As SolidEdgeFramework.Application
Dim objDft As SolidEdgeDraft.DraftDocument

Sub Main()

    Set objApp = GetObject(, "SolidEdge.Application")
    Set objDft = objApp.ActiveDocument

    For Each Item In objDft.SelectSet
        
        Item.DisplayType = igDimDisplayTypeBlank
        Item.PrefixString = "%TS"
    
    Next Item
    
    Set objDft = Nothing
    Set objApp = Nothing
    
End Sub