Ohne Seclect arbeiten
09.06.2020 08:59:22
K.
Ich habe gelernt, dass man so weit wie möglich, ohne Select arbeiten soll.
Dazu habe ich 2 Fragen.
1. Wie öffnet man ein Tabellblatt, was ein Diagramm enthält, ohne dass das Diagramm automatisch markiert wird?
z.B.
Sheets("Transporte").Select
2. wie kann ich diesen Code ohne Select ausführen:
Sheets("Transporte").Select
Sheets("Transporte").ChartArea.Select
Sheets("Transporte").Shapes.Range(Array("TextBox 2")).Select
Selection.ShapeRange(1).TextFrame2.TextRange.Characters.Text = "Neuster Datensatz vom: " & _
rs![Fertigstellung]
Sheets("Transporte").ChartArea.Select
Karsten