Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Position der aufrufenden Schaltfläche ermitteln

Gruppe

CommandButton

Problem

Wie kann ich die linke obere Ecke unter der aufrufenden Schaltfläche sowie die Aufschrift des Buttons ermitteln?

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

StandardModule: basMain

Sub Aufruf()
   With ActiveSheet.Buttons(1)
      MsgBox "Adresse: " & .TopLeftCell.Address & vbLf & _
         "Text: " & .Caption
   End With
End Sub