Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
172to176
172to176
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Bis Spalten-Ende Drucken

Forumthread: 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é

Anzeige

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

Anzeige
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)

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