Numerisch benanntes Arbeitsblatt 1+X aufrufen

Thema: Allgemein - Gruppe Arbeitsblatt

Arbeitsmappe

082699    068299

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