Datum

Titel

19.04.2024 10:39:36

Schaltfläche auf einem Tabellenblatt NICHT mit abspeichern

19.04.2024 09:26:26

Median für Zeilen mit gleichen Zeitstempel

19.04.2024 08:41:23

Zwei Makros in ein Arbeitsblatt - zweite wird nicht ausführt

18.04.2024 21:09:11

4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren

Du findest keine passende Antwort auf Deine Frage?

Stelle Deine Frage in unserem Live-Forum

Archiv - Navigation

344to348

Aktuelles Verzeichnis

Verzeichnis Index

Übersicht Verzeichnisse

Vorheriger Thread

Rückwärts Blättern

Nächster Thread

Vorwärts blättern

HERBERS

Excel-Forum (Archiv)

20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Rückwärts Blättern

Aktuelles Verzeichnis

Übersicht Verzeichnisse

Vorwärts blättern

Inhaltsverzeichnis

Makro, um Zeilen auf mehreren Tabellen zu schl.

Forumthread: Makro, um Zeilen auf mehreren Tabellen zu schl.
6 Beiträge zu diesem Forumthread
Anzeige
276 Threads zu ähnlichen Themen
Top 100 Forumthreads

03.12.2003 23:05:34

tom

Guten Abend,

Habe vier Tabellen mit verschiedenen einfachen Berechnungsmodellen drauf. Nun möchte ich mit einem Makro folgende Zeilen auf den vier Tabellen auf hidden stellen:

Tab.1: Z41-Z106
Tab.2: Z61-Z165
Tab.3: Z36-Z91
Tab.4: Z45-Z117

Weiss jemand, wie dieses Makro aussehen muss, das ich dann an einen Optionbutton hängen möchte?

Besten Dank für allfällige Hilfe!

tom

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Makro, um Zeilen auf mehreren Tabellen zu schl.

03.12.2003 23:12:13

Nepumuk
Danke Nepumuk! Option explicit?

03.12.2003 23:16:23

tom
AW: Danke Nepumuk! Option explicit?

03.12.2003 23:22:42

Nepumuk
AW: Danke Nepumuk! Option explicit?

03.12.2003 23:28:30

NE
Merci!; Problem gelöst, funktioniert!! o.T.

03.12.2003 23:31:44

tom
AW: Makro, um Zeilen auf mehreren Tabellen zu schl.

03.12.2003 23:23:55

NE

AW: Makro, um Zeilen auf mehreren Tabellen zu schl.

03.12.2003 23:12:13

Nepumuk

Hallo Tom,
so geht's:


Option Explicit
Private Sub CommandButton1_Click()
Worksheets(1).Rows("41:106").Hidden = True
Worksheets(2).Rows("61:165").Hidden = True
Worksheets(3).Rows("36:91").Hidden = True
Worksheets(4).Rows("45:117").Hidden = True
End Sub

Code eingefügt mit: Excel Code Jeanie
Gruß
Nepumuk

Danke Nepumuk! Option explicit?

03.12.2003 23:16:23

tom

Zusatzfrage: Für was ist eigentlich "Option explicit". Wollte ich schon lange mal fragen, da mir dieser Begriff schon mehrmals begegnet ist.

Danke!

tom

AW: Danke Nepumuk! Option explicit?

03.12.2003 23:22:42

Nepumuk

Hallo Tom,
damit wird die Deklaration von Variablen erzwungen. Das hilf erstens Schreibfehler in Variabelennamen zu vermeiden und damit stundenlanges suchen danach, warum irgendetwas wieder nicht funktioniert und zweitens werden nicht deklarierte Variable grundsätzlich als Variant angelegt was unnütz Speicherplatz belegt.
Gruß
Nepumuk

AW: Danke Nepumuk! Option explicit?

03.12.2003 23:28:30

huch ;-) zu spät ...

ähm, option explicit ..., das sollte man, wenn man viel mit vba/variablen arbeitet immer anschalten, es weist einen sofort auf Fehler bei deklarierten Variablen im Code hin
ist bei mir standardmässig aktiviert, bei Nepumuk wahrscheinlich auch ;-)

lg Nancy

Merci!; Problem gelöst, funktioniert!! o.T.

03.12.2003 23:31:44

tom

AW: Makro, um Zeilen auf mehreren Tabellen zu schl.

03.12.2003 23:23:55

Hi Tom,


Sub hidden()
With ThisWorkbook
.Sheets(1).Rows("41:106").hidden = True
.Sheets(2).Rows("65:165").hidden = True
.Sheets(3).Rows("36:91").hidden = True
.Sheets(4).Rows("45:117").hidden = True
End With
End Sub

rückgängig den ganzen spass auf False setzen

Gruss Nancy