---

Guten Tag
Ich möchte gerne ein paar änderungen in der Stilbibliothek vornehmen. Ich gebe die änderungen im Stil und Normen Editor ein, und kann sie dann für das aktuelle Dokument speichern. Aber der Befehl 'Stile in Stilbibliothek speicher' ist nicht aktiv. Warum ist das so? Wie kann ich denn die Stilbibliothek für alle Dokumente ändern?
Michi

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Michi,

alle Fenster schließen
Projeke
RMK auf Stilbibliothek verwenden
Ändern auf "Ja"
Speichern

Gruß, Micha

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

wow, das ging zügig. dankeschön.
wenn wir schon dabei sind hab ich noch zwei fragen:

- gibt es eine möglichkeit das man in der zeichnung automatisch den massstab der zeichnung anzeigen kann?

- wenn ich modeliere in einem part oder so: gibt es da ein schon geschriebenes makro das wenn ich zum beispiel in der tastatur Strg+l eingebe das dann die ansicht von links angezeigt wird (in der ausrichtung), so das ich nicht immer den befehl 'Bild nach oben' und dann eine ebene anklicken muss.

michi

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

den Maßstab im Zeichnungskopf automatisch anzeigen lassen funktioniert. dafür brauchst Du die iPropertyCollektion hängt von Deiner IV-Version ab welche Du brauchst. Mußt Du mal hier im Forum schauen. ist ne coole Geschichte

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo zu der Frage

Zitat:

---

- gibt es eine möglichkeit das man in der zeichnung automatisch den massstab der zeichnung anzeigen kann?

---

Willst du den Massstab der Erstansicht haben denn da kann ich dir Helfen!

da gibt es so eine Art Makro das ich mir mal zusammengebastellt habe

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Ja bitte send mir das makro

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Zitat:

---

den Maßstab im Zeichnungskopf automatisch anzeigen lassen funktioniert. dafür brauchst Du die iPropertyCollektion hängt von Deiner IV-Version ab welche Du brauchst. Mußt Du mal hier im Forum schauen. ist ne coole Geschichte

---

Das mit der Iproberty collektion ist recht und schön aber wenn du mit dem Vault auch noch arbeitest hast du dan das problem das er immer allle Teile auschecken will besonder Normteile und so und das finde ich ziemlich nervig mit der Zeit.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

wir sind ein kleiner betrieb und arbeiten deswegen ohne vault

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Das Makro besteht aus 2 Modulen!

Modul 1
-------------
Sub AutoSave()
    Call Massstab
End Sub
-----------------
Modul 2
---------------------

Option Explicit

Private Function EE_FormatScale(ByVal S As Double) As String
  If S >= 1 Then
    If (10 * S Mod 10) = 0 Then
      EE_FormatScale = Format(S, "0") + ":1"
    Else
      EE_FormatScale = Format(S, "0.0") + ":1"
    End If
  Else
    If (10 * (1 / S) Mod 10) = 0 Then
      EE_FormatScale = "1:" + Format(1 / S, "0")
    Else
      EE_FormatScale = "1:" + Format(1 / S, "0.0")
    End If
  End If
End Function

Sub Massstab()
  Dim I, J, K As Integer
  Dim EE_MainScale, EE_TestScale As Double
  Dim EE_SiteScale(10) As Double
  Dim EE_Text As String
  Dim EE_Da As Boolean
  Dim EE_Prop As Property
  Dim oDoc As DrawingDocument
  Dim EE_Objekt As Object

    'Objekt herstellen
  Set oDoc = ThisApplication.ActiveDocument

  'Funktioniert nur, wenn Drawing und mindestens eine Ansicht vorhanden ist:
  If oDoc.DocumentType <> kDrawingDocumentObject Then Exit Sub
  If oDoc.ActiveSheet.DrawingViews.Count = 0 Then Exit Sub

    'Ermittle die Hauptansicht und Hauptmaßstab
    EE_MainScale = oDoc.ActiveSheet.DrawingViews(1).Scale

 
  'Erstelle Zeichenfolge
  EE_Text = EE_FormatScale(EE_MainScale)
  If J > 0 Then
    EE_Text = EE_Text + " ("
    For I = 0 To J - 1
      If (I > 0) And (I < 2) Then
        EE_Text = EE_Text + "; "
      End If
      If (I > 1) Then
        EE_Text = EE_Text + "; "
      End If
      EE_Text = EE_Text + EE_FormatScale(EE_SiteScale(I))
    Next I
    EE_Text = EE_Text + ")"
  End If

