Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
632to636
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
632to636
632to636
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Button zum Ein/Ausschalten beschriften

Button zum Ein/Ausschalten beschriften
07.07.2005 12:48:43
Daniel
Hallo,
Der folgende Button blendet die Spalte 4 Ein/ und Aus. Wie kann ich diesen Button beschriften, dass einmal "Einblenden" und das andere mal "Ausblenden" darauf steht?

Private Sub CommandButton1_Click()
Columns(4).Hidden = Not Columns(4).Hidden
End Sub

Schöne Grüße und vielen Dank schonmal
Daniel

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Button zum Ein/Ausschalten beschriften
07.07.2005 12:51:27
Daniel
Habe noch einen Fraga dazu. Ich möchte gerne, dass der Button mehrere Spalten Ein/Ausblendet. Bei dem o.g. Makro geht das immer nur für eine, Mhhh?
AW: Button zum Ein/Ausschalten beschriften
07.07.2005 12:56:45
Uduuh
Hallo,
füge z.b. für F
columns(6).hidden=not columns(6).hidden
ein.
Gruß aus’m Pott
Udo

AW: Button zum Ein/Ausschalten beschriften
07.07.2005 12:59:02
ede
oder so

Private Sub CommandButton1_Click()
von = 4
bis = 6
For I = von To bis
Columns(I).Hidden = Not Columns(I).Hidden
Next I
If Columns(von).Hidden Then
CommandButton1.Caption = "EIN"
Else
CommandButton1.Caption = "AUS"
End If
End Sub

Anzeige
AW: Button zum Ein/Ausschalten beschriften
07.07.2005 12:53:34
Uduuh
Hallo,

Private Sub CommandButton1_Click()
Columns(4).Hidden = Not Columns(4).Hidden
if columns(4).hidden then
Commandbutton1.caption="Einblenden"
else
commandbutton1.caption="Ausblenden"
end if
End Sub

Gruß aus’m Pott
Udo

AW: Button zum Ein/Ausschalten beschriften
07.07.2005 12:55:11
ede
so

Private Sub CommandButton1_Click()
Columns(4).Hidden = Not Columns(4).Hidden
If Columns(4).Hidden Then
CommandButton1.Caption = "EIN"
Else
CommandButton1.Caption = "AUS"
End If
End Sub

Beantwortet durch Ede und Uduuh
07.07.2005 13:04:54
Daniel
Vielen Vielen Dank,
funktioniert 1 A.
Weiter so
Schöne Grüße
Daniel
Anzeige

Links zu Excel-Dialogen

CommandButton

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige