Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: --->Office 2010 Forum <-
Forum-Regeln :: FAQ :: Forum-Suche :: Mitgliederliste :: Benutzergruppen :: Favoriten ::  Registrieren :: Profil :: Briefkasten :: Login
Shape löschen in einer Mappe von einer anderen Mappe heraus
Office Forum -> Excel Forum -> Excel VBA (Makros)
zurück: Zellinhalt identisch, dann markieren (mit 2. Bedingung) weiter: Daten von eine Liste in die andere Liste Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Offen
Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
maninweb
Microsoft Excel MVP


Verfasst am:
05. Apr 2010, 12:19
Rufname: maninweb
Wohnort: Herzogenrath

Shape löschen in einer Mappe von einer anderen Mappe heraus - Shape löschen in einer Mappe von einer anderen Mappe heraus

 Nach oben
       Version: Office 2003
Hallöchen zusammen...

folgende Situation...

- 1 Mappe "Mappe1.xls" ist in Excel geöffnet und Tabelle1 ist mit einem Blattschutz versehen
- 2 Mappe "Mappe2.xls" ist in Excel geöffnet ohne jeglichen Schutz
- 2 Mappe enthält ein Rechteck, zum Beispiel "Testrechteck"

Folgender Code - aufgerufen von Mappe1.xls und nur von dort - schlägt mit einem
Laufzeitfehler 1004 fehl...

Code:

Application.Workbooks("Mappe2.xls").Worksheets("Tabelle1").Shapes("Testrechteck").Delete


Ist die Tabelle1 in Mappe1 nicht geschützt, klappt es ohne Probleme.
Andere Befehle, wie z.B. das Rechteck neu zu positionnieren funktionieren.

Hab' ich einen Denkfehler bzw. weiss einer warum das nicht geht?

Gruß
_________________
Der größte Aberglaube der Gegenwart ist der Glaube an die Vorfahrt.
Jacques Tatischeff - auch bekannt als Jacques Tati
ransi
Für den Hausgebrauch reicht's..


Verfasst am:
05. Apr 2010, 12:36
Rufname:
Wohnort: Im schönen Weserbergland

DrawingObjects - DrawingObjects

 Nach oben
       Version: Office 2003
HAllo Mourad

Keine Ahnung warum das mit den Shapes() nicht geht.
Habe aber schon des öfteren die Erfahrung gemacht das die DrawingObjects nicht so rumzicken wie die Shapes-Auflistung.
Sind zwar undokumentiert, dafür aber "pflegeleichter".
So gehts:

Application.Workbooks("Mappe2.xls").Worksheets("Tabelle1").DrawingObjects("Testrechteck").Delete

EDIT:
Über eine ObjectVAriable gehts auch:
Zitat:
Dim sh As Shape
Set sh = Application.Workbooks("Mappe2.xls").Worksheets("Tabelle1").Shapes("Testrechteck")
sh.Delete

ransi
_________________
Let there be light, sound, drums, 'n guitar
Let there be rock
...
And the music was good
maninweb
Microsoft Excel MVP


Verfasst am:
05. Apr 2010, 12:43
Rufname: maninweb
Wohnort: Herzogenrath

AW: Shape löschen in einer Mappe von einer anderen Mappe her - AW: Shape löschen in einer Mappe von einer anderen Mappe her

 Nach oben
       Version: Office 2003
Hi ransi...

Vielen Dank; mit den DrawingObjects funktioniert es einwandfrei auch bei mir.

PS1: Da der Code Bestandteil eines Blogartikels sein wird, nehme ich gerne den
Tipp von Dir hier auf und verlinke diesen Beitrag; wenn Du nix dagegen hast.

PS2: Nachtrag; eine Objektvariable ist bei mir im Original schon vorhanden,
das tat's nicht zuverlässig; auch interessanterweise nicht wenn ich eine Kopie
erstelle.

Gruß
_________________
Der größte Aberglaube der Gegenwart ist der Glaube an die Vorfahrt.
Jacques Tatischeff - auch bekannt als Jacques Tati
Neues Thema eröffnen   Neue Antwort erstellen     Nach oben Alle Zeiten sind
GMT + 1 Stunde
Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Excel Formeln: Teil von Zelle löschen 2 skorpions77 4155 11. Mai 2006, 11:02
< Peter > Teil von Zelle löschen
Keine neuen Beiträge Excel Formeln: Leere-Zeilen löschen. 0 Vanessa 821 02. März 2006, 19:09
Vanessa Leere-Zeilen löschen.
Keine neuen Beiträge Excel Formeln: Mappe öffnen mit automatische Makro 0 Vase 1131 23. Feb 2006, 13:31
Vase Mappe öffnen mit automatische Makro
Keine neuen Beiträge Excel Formeln: 0 löschen 4 prodigy 705 16. Jan 2006, 16:00
prodigy 0 löschen
Keine neuen Beiträge Excel Formeln: Eingaben löschen durch Befehlsschaltfläche 4 FBSmarty 1019 04. Nov 2005, 19:23
FBSmarty Eingaben löschen durch Befehlsschaltfläche
Keine neuen Beiträge Excel Formeln: Formel in ausgebledenter Spalte nicht löschen! 1 Sadmen 603 19. Okt 2005, 14:40
Dudo Formel in ausgebledenter Spalte nicht löschen!
Keine neuen Beiträge Excel Formeln: Verknüpfungen löschen (geht nicht) 4 eschmid 1410 18. Okt 2005, 11:31
eschmid Verknüpfungen löschen (geht nicht)
Keine neuen Beiträge Excel Formeln: Zellinhalte mit zentralem Schalter löschen 8 Moselaner 797 08. Sep 2005, 08:06
Moselaner Zellinhalte mit zentralem Schalter löschen
Keine neuen Beiträge Excel Formeln: Hilfe - Wie kann ich mittels Script Leerzeilen löschen? 2 Peter1968 991 30. Jun 2005, 15:51
Peter1968 Hilfe - Wie kann ich mittels Script Leerzeilen löschen?
Keine neuen Beiträge Excel Formeln: Ausgefüllte Zellen mit Button löschen 2 Ohmaju 593 27. Jun 2005, 20:06
Gast Ausgefüllte Zellen mit Button löschen
Keine neuen Beiträge Excel Formeln: Excel Verknüpfungen löschen 9 Acidcool73 8302 15. Jun 2005, 16:03
Gast Excel Verknüpfungen löschen
Keine neuen Beiträge Excel Formeln: Leere Zeilen vom Kombinationsfeld löschen 5 sifak 803 19. Apr 2005, 17:11
Hübi Leere Zeilen vom Kombinationsfeld löschen
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Excel Tipps