Diagrammblatt im VBA erkennen

[ibp]

zur Info...

für den xxx.type gibt es unterschiedlich definierte Konstanten....

Code:

xlChart > Diagrammblatt
xlChart4 > Excel 4-Diagramm
xlChartShort > Excel 3-Diagramm
xlInfo > Infofenster
xlNoDocuments > keine geöffneten Dateien
xlModule > VB Modul
xlWorksheet > Tabellenblatt
xlWorksheet4 > Excel 4-Tabellenblatt
xlWorksheetShort > Excel 3-Tabellenblatt

vielleicht sind die Konstanten ja auch in OleServer, Excel2000 etc definiert


Link hier sind weitere Konstanten mit Werten

[RWarnecke]

Hallo ibp,

danke für die Info. Werde ich noch zu dem Beitrag bei Code-Orakel hinzufügen.

[Jumpy]

Im Code-Oracle vllt. noch

for K := 1 to ExcelApp.Sheets.Count do

ersetzen durch

for K := 1 to ExcelApp.ActiveWorkbook.Sheets.Count do


...und vllt. die Select-Zeile rauslassen, wenn nicht gerade die aktuelle Seite auch angezeigt werden soll, kostet nur performance.

[RWarnecke]

Danke für den Hinweis. Habe es auch schon in den Beitrag von Code-Orakel eingefügt.