- #21
A
Algar187
Mitglied
- Dabei seit
- 27.06.2005
- Beiträge
- 10
- Reaktionspunkte
- 0
Ok, Problem gelöst, hattest mit
recht, frag mich nicht, warum es vorhin nicht ging, habe hier sowieso interessante Fehlermeldungen & Code-Versteckspiele (schätze, dass die automatische Synchro meines FirmenPCs mir den Code massakriert....).
Nur noch eins (hoffe ich...):
Wie kann ich mehrere Abschnitte gleichzeitig markieren (zum löschen...)?
Mach ich das am besten sequentiell, z.B.
...oder gibt es da eine bessere Lösung?
Es geht jedenfalls auch so, bloss dass man - wenn man 2 aufeinanderfolgende Abschnitte löschen möchte - aufpassen muss, dass man 2mal den gleichen Abschnitt eingibt (da der alte 6[sup]te[/sup] Abschnitt nach löschen des alten 5[sup]ten[/sup] der neue 5[sup]te[/sup] ist, alles klar? )
Ich stell den Code dann mal hier ein, wenn er fertig ist (zur allgemeinen Belustigung ;D ...)
lg
Algar187
Code:
ThisDocument.FormFields(TextMarke_ChkBox2).Enabled = False
Nur noch eins (hoffe ich...):
Wie kann ich mehrere Abschnitte gleichzeitig markieren (zum löschen...)?
Mach ich das am besten sequentiell, z.B.
Code:
Dim rng As Word.Range
Set rng = ActiveDocument.Sections(5).Range
rng.Delete
Set rng = Nothing
Dim rng As Word.Range
Set rng = ActiveDocument.Sections(6).Range
rng.Delete
Set rng = Nothing
usw. ...
...oder gibt es da eine bessere Lösung?
Es geht jedenfalls auch so, bloss dass man - wenn man 2 aufeinanderfolgende Abschnitte löschen möchte - aufpassen muss, dass man 2mal den gleichen Abschnitt eingibt (da der alte 6[sup]te[/sup] Abschnitt nach löschen des alten 5[sup]ten[/sup] der neue 5[sup]te[/sup] ist, alles klar? )
Ich stell den Code dann mal hier ein, wenn er fertig ist (zur allgemeinen Belustigung ;D ...)
lg
Algar187