Tabelle oder Diagramm in Excel sichtbar schalten

[fredyx]

Hallo zusammen,

ich habe in VB 2005 mit folgenden Codes eine Exceldatei geöffnet:

  
       Dim exAPP As Excel.Application
        Dim exWB As Excel.Workbook
        Dim exWS As Excel.Worksheet
  
        '-----> Excel öffnen 
        exAPP = New Excel.Application
        exAPP.Visible = True

        'öffnet die Datei
        exWB = exAPP.Workbooks.Open("Pfad\Dateiname")

Wie kann ich jetzt eine bestimmte Tabelle oder ein Diagramm auf dem Bildschirm in den Vordergrund bringen?

vG

fredyx

[jesus.online]

Moin moin,

        Dim exAPP As Excel.Application
        Dim exWB As Excel.Workbook
        Dim exWS As Excel.Worksheet

        '-----> Excel öffnen 
        exAPP = New Excel.Application
        exAPP.Visible = True

        'öffnet die Datei
        exWB = exAPP.Workbooks.Open("Pfad\Dateiname")

        'Setze exWS auf 2. Tabelle im Workbook
        exWS = exWB.Worksheets(2)

        'Und bringe es in den Vordergrund.
        exWS.Activate()

[fredyx]

Hallo jesus.online,

danke für Deine Antwort.

Mit Tabellen klappt das, aber leider nicht mit Diagrammen.

Ich habe es mit Charts statt Worksheets probiert, aber das geht nicht.

Hast Du auch dazu evtl. noch eine Idee?

vG

fredyx

[gfoidl]

Morgen,

zeichne in Excel ein Makro auf und schau dir den Code an.

[fredyx]

In dem makro heißt das:

Sheets("Diagramm1").Select

Nur wie sieht das dann in VB aus?

Ich habe mehreres probiert, aber ohne Erfolg.

vG

fredyx