Live-Forum - Die aktuellen Beiträge
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
Anzeige
Archiv - Navigation
212to216
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
212to216
212to216
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

ExcelTAbellen drucken

ExcelTAbellen drucken
01.02.2003 15:22:27
Manfred Funk
Ich möchte von einer Excel - Tabelle (wie bei Winword) erst die ungeraden Seiten (zahlen) und dann die geraden ausdrucken. Ich bin Abonnent der Herber-CD.

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: ExcelTAbellen drucken
01.02.2003 17:07:10
Oliver

Hallo,
ich würde das per Makro machen. Zuerst die Anzahl der Tabellenblätter in der Datei einlesen und dann 2 Schleifen.
Eine für die geraden und eine für die ungeraden.
Ich habe ein Beispiel das zuerst die ungeraden Tabellennamen ausgibt und danach die Geraden. Anstatt der MSGBOX kann jeder
andere Befehl für das Tabellenblatt genommen werden.
MfG
Oliver

Sub zählen()
lastsheet = ActiveWorkbook.Sheets.Count
For a = 1 To lastsheet
MsgBox a
a = a + 1
Next a
For b = 2 To lastsheet
MsgBox b
b = b + 1
Next b
End Sub

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige