ich habe eine einfache Frage (für die ich bei Goolge bisher keine sinnvolle Lösung gefunden habe)
Wie kann ich bei der nachfolgenden Funktion das ständige select umgehen:
With Worksheets("Darstellung")
.Shapes.AddTextbox(msoTextOrientationHorizontal, spalte, zeile, 130, 12).Name = "Bauteil" & _
z
.Shapes.Range(Array("Bauteil" & z)).Select
Selection.Formula = "=Lab!E" & i
Selection.ShapeRange.TextFrame2.TextRange.Font.Bold = True
Danke für eure Hilfe!