VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Über InputBoxes Zeile und Spalte auswählen und Ergebnis nennen

Gruppe

Allgemein

Bereich

Meldung

Thema

Über InputBoxes Zeile und Spalte auswählen und Ergebnis nennen

Problem

Wie kann ich über InputBoxes die Zeilen- und Spaltennummer durch Klicken im Tabellenblatt festlegen und das Ergebnis in einer MsgBox anzeigen lassen?

Lösung

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




StandardModule: basMain

Sub Auswaehlen()
   Dim iRow As Integer, iCol As Integer
   Dim rng As Range
   Set rng = Application.InputBox _
      ("Zeile auswählen:", Type:=8)
   iRow = rng.Row
   Set rng = Application.InputBox _
      ("Spalte auswählen:", Type:=8)
   iCol = rng.Column
   MsgBox Cells(iRow, iCol).Address(False, False)
End Sub

    


Beiträge aus dem Excel-Forum zu den Themen Allgemein und Meldung