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

Druckbereich per VBA festlegen

Druckbereich per VBA festlegen
10.02.2004 11:05:31
andy
Hallo
habe da folgendes Problem: In den Spalten A bis F stehen Daten, die gedruckt werden sollen. Die letzte nichtleere Zelle in der A-Spalte zu finden soll mit VBA gelöst werden, um dann gleich automatisch den Druckbereich festzulegen. Aber wie?
Bitte um Hilfe.
Danke

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Druckbereich per VBA festlegen
10.02.2004 11:11:44
Tobias
Hallo andy

Sub PrintRange()
Dim intCounter As Integer
intCounter = 1
Do Until Range("A" & intCounter).Value = ""
intCounter = intCounter + 1
Loop
ActiveSheet.PageSetup.PrintArea = "A1:F" & intCounter - 1
End Sub

Gruss
Tobias
AW: Druckbereich per VBA festlegen
10.02.2004 11:18:25
PeterW
Hallo Andy,
das sollte so gehen:

Sub Druckbereich()
ActiveSheet.PageSetup.PrintArea = "A1:F" & Range("A65536").End(xlUp).Row
End Sub

Gruß
Peter

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige