Excel und VBA - Die Excel-FAQ

Numerisch benanntes Arbeitsblatt 1+X aufrufen

Screenshots zu den Aufrufoberflächen der Excel-Materialien

Numerisch benanntes Arbeitsblatt 1+X aufrufen

Problem: Ich habe Arbeitsblätter numerisch benannt. Wie kann ich die Zelle A1 im abgefragten Arbeitsblatt aufrufen.

StandardModule: basMain

Sub WertAusFeld()
   Dim sWks As String
   sWks = InputBox( _
      prompt:="Variable eingeben:", _
      Default:="2")
  MsgBox Worksheets(sWks).Range("A1").Value
End Sub