Define sheet name in VB

[SMILE]

Dear Friends
I request your help
I have 11 sheets namely A1,A2,A3.....A11
Could you please me to correct the following code to join "A" and the value of x to read the sheet name
I have already defined all the sheets as (Set A1 = Worksheets("A1")

For X = 1 To 11
ACCNO = "A" & X.Range("F2").Value
MsgBox ACCNO
Next X

Thanks