Englische Ansicht

2D plans Layout
1

Hallo

Wenn ich den 2D-Plan einer Baugruppe erstelle, stelle ich fest, dass die Ansichten englisch sind (Draufsicht oben) 

Im soliden Jahr 2018 kann ich die Option für die Ansichten in ISO nicht finden

Vielen Dank

2

Hallo

US-Ansichten, meinen Sie?

Klicken Sie mit der rechten Maustaste auf das Planblatt > Eigenschaften > Projektionstyp (aktivieren Sie Europa oder USA)


vues.png
6 „Gefällt mir“
3

re

OK es funktioniert, aber wie man es standardmäßig einstellt

1 „Gefällt mir“
4

Re

Klicken Sie im SolidWorks Banner > Einstellungen speichern/wiederherstellen > Tools


bandeau.png
2 „Gefällt mir“
5

Es ist besser, eine Datei in der US-Ansicht zu haben als eine Datei, die auf Englisch ausgeführt wird.

 

NEIN, ohne sich den Kopf zu schlagen.............. Zu spät ist schon weit weg

7 „Gefällt mir“
6

Um es standardmäßig zu verwenden, müssen Sie die Dokumentvorlage (DRWDOT) und die Grundkarten (SLDDRT) ändern 

Für vorhandene Aufnahmen kann ein anklickbares Makro nützlich sein, aber es gibt die Ansichten zurück

Persönlich verwende ich dies, um die Grundkarten neu zu laden:

Sub main()

Dim swApp           As SldWorks.SldWorks
Dim swModel         As SldWorks.ModelDoc2
Dim swDraw          As SldWorks.DrawingDoc
Dim swSheet         As SldWorks.Sheet
Dim vSheetProps     As Variant
Dim nErrors         As Long
Dim nWarnings       As Long
Dim sFileName       As String
Dim Path            As String
Dim vSheetName      As Variant
Dim i               As Long
Dim Part            As Variant


'***************************************
' Location des fonds de plans
Const sTemplatePath As String = "****A REMPLACER PAR LE DOSSIER CONTENANT LES FOND DE PLANS"

' Noms des templates
'Première page
Const sTemplateName As String = "***A REMPLACER PAR NOM DE FOND DE PLAN PREMIERE PAGE .SLDDRT"
Autres pages
Const sTemplateName2 As String = "***A REMPLACER PAR NOM DE FOND DE PLAN AUTRES PAGES .SLDDRT"
'***************************************
'vérification si plan ouvertt
On Error Resume Next
Set swApp = Application.SldWorks
Set swModel = swApp.ActiveDoc
' Check to see if a drawing is loaded.
If swModel Is Nothing Then
        MsgBox "Il faut ouvrir un plan avant de lancer la macro !"
        Exit Sub
End If
If swModel.GetType <> swDocDRAWING Then
        MsgBox "Il faut ouvrir un plan avant de lancer la macro !"
        Exit Sub
End If
'***************************************
'*************************************** Hop, on se charge de la page 1
Set swDraw = swModel
    vSheetName = swDraw.GetSheetNames
        swDraw.ActivateSheet (vSheetName(i))
        Set swSheet = swDraw.GetCurrentSheet
        vSheetProps = swSheet.GetProperties
        
    'Supression de la table "feuille x/x"
    Set Part = swApp.ActiveDoc
    boolstatus = Part.Extension.SelectByID2("", "ANNOTATIONTABLES", 0.361350915138288, 7.25042891639636E-02, 0, False, 0, Nothing, 0)
    Part.EditDelete
    
    'Chargement du nouveau fond de plan
    swModel.SetupSheet5 swSheet.GetName, swDwgPapersUserDefined, swDwgTemplateCustom, vSheetProps(2), vSheetProps(3), True, sTemplatePath & sTemplateName, 0.4318, 0.2794, "Default", True
    swDraw.ViewZoomtofit2
    
    'Selection du calque "selon la norme"
    Set Part = swApp.ActiveDoc
    Set LayerMgr = Part.GetLayerManager
    LayerMgr.SetCurrentLayer ("-Selon la norme-")


'*************************************** Puis toutes les autres pages
For i = 1 To UBound(vSheetName)

        swDraw.ActivateSheet (vSheetName(i))
        Set swSheet = swDraw.GetCurrentSheet
        vSheetProps = swSheet.GetProperties
        
        'Supression de la table "feuille x/x"
        Set Part = swApp.ActiveDoc
        boolstatus = Part.Extension.SelectByID2("", "ANNOTATIONTABLES", 0.361350915138288, 7.25042891639636E-02, 0, False, 0, Nothing, 0)
        Part.EditDelete
        
        'Chargement du nouveau fond de plan
        swModel.SetupSheet5 swSheet.GetName, swDwgPapersUserDefined, swDwgTemplateCustom, vSheetProps(2), vSheetProps(3), True, sTemplatePath & sTemplateName2, 0.4318, 0.2794, "Default", True
        swDraw.ViewZoomtofit2
        
        'Selection du calque "selon la norme"
        Set Part = swApp.ActiveDoc
        Set LayerMgr = Part.GetLayerManager
        LayerMgr.SetCurrentLayer ("-Selon la norme-")

'*************************************** Sauvegarde et fin
Next i
    swDraw.ActivateSheet vSheetName(0)
    swDraw.ForceRebuild3 False
    swDraw.Save3 1, nErrors, nWarnings
        
Set swDraw = Nothing
   

End Sub


 

1 „Gefällt mir“
7

Die richtige Antwort ist nämlich die Kumulation zwischen  @Vincent G und @ DELACOTE.

Sie müssen die Zeichnung "Vorlage" öffnen, indem Sie auf "Öffnen" klicken und die Erweiterung "Vorlagen" einfügen und die Datei "Layout.drwdot" öffnen, um die Standardvorlage zu öffnen.

Dann müssen Sie die "Blatteigenschaft" in den Projektionstyp "Europa" ändern und OK drücken.

Speichern Sie die Vorlage, und schließen Sie sie.

Bei der nächsten Aufnahme ist der Projektionstyp standardmäßig europäisch.

Bitte schön

3 „Gefällt mir“
8

So stellen Sie das Modell richtig ein, da viele Parameter geändert werden müssen (Dokumentoptionen/-eigenschaften): Ansichten (einschließlich Schnitte), Bemaßungen, Anmerkungen, ...

3 „Gefällt mir“
9

Sie können Ihre eigene Registerkarte erstellen, wenn Sie neue Dokumente öffnen, indem Sie Ihre eigenen Vorlagen (Artikel, Baugruppe und Zeichnung) in einem persönlichen Ordner erstellen (Geben Sie Ihren Namen in den Ordner ein; dies ist der Name der Registerkarte).

Zeigen Sie dann auf diesen Ordner (Option / Dateispeicherorte / Dokumentvorlagen und drücken Sie "Hinzufügen" und gehen Sie in den Ordner mit Ihren Vorlagen.

3 „Gefällt mir“
10

Hallo

Ok, ich habe eine Zeichnung 1 erstellt, die ich gespeichert habe, und dann habe ich sie auf Standard gesetzt.

Danke für Ihre Hilfe