Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 14:48:50
"Eingabefeld" zwischen zwei Zeilen geht nicht weg.
24.04.2024 14:40:10
Zeilenumbrüche in Textbox zählen
24.04.2024 14:06:20
Gesamte Column löschen, wenn Column-Bereich leer
24.04.2024 13:44:05
Bezeichnung Tabellenblatt aus Zelle für Formel auslesen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1128to1132
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
1128to1132
1128to1132
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Ansichten wechseln | Herbers Excel-Forum

Ansichten wechseln
09.01.2010 12:12:27
chris

Hallo, Excell-Profis!
Bei meiner Waage-Tabelle habe ich 2 verschiedene Ansichten erstellt in welchen Spalten aus- und andere eingeblendet werden. Ich möchte nun gerne über einen Button zwischen diesen beiden Ansichten wechseln können wobei sich aber auch gleich die Spaltenbreite der Spalte E auf 30 verringert und beim Retourschalten wieder auf 40 vergrößert.
Bitte um Hilfe in VBA bin ich leider bei weitem nicht sattelfest
Grüße
chrischtian

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Ansichten wechseln
09.01.2010 12:18:27
Hajo_Zi
Hallo Chris,
benutze den Makrorecorder und Zeiche jede Aktion auf und weise Sie dann einem Button zu.

AW: Ansichten wechseln
09.01.2010 13:55:48
chris
Hallo Hajo!
Da müßte ich dann zwei Makros aufnehmen...
Gibt es keine Möglichkeit, dies mit einem Button zu lösen?
mit Togglebutton ...
09.01.2010 14:00:05
Matthias L
Hallo
z.B.
bei True
Columns("E:E").ColumnWidth = 30
bei False
Columns("E:E").ColumnWidth = 40
Gruß Matthias
AW: mit Togglebutton ...
09.01.2010 14:36:17
chris
Ist das eine Befehlsschaltfläche und kann man dieser auch Makros zuweisen....?
gruß Chrischtian
AW: ja hier mal ein Beispiel
09.01.2010 15:30:35
chris
Tadellos - Aber: Jetzt sollte das ganze zugleich auch noch zwischen zwei "Benutzer definierten Ansichten" wechseln.
Danke
.CustomViews("Ansicht1").Show ...
09.01.2010 15:44:02
Matthias L
z.B. so
Sub Breite40()
ActiveWorkbook.CustomViews("Ansicht1").Show
Columns("E:E").ColumnWidth = 30
End Sub


Sub Breite30()
ActiveWorkbook.CustomViews("Ansicht2").Show
Columns("E:E").ColumnWidth = 40
End Sub
Gruß Matthias
AW: .CustomViews("Ansicht1").Show ...
09.01.2010 17:10:03
chris
Sensationell - Ich bin begeistert. Danke.
Noch eine Frage: Könnte man das Button auch einfärben?
gruß
Christian
einfärben, ja das geht auch ... (.backcolor)
09.01.2010 17:50:24
Matthias L
Hallo
z.B so:
Private Sub ToggleButton1_Click()
If ToggleButton1.Value = True Then ToggleButton1.BackColor = &H80FFFF
If ToggleButton1.Value = False Then ToggleButton1.BackColor = &H8000000F
End Sub
Gruß Matthias
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige