jamescooper
Well-known Member
- Joined
- Sep 8, 2014
- Messages
- 834
Hello,
This code doesn't appear to loop through each sheet, any reason why?
Thanks.
This code doesn't appear to loop through each sheet, any reason why?
Thanks.
VBA Code:
Sub Sheet_Loop()
sheet_count = ActiveWorkbook.Worksheets.Count
'loop through the worksheets in the workbook
For a = 1 To sheet_count
Range("D10:D1000").Select
With Selection
Selection.NumberFormat = "General"
.Value = .Value
End With
Range("E10:E1000").Select
With Selection
Selection.NumberFormat = "General"
.Value = .Value
End With
Range("F10:F1000").Select
With Selection
Selection.NumberFormat = "General"
.Value = .Value
End With
Next a
End Sub