Anzeige
Archiv - Navigation
1568to1572
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Zellen wieder einblenden

Zellen wieder einblenden
10.07.2017 20:08:41
Christian
Moin alle zusammen,
ich habe eine Reihe von Diagrammen, welche ich über Buttons Ein-und Ausblenden. Das läuft auch alles wunderbar. Jetzt switche ich über ein Button zwischen zwei Diagrammen. In den Zeilen 24:25 befindet sich ein zusätzliches Feld, welches aber nur für eines der beiden Diagramme relevant ist. Daher schalte ich es beim anderen Diagramm aus:
Ein Auszug aus dem Code. Das klappt auch

If ActiveSheet.ChartObjects(5).Visible Then
'Bestandsverlauf CEC-1 Total
ActiveSheet.ChartObjects(6).Visible = True
'Bestandsverlauf CEC-2 Total
ActiveSheet.ChartObjects(5).Visible = False
Rows("24:25").Hidden = True
Else
'Bestandsverlauf CEC-1 Total
ActiveSheet.ChartObjects(6).Visible = False
'Bestandsverlauf CEC-2 Total
ActiveSheet.ChartObjects(5).Visible = True
Rows("24:25").Hidden = False
End If
Jetzt soll dieses Feld aber auch für die restlichen 7 Diagramme wieder angehen. Sobald man auf die anderen Buttons klickt.
Ich dachte das würde ganz Simple gehen. Aber leider klappt das so nicht:
Auszug.

Rows("24:25").Hidden = True
'Bestandsverlauf Dock IST
ActiveSheet.ChartObjects(1).Visible = True
'Bestandsverlauf Dock PLAN
ActiveSheet.ChartObjects(2).Visible = False
'Upper Deck P018
ActiveSheet.ChartObjects(3).Visible = False
'Main Deck P08
ActiveSheet.ChartObjects(4).Visible = False
'Bestandsverlauf CEC-2 Total
ActiveSheet.ChartObjects(5).Visible = False

Ich hoffe sehr, das ich mir trotz fehlender Beispieldatei helfen könnt: Das erstellen der Beispieldatei würde schon längere Zeit in Anspruch nehmen.
Viele Grüße
Christian

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellen wieder einblenden
11.07.2017 08:42:21
yummi
Hallo Christian,
du sprichtst von angehen schreibst aber:
Rows("24:25").Hidden = true
damit blendest du aus und nicht ein.
Setz auf false und alles ist gut. Vollständig referenziert wäre so : ActiveSheet.rows("24:25".....
Gruß
yummi
Danke :)
11.07.2017 10:19:14
Christian
Moin Yummi,
vielen Dank, da hatte ich wohl echt ein Brett vorm Kopf.
Mit False bekomme ich es perfekt hin :)
 Rows("24:25").Hidden = False
Viele Grüße
Christian
Anzeige

291 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige