Herbers Excel-Forum - das Archiv

Position eines CommandButton auf EXCEL-Tabelle

Informationen und Beispiele zu den hier genannten Dialog-Elementen:


Excel-Version: 2000
nach unten

Betrifft: Position eines CommandButton auf EXCEL-Tabelle
von: TOC


Geschrieben am: 26.04.2002 - 16:47:13

Hallo,
Ich habe mehrere CommandButtons auf einer EXCEL-Tabelle positioniert und möchte nach Drücken eines Buttons wissen, in welcher Zeile dieser positioniert ist. Geht das?

nach oben   nach unten

Re: Position eines CommandButton auf EXCEL-Tabelle
von: martin


Geschrieben am: 27.04.2002 - 00:00:22

Hallo! Folgende Programmzeilen in den Ereigniscode der Tabelle einfügen.(Entwurfsmodus,rechter Mausklick, code anzeigen) Hoffentlich klappts! Gruß martin Private Sub CommandButton1_Click() Dim a, b, c As Double, z As Range Set ws = ThisWorkbook.Worksheets(1) For Each z In ws.Range("A1:A100") a = z.Top b = z.Height c = ws.CommandButton1.Top If a <= c And (a + b) >= c Then MsgBox ("CommandButton liegt bei Zeile ") & z.Row Exit Sub End If Next End Sub

 nach oben

Excel-Beispiele zum Thema "Position eines CommandButton auf EXCEL-Tabelle"
Alle ComboBoxes auf Position 1 Position der Symbolleiste festlegen
Auslesen der Mausposition Cursorposition in der Entwicklungsumgebung auslesen
Positionen einzelner Zeichen in langer Zeichenfolge auslesen Position der aufrufenden Schaltfläche ermitteln
Multiplikation eines Wertes in Abhängigkeit seiner Position Wert der aktiven Spalte an nächste freie Position einfügen
Auslesen der aktuellen Mausposition Erhöhen der Positionsnummer bei Listeneintrag