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

Printarea

Forumthread: Printarea

Printarea
17.02.2004 12:44:24
felix
Hallo,
warum funktioniert das nicht:
Sheets(2).PageSetup.PrintArea = Range(Cells(1, 1), Cells(3, 3))
und das funktioniert:
Sheets(2).PageSetup.PrintArea = Range("A1:C3)
Ich benötige aber die Cells-methode, da ich später Variable statt der Zahlen einsetzen wollte?
Weiß jemand wie ich das mit der Cells-methode Lösen kann?
Danke
Gruß
Felix
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Printarea
17.02.2004 12:46:54
Andi_H
Hi Felix,
versuchs mal so:
lrow = 3
lcol = 5
ActiveSheet.PageSetup.PrintArea = cells(1,1).address & ":" & Cells(lRow, lCol).Address
gruß
andi
Danke
17.02.2004 12:52:08
felix
Hallo Andy,
das war es. Danke
hatte also ".Address" vergessen
Gruß
Felix
AW: Printarea - F1 !
17.02.2004 12:51:11
Galenzo
Hallo,
hast du dir mal die Hilfe zu PrintArea angeschaut?
Sonst wüßtest du, daß PrintArea eine Adresse verlangt.
Demnach so:
Sheets(2).PageSetup.PrintArea = Range(Cells(1, 1), Cells(3, 3)).address
Viel Erfolg!
Anzeige
AW: Printarea
17.02.2004 12:51:43
Alex K.
Hallo Felix,
PrintArea erwartet die Adresse des Druckbaren Bereiches. Also musst du die Adress in der Form "A1:C3" übergeben.
Also verwende .Address

Sheets(2).PageSetup.PrintArea = Range(Cells(1, 1), Cells(3, 3)).Address

Flinker Galenzo - 30 Sekunden schneller - Sorry
17.02.2004 12:52:49
Alex K.
Vielen Dank Euch allen o.T.
17.02.2004 12:58:38
felix
.
Anzeige
AW: :-)
17.02.2004 13:00:35
Galenzo
hehe :-C
;

Beliebteste Forumthreads (12 Monate)

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