2k Aufrufe
Gefragt in Tabellenkalkulation von herbybeatle Einsteiger_in (77 Punkte)
Hilfe, die Schaltfläche für mein Makro und die Checkboxen, die ich im Excel-Arbeitsblatt eingefügt hatte, sind plötzlich nicht mehr da. Wer kann mir helfen?
Ich kann auch keine neuen Checkboxen bzw. Schaltflächen mehr in dieses Blatt einfügen.

8 Antworten

0 Punkte
Beantwortet von beverly Experte (3.5k Punkte)
Hi,

dass du keine neuen Steuerelemente einfügen kannst, könnte vielleicht am Blattschutz liegen, wenn du ihn aktiviert hast. Das würde aber nicht erklären, weshalb die Steuerelemente weg sind. Befinden sie sich vielleicht in einem anderen Tabellenblatt?

Bis später,
Karin
0 Punkte
Beantwortet von herbybeatle Einsteiger_in (77 Punkte)
Hi,

nein, es sind alle Steuerelemente aus allen Tabellenblättern nicht mehr zu sehen. Was kann da passiert sein, dass sie alle weg sind?

Ich weiß mir keinen Rat.

bis morgen,

Herbert
0 Punkte
Beantwortet von beverly Experte (3.5k Punkte)
Hi Herbert,

hast du vielleicht einen Code in der Mappe, mit welchem die Steuerelemente ausgeblendet wurden? Und wie ist das nun mit dem Blattschutz?

Lass mal diesen Code ablaufen:
Sub Test()
MsgBox ActiveSheet.Shapes.Count
End Sub

Was wird in der MsgBox angezeigt?

Bis später,
Karin
0 Punkte
Beantwortet von herbybeatle Einsteiger_in (77 Punkte)
Hallo Karin,

habe keinen Code, der die Steuerelemente ausblendet. Blattschutz ist nicht aktiviert.
Die Steuerelemente waren plötzlich weg, und zwar auf allen Arbeitsblättern. Schätze, dass Excel die Steuerelemente automatisch deaktiviert bzw. ausblendet. Aber warum?

Übrigens, die Msgbox zeigt die zahl 38.

Ich habe in einer Kopie meiner Exceldatei gearbeitet und diverse Änderungen vorgenommen. Wenn mit dieser Datei nichts mehr gehen sollte, kann ich wenigstens noch auf die Kopie zurückgreifen, muss dann allerdings viele Änderungen wieder von vorne machen.

Trotzdem, danke!

lg

Herbert
0 Punkte
Beantwortet von beverly Experte (3.5k Punkte)
Hi Herbert,

wenn 38 angezeigt werden, dann sind 38 vorhanden. Versuche es mal mit diesem Code, ob sie wieder eingeblendet werden:
Sub einblenden()
Dim shElement As Shape
For Each shElement In ActiveSheet.Shapes
shElement.Visible = True
Next shElement
End Sub

Bis später,
Karin
0 Punkte
Beantwortet von herbybeatle Einsteiger_in (77 Punkte)
Hi Karin,

leider hilft das nichts.

Gruß, Herbert
0 Punkte
Beantwortet von beverly Experte (3.5k Punkte)
Hi Herbert,

da ich deine Arbeitsmappe nicht kenne, kann ich immer nur raten. Lade sie doch mal hoch, sodass man sich das mal anschauen kann. Hier der Link zu einer Upload-Seite: www.file-upload.net/

Bis später,
Karin
0 Punkte
Beantwortet von herbybeatle Einsteiger_in (77 Punkte)
Hallo Karin,

wollte eben versuchen, ein Arbeitsblatt der Datei hochzuladen. Bin dabei draufgekommen, dass beim Kopieren der einzelnen Tabellenblätter in eine neue Datei sowohl die Makros als auch die Steuerelemente wieder zum Vorschein kommen. Habe dies mit allen Blättern gemacht und alles funktioniert wieder. Hab vielen Dank für Deine Mühe,

liebe Grüße,

Herbert
...