Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
660to664
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
660to664
660to664
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Seitenwechsel automatisch

Seitenwechsel automatisch
05.09.2005 11:14:25
virgilio
Hallo,
habe unteres Makro im Forum gefunden.
Das Makro macht folgendes:
sucht in Spalte A nach "wechsel" und setzt dort überall einen Seitenwechsel.
Wie kann ich Makro ändern, dass es mir in Spalte M sucht anstatt A und dann den Seitenwechsel macht?
Danke
gio

Sub seitenwechsel()
Dim zaehler
For zaehler = 1 To 1000 'Wobei '65536' die maximale Tabellengröße ist
If Cells(zaehler, 1) = 1 Then
Cells(zaehler, 1).Activate
ActiveWindow.SelectedSheets.HPageBreaks.Add Before:=ActiveCell
End If
Next zaehler
End Sub

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Seitenwechsel automatisch
05.09.2005 11:37:17
IngGi
Hallo virgilio,
cells(zaehler, 13) statt cells(zaehler, 1) sollte funktionieren.
Gruß Ingolf
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige