Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
728to732
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
728to732
728to732
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

arbeitsblatt-name in makro übernehmen

arbeitsblatt-name in makro übernehmen
06.02.2006 21:28:32
djobst
Hallo Forum,
ich benutze ein makro das den druckauftrag an den pdf-editor weiterleitet.
nun würde ich gern erreichen,dass der Tabellenname (Arbeitsblatt-reiter)
gleich mitgespeichert wird. geht das?
hier das makro :
Sub()
Range("A106:H134").Select
ActiveSheet.PageSetup.PrintArea = "$A$106:$H$134"
Application.ActivePrinter = "Canon i560 auf Ne03:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"Canon i560 auf Ne03:", Collate:=True
ActiveWindow.SmallScroll Down:=24
Range("A137:H165").Select
ActiveSheet.PageSetup.PrintArea = "$A$137:$H$165"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub
danke dafür.

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

Betreff
Datum
Anwender
Anzeige
AW: arbeitsblatt-name in makro übernehmen
06.02.2006 21:52:13
mischa
hi,
wo willste den namen des sheets denn speichern?
dim wsname as string
wsname = activesheet.name
...
Mischa R
AW: arbeitsblatt-name in makro übernehmen
06.02.2006 21:54:16
Beverly
Hi,
ich weiß nicht, ob es in Office97 funktioniert, aber versuche mal
ActiveSheet.Name
Bis später, Karin

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige