Freihand-Grafiken im Block löschen

Moderator: ModerationP

Freihand-Grafiken im Block löschen

Beitragvon slowboarder » 30. Sep 2019, 11:13

Hallo
ich arbeite in Worddokumenten ganz gerne mit den Freihandtools
(Menü: Überprüfen - Freihandeingabe starten - Textmarker)

gibt es eine Möglichkeit alle Freihandeingaben in einem Dokument in einem Schritt auszuwählen und dann zu löschen, ohne das andere Grafikelemente davon betroffen sind?

schon mal vielen Dank, Daniel
slowboarder
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 26203
Registriert: 18. Apr 2009, 13:33

Re: Freihand-Grafiken im Block löschen

Beitragvon theoS » 01. Okt 2019, 06:03

Schau mal in den Auswahlbereich, wie die Namensgebung für die Dinger ist.
Dann kannst du vermutlich über den Namen schleifen.
Mal so freihändig getippt.
theo s.
Benutzeravatar
theoS
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 4770
Registriert: 19. Apr 2008, 00:14

Re: Freihand-Grafiken im Block löschen

Beitragvon slowboarder » 01. Okt 2019, 07:18

Hi
Danke für die Antwort, aber was meinst du mit "schleifen"?
Jedes einzelne anklicken wollte ich ja gerade nicht, ansonsten kenne ich Schleifen nur aus der Programmierung und das ist auch keine Option.


OK, hab selber was gefunden:
Suchen und Auswählen - Auswahlbereich
Dort kann man dann alle Objekte in einer Liste markieren und dann löschen.
Ist allerdings auch keine befriedigende Lösung, weil immer nur die Objekte der aktuellen Seite angezeigt werden und nicht alle Objekte im Dokument.

Gruß Daniel
slowboarder
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 26203
Registriert: 18. Apr 2009, 13:33

Re: Freihand-Grafiken im Block löschen

Beitragvon theoS » 01. Okt 2019, 14:08

Meinte schon ein VBA schleifchen.
Für sowas ist das doch da.
theo s.
Benutzeravatar
theoS
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 4770
Registriert: 19. Apr 2008, 00:14

Re: Freihand-Grafiken im Block löschen

Beitragvon slowboarder » 01. Okt 2019, 15:17

Naja, wenn man sonst nix mit VBA zu tun hat, ist es schwer damit zu arbeiten.
Außerdem wäre alles gut, wenn man die Objektliste dazu bringen könnte, alle Objekte anzuzeigen und nicht nur die der aktiven Seite, dann wäre mir schon viel geholfen.

Gruß Daniel
slowboarder
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 26203
Registriert: 18. Apr 2009, 13:33

Re: Freihand-Grafiken im Block löschen

Beitragvon theoS » 01. Okt 2019, 17:02

Komischerweise ist Word hier Seitnfixiert. Wollte dir schon was basteln hab dann aber die Freihandfunktion nicht so schnell finden können wie die Pause rum war. Vielleicht heute Abend.
theo s.
Benutzeravatar
theoS
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 4770
Registriert: 19. Apr 2008, 00:14

Re: Freihand-Grafiken im Block löschen

Beitragvon theoS » 01. Okt 2019, 19:06

Code: Alles auswählen
Sub freiKill()
Dim dd1 As Document: Set dd1 = ActiveDocument
Dim shA As Shape, lngShZ As Long, i As Long
lngShZ = dd1.Shapes.Count
  For i = lngShZ To 1 Step -1
  Set shA = dd1.Shapes(i)
    If InStr(shA.Name, "Ink") And shA.Type = msoInkComment Then
    shA.Delete
    Set shA = Nothing
    End If
  Next i
End Sub


löscht jetzt alle.
Wie du den Code in Word einbindest, weißt du ja.
theo s.
Benutzeravatar
theoS
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 4770
Registriert: 19. Apr 2008, 00:14

Re: Freihand-Grafiken im Block löschen

Beitragvon slowboarder » 02. Okt 2019, 09:45

Hallo theoS
ja, danke funktioniert.

aber eine Lösung ohne VBA, die ich bei Bedarf ohne Vorbereitung in jeder beliebigen Datei verwenden kann, wäre immer noch mein Favorit.
Gruß Daniel
slowboarder
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 26203
Registriert: 18. Apr 2009, 13:33

Re: Freihand-Grafiken im Block löschen

Beitragvon theoS » 02. Okt 2019, 11:05

Bei Word möglich, wenn du den Code in die Normal legst. Brauchst nur noch einen Button zum Start in der schnellstartleiste.
Anders kriegst du das nicht. Alternative wäre das alte markieren zu verwenden.
Das isr Format, das kann man killen
theo s.
Benutzeravatar
theoS
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 4770
Registriert: 19. Apr 2008, 00:14

Re: Freihand-Grafiken im Block löschen

Beitragvon slowboarder » 02. Okt 2019, 13:52

Hi
mit Normal meinst du vermutlich die Vorlage im Autostartordner (so denn vorhanden).
ja, kann man machen, wenns keine VBA-freie Möglichkeit gibt.

Gruß Daniel
slowboarder
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 26203
Registriert: 18. Apr 2009, 13:33

Re: Freihand-Grafiken im Block löschen

Beitragvon theoS » 02. Okt 2019, 14:13

Die Normal ist die globale Vorlage ohne die bei Word nichts funktioniert. Die liegt in dem Ordner den du zum Laden eingestellt hast.
Ohne VBA geht das leider nicht.
theo s.
Benutzeravatar
theoS
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 4770
Registriert: 19. Apr 2008, 00:14

Re: Freihand-Grafiken im Block löschen

Beitragvon slowboarder » 02. Okt 2019, 15:02

So tief wollte ich da eigentlich nicht einsteigen, aber wenns nicht anders geht, muss wohl sein.
Danke für deine Bemühungen.
Gruß Daniel
slowboarder
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 26203
Registriert: 18. Apr 2009, 13:33


Zurück zu Word Forum (provisorisch)

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 2 Gäste