Auto Select Sheets With Condition

[spilner]

hi,

example ive 80 sheets.all sheets is name as number from 1 to 100.all 100 sheets is randomly,not sorted.
it can be from range 50:28 is = 80 sheets as the 50 is the first sheet and 28 is the last sheet.

within the sheets that i select example i want range 50:30 (probably about 40 sheets within the range) ..
i want excel to automatic select sheets that has 20 value in A1..

is it possible to autoselect those sheets that has 20 in A1 without i go through all sheets and select one by one?

so when it autoselect the sheets,then i can just right click and move it in front.

thanks guys

[spilner]

this is what i try but its not working

Sub MoveSheets1()
Dim ws As Worksheet
For Each ws In Worksheets
ws.Activate
If Sheets("50:30").Range("A1").Value = 20 Then
Sheets.Move Before:=Sheets(1)
End If
End Sub