Anzeige
Archiv - Navigation
172to176
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
172to176
172to176
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Bis Spalten-Ende Drucken

Bis Spalten-Ende Drucken
25.10.2002 10:26:28
André
Hallo,
ich habe folgende Frage:
Wie lautet der VBA Code wenn ich einen Ausdruck (immer von Spalte A bis J breit)bis zur letzten beschrifteten Zelle in Spalte B benötige?

Vielen Dank im Voraus
André

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Bis Spalten-Ende Drucken
25.10.2002 11:03:20
Bernd
Hallo André,

mit diesen Zeilen
Sub DruckbereichFestlegen()
Range("b65536").Select
Selection.End(xlUp).Select
Zeilenende = ActiveCell.Row
ActiveSheet.PageSetup.PrintArea = "$A$1:$J" & Zeilenende
End Sub

Danach dann ausdrucken.

Ich hoffe es hilft weiter.

Gruß

Bernd

Re: Bis Spalten-Ende Drucken
25.10.2002 12:04:48
André
Hallo Bernd,
danke für Deine Hilfe. Es klapt super.
André
Re: Bis Spalten-Ende Drucken
25.10.2002 12:05:43
André
Hallo Bernd,
danke für Deine Hilfe. Es klapt super.
André

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige