hallo allerseits,
habe unter 97 mit folgendem code den text eines textfeldes aus einer gruppierung geholt.
Set owg = Selection.ShapeRange
For Each Item In owg.GroupItems
If Item.Name = "Punktinfo" Then
text1 = Item.DrawingObject.Caption 'Fehler unter XP
End If
Next Item
unter XP kann oder will excel nicht mehr DrawingObject.Caption
fehler: die caption-eigenschaft des textbox-objektes kann nicht zugeordnet werden.
.text, .value, mit und ohne .drawingobject geht auch nicht.
kann jemand helfen?
danke, andre