Selektion mehrer Excel-Sheets

Die Frage ist als "gelöst" markiert. Den entsprechend Beitrag findest du hier.

Alles rund um die Sprache ABAP®: Funktionsbausteine, Listen, ALV
3 Beiträge • Seite 1 von 1
3 Beiträge Seite 1 von 1

Selektion mehrer Excel-Sheets

Beitrag von Ludo ( / / 0 / 3 ) »
Hallo zusammen

Ich habe folgendes Problem: ich möchte per OLE im Excel mehrere Sheets selektieren, um diese dann mit einem (und nicht mehreren) Druckauftrag auszugeben. Grund hierfür ist, dass die Ausgabe je nach Wunsch auf einen PDF-Konverter umgeleitet werden soll, und ich beim Drucken der einzelnen Sheets nacheinander mehrere PDF-Files erhalten würde.

Hier mein Coding zur Auwahl des Sheets 'Blatt1':

Code: Alles auswählen.

* Excel starten
CREATE OBJECT h_excel 'EXCEL.APPLICATION'.

* Excel sichtbar ausführen
SET PROPERTY OF h_excel 'Visible' = 1.

* bestehendes File öffnen
CALL METHOD OF h_excel 'Workbooks' = h_mapl.
CALL METHOD OF h_mapl 'OPEN'
  EXPORTING
    #1 = 'C:\Temp\test.xls'.

* Sheet selektieren
CALL METHOD OF h_excel 'Sheets' = h_worksheet
  EXPORTING
    #1 = 'Blatt1'.

CALL METHOD OF h_worksheet 'Select'.
Dies klappt so auch, nur möchte ich mehrere Sheets z.B. Blatt1 Blatt2 und Blatt3 selektieren. Die Makro-Aufzeichnung zeigt:
Sheets(Array("Blatt1", "Blatt2", "Blatt3")).Select

Weiss jemand wie man so ein Array per exporting-Parameter mitgeben kann?

Gruss
Ludo

gesponsert
Stellenangebote auf ABAPforum.com schalten
kostenfrei für Ausbildungsberufe und Werksstudenten


Beitrag von Patrick76 (ForumUser / 34 / 0 / 1 ) »
Hi!

zu dem Array fällt mir spontan nichts ein, aber wenn es Dir darum geht, alle Sheets eines Workbooks in einen einzigen Druckauftrag zu packen, dann nimm die Methode "PrintOut" des "Application.ActiveWorkbook"-Objekts.

viele Grüße, Patrick

Beitrag von Ludo ( / / 0 / 3 ) »
Hallo Patrick

Das Problem ist, dass ich nicht alle Sheets, sondern nur eine bestimmte Auswahl drucken möchte.

Ich habe das im Moment so gelöst, dass ich die Sheets, die ich nicht gedruckt haben möchte, einfach lösche:

Code: Alles auswählen.

CALL METHOD OF h_excel 'Sheets' = h_worksheets.

CALL METHOD OF h_worksheets 'Item' = h_worksheet
        EXPORTING #1 = 'BlattXY'.

CALL METHOD OF h_worksheet 'Delete'.
Anschliessend kann man die restlichen Blätter selektieren und ausdrucken:

Code: Alles auswählen.

CALL METHOD OF h_worksheets 'Select'.
CALL METHOD OF h_worksheets 'PrintOut'.
Ist nicht unbedingt sehr elegant, aber es funktioniert...

Gruss
Ludo

Seite 1 von 1

Vergleichbare Themen

2
Antw.
2636
Views
Excel: Export & Aufbereitung in mehreren Sheets
von urk » 14.04.2005 09:53 • Verfasst in ABAP® Core
2
Antw.
2705
Views
Mehrere Sheets
von lisa » 07.09.2008 22:21 • Verfasst in ABAP® für Anfänger
14
Antw.
14543
Views
Append mehrer Zeilen mit VALUE #
von Romaniac » 09.01.2018 18:14 • Verfasst in ABAP® Core
2
Antw.
2047
Views
Mehrer Änhänge per Mail verschicken
von godevilgo » 28.04.2006 15:08 • Verfasst in ABAP® Core
6
Antw.
1091
Views
Mehrer Selects in eine Tabelle bringen
von burggartenkind » 25.07.2019 13:44 • Verfasst in ABAP® für Anfänger

Über diesen Beitrag


Die Frage ist als "gelöst" markiert. Den entsprechend Beitrag findest du hier.

Unterstütze die Community und teile den Beitrag für mehr Leser und Austausch

Aktuelle Forenbeiträge

Trennen Strasse und Hausnummer
vor 7 Stunden von msfox 18 / 10942
Dialog-Container mit Toolbar/Status
vor 10 Stunden von black_adept gelöst 27 / 4043
IT0024 Qualifikationen CP-ID
vor 12 Stunden von ArjenR 1 / 85

Newsletter Anmeldung

Keine Beiträge verpassen! Wöchentlich versenden wir lesenwerte Beiträge aus unserer Community.
Die letzte Ausgabe findest du hier.
Details zum Versandverfahren und zu Ihren Widerrufsmöglichkeiten findest du in unserer Datenschutzerklärung.

Aktuelle Forenbeiträge

Trennen Strasse und Hausnummer
vor 7 Stunden von msfox 18 / 10942
Dialog-Container mit Toolbar/Status
vor 10 Stunden von black_adept gelöst 27 / 4043
IT0024 Qualifikationen CP-ID
vor 12 Stunden von ArjenR 1 / 85

Unbeantwortete Forenbeiträge

IT0024 Qualifikationen CP-ID
vor 12 Stunden von ArjenR 1 / 85
aRFC im OO-Kontext
vor 4 Wochen von ralf.wenzel 1 / 3016
Hilfe bei SWEC/SWE2
September 2024 von retsch 1 / 9609