Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
22.07.2021 16:26:04 |
Terry |
|
|
|
22.07.2021 17:08:10 |
Gast10167 |
|
|
|
22.07.2021 21:53:24 |
Terry |
|
|
Bilder in bestimmten Bereich löschen und falls keins weiter mit Makro |
23.07.2021 00:46:28 |
xlKing |
|
|
|
23.07.2021 10:23:39 |
Terry |
|
|
Von:
xlKing |
Datum:
23.07.2021 00:46:28 |
Views:
589 |
Rating:
|
Antwort:
|
Thema:
Bilder in bestimmten Bereich löschen und falls keins weiter mit Makro |
Hallo Terry,
also bei mir funktioniert dein Code. Bist du sicher dass das ActiveSheet auch wirklich aktiv ist? Ich meine der von dir angegebene Fehler erscheint bei mir nur dann, wenn man den Code in einem Tabellenmodul hat (z.B. Tabelle1) aber das aktive Tabellenblatt (z.B. Tabelle2) ist. Grund Range bezieht sich in dem Fall immer auf das Tabellenmodul in dem der Code steht, während sich die Shapes auf das aktiveSheet beziehen.
Der Code gehört also in ein Standardmodul (Modul1) damit er auf jedes Blatt anwendbar ist.
Außerdem ist S unzureichend definiert. es muss heißen Dim S as Shape. So wie du es aktuell hast ist S as Variant definiert. Da kannst du die Deklaration auch ganz sein lassen. Aber das nur am Rande. Sollte keinen Einfluss auf die Funktionalität haben.
Gruß Mr. K.
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
22.07.2021 16:26:04 |
Terry |
|
|
|
22.07.2021 17:08:10 |
Gast10167 |
|
|
|
22.07.2021 21:53:24 |
Terry |
|
|
Bilder in bestimmten Bereich löschen und falls keins weiter mit Makro |
23.07.2021 00:46:28 |
xlKing |
|
|
|
23.07.2021 10:23:39 |
Terry |
|
|