Gruppe
Allgemein
Bereich
Arbeitsblatt
Thema
Numerisch benanntes Arbeitsblatt 1+X aufrufen
Problem
Ich habe Arbeitsblätter numerisch benannt. Wie kann ich die Zelle A1 im abgefragten Arbeitsblatt aufrufen.
Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.
StandardModule: basMain
Sub WertAusFeld()
Dim sWks As String
sWks = InputBox( _
prompt:="Variable eingeben:", _
Default:="2")
MsgBox Worksheets(sWks).Range("A1").Value
End Sub