oDoc.PropertySets(4).Item("FirstViewScale").Value = EE_Text

End Sub
-------------------

Die Makros einfach in deine Templates (idw) kopieren und dan speichern
Der Massstab wird immer von der erstansich genommen und in den iprobs geschrieben. es muss in den Iprops noch in den Benuterdefinierten noch ein Wert FirstViewScale angelegt werden (in der IDW Vorlage)und zum schluss noch muss dieser noch im Schriftfeld ausgegeben werden (Text->Typ->Benutzerdefinierte Eigenschaften-Zeichnung->Eigenschaft->FirstViewScale)
Ich hoffe du kennst dich jetzt aus und es hat dir geholfen

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

kannst du mir bitte das makro senden?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

oha, hatte wohl ein bissel zu wenig geduld. danke vielmals.
michi

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Bitte ich hoffe es Hilft!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

mit der IPropertyCollektion gibt es auch noch andere Vorteile,
1. Du hast nicht nur den Maßstab von der 1. Ansicht auf dem Papier, sondern alle Verwendeten auf der Zeichnung.

2. Du kannst Dir auch das Gewicht in den Zeichnungskopf übertragen lassen (Wird in manchen Betrieben benötigt)

Ich würd sagen schau mal im Forum die Beiträge dazu an, weil ich find das Tool echt supi und du brauchst keine Makros zu programieren.
Ich vermute das Du auch relativ neu bist was IV angeht, oder?

Du solltest auch mal noch Deine Sysinfo ausfüllen, denn dann weis man sofort welche IV Version Du verwendest bei weiteren Fragen.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Moin!

Mit der IPropertyCollection gibt es aber auch viele Nachteile!

Die IPropertyCollection ist veraltet! Es ist nicht mehr nötig, die Masse in ein iProp zu schreiben, das für etwas anderes gedacht ist, und so alle vernünftigen Menschen, die mit den Daten weiterarbeiten sollen, in den Wahnsinn zu treiben. Es gibt inzwischen einen ganz normalen iProp-Zugang zu der Masse.

Die IPropertyCollection ist unsinnig! Man kann an jeder Ansicht den Maßstab anzeigen. In Zeiten von CAD ist es widersinnig, einen oder mehrere "Generalmaßstäbe" zu vermerken.

Die IPropertyCollection ist eine Landplage! Die meisten konfigurieren sie nicht richtig und müllen die iProperties mit unsinnigen Einträgen zu, so dass man schier verzweifeln muss, wenn man in einem Unternehmen ein organisiertes Stücklistenwesen aufbauen will und Konstruktionen von außen dazubekommt.

Und es ist eine Seuche, in den unternehmensspezifisch zusammengestellten benutzerdefinierten iProps dann Sachen zwischen zu haben, die einfach keiner braucht wie savedate und savetime und nochmal totalmass.

Es ist auch völlig unsinnig und ausgesprochen schädlich, einen Arbeitspunkt "center of mass" zu erzeugen und Bauteile damit in der Welt zu verteilen, denn dieser Arbeitspunkt wird nicht aktualisiert, wenn man keine IPropertyCollection laufen hat.

Das ist ja wie ein Virus!

Viele wissen offenbar gar nicht was sie da anrichten! Sie lassen die IPropertyCollection blind mitlaufen und stellen sie, warum auch immer, nicht so ein, dass das herauskommt, was benötigt wird, und jemand (rat mal wer...) muss dann hinter ihnen herräumen und den Dreck wegkratzen, den sie in den Dateien hinterlassen.

---

So, das musste jetzt mal raus!  Wenn es so viele Befürworter gibt, muss auch mal die andere Seite gezeigt werden.

Ich finde es ja schön, wenn es solche Tools gibt, um spezielle Bedürfnisse abzudecken, aber bitte benutzt sie verantwortungsvoll!

Es ist keine schöne Sache, die iProperties zuzumüllen, auch wenn man selber mit ihnen nichts anzufangen weiß. Andere müssen damit arbeiten, und die haben dann doppelte Arbeit.

------------------
Roland  
www.Das-Entwicklungsbuero.de

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP