Das Clever-Excel-Forum.de - Treffen
findet vom 15. - 17. September 2017 in Thüringen / Region Großer Inselsberg statt. Hotelbuchung ab sofort möglich.


Schaltfläche aus/einblenden
#1
Hallo Excel-Freunde,
ich habe gleich noch ein Problem:
in ein Worksheets habe ich eine AktiveX Schaltfläche eingebaut(cmdjahresliste).
Diese soll nach Aktivierung ausgeblendet werden und später nach Erfüllung einer Bedingung wieder eingeblendet werden.

Ich habe folgenden Code verwendet(mit Makrorecorder aufgezeichnet und modifiziert):

Code:
Option Explicit
Option Compare Text

Sub Worksheet_Activate()
   ActiveSheet.Shapes.Range(Array("cmdjahresliste")).Select
   Selection.Visible = False


   MsgBox "Hallo Welt"     'nur für Testzwecke

   ActiveSheet.Shapes.Range(Array("cmdjahresliste")).Select
   Selection.Enabled = True

End Sub

Merkwürdigerweise kann ich die Schaltflächen mit der Option Entwurfmodus aus und einblenden.

Was mache ich falsch?

Meinen Dank im voraus.

LG
Wilfried
to top
#2
Hallo Wilfried,

Da wären wir mal wieder beim Thema Select, was man möglichst vermeiden sollte. Eine unsichtbare Schaltfläche kann man nicht selectieren, das geht nur mit sichtbaren Objekten. Fasse die Kommandos zusammen.

ActiveSheet.Shapes.Range(Array("cmdjahresliste")).Visible = True
   \\\|///      Hoffe, geholfen zu haben.
   ( ô ô )      Grüße, André aus G in T  
 ooO-(_)-Ooo    (Excel 97-2016)
[-] Folgende(r) 1 Benutzer sagt Danke an schauan für diesen Beitrag:
Wilfried
to top
#3
(14.04.2015, 18:32)schauan schrieb: Hallo Wilfried,

Da wären wir mal wieder beim Thema Select, was man möglichst vermeiden sollte. Eine unsichtbare Schaltfläche kann man nicht selectieren, das geht nur mit sichtbaren Objekten. Fasse die Kommandos zusammen.

ActiveSheet.Shapes.Range(Array("cmdjahresliste")).Visible = True

Hallo André,

hast ja recht mit select. Schreibe ich mir hinter die Ohren.
Hauptsache es hat gefunzt.
Vielen Dank dafür.

LG
Wilfried
to top
#4
Hi Wilfried,

(14.04.2015, 15:48)Wilfried schrieb: Merkwürdigerweise kann ich die Schaltflächen mit der Option Entwurfmodus aus und einblenden.

Was mache ich falsch?

finde ich eigentlich nicht merkwürdig:
Um mit der Datei zu programmieren ("Entwurfsmodus an"), müssen alle Elemente sichtbar sein, sonst können die doch gar nicht ausgewählt und bearbeitet werden.
Gruß Ralf

?mage

Die deutsche Rechtschreibung ist Freeware, d.h. du kannst sie kostenlos nutzen.
Allerdings ist sie nicht Open Source, deswegen darfst du sie nicht verändern oder in veränderter Form veröffentlichen.
to top


Möglicherweise verwandte Themen...
Thema Verfasser Antworten Ansichten Letzter Beitrag
  Zeilen mit Checkboxen ausblenden/einblenden Hawkeye 1 53 19.12.2016, 23:50
Letzter Beitrag: Kuwer
  Schaltfläche für automatischen E-Mailversand Wulfgar 1 82 23.11.2016, 09:46
Letzter Beitrag: Zwergel
  Aktive Zelle als Schaltfläche; Zeilen Ein-/Ausblenden peacescorer 1 129 15.10.2016, 18:27
Letzter Beitrag: schauan
  Schaltfläche bearbeiten kautsch 7 180 13.10.2016, 13:34
Letzter Beitrag: BoskoBiati
  Schaltfläche Sortieren, mehrfachnennung Namen Exceljunge 3 243 29.08.2016, 14:59
Letzter Beitrag: Ego
  InputBox Schaltfläche Abbrechen herbert0803 7 486 04.08.2016, 22:47
Letzter Beitrag: Gast 123
  Schaltfläche dynamisch wieder löschen - Objektorientierte Programmierung VBATartar 12 721 26.07.2016, 18:38
Letzter Beitrag: VBATartar
  Passwortabfrage vor Einblenden eines Arbeitsblattes per Doppelklick WillWissen 27 1.602 02.03.2016, 17:29
Letzter Beitrag: WillWissen
  einblenden von Spalten mit Passwort verhindern schnitzlwurst 14 2.229 07.01.2016, 17:16
Letzter Beitrag: schauan
  Schaltfläche funktioniert nicht für Word-Sheet cuba 13 1.635 24.12.2015, 16:41
Letzter Beitrag: Rabe

Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste