Forum home » Delegate support and help forum » Microsoft Access VBA Training and help » VBA Excel 2007
VBA Excel 2007
Resolved · Urgent Priority · Version 2007
VBA Excel 2007
Help please!
I am trying the following to copy a master sheet at 'A&E Summary' to all the worksheets in the workbook from the beginning until the sheet called 'List'. The code below works fine for a simple workbork numered say Sheets1 to 6 but not with a bigger workbork where the worksheets have been renamed. Any ideas ? Most grateful this end.
Sub looper()
Dim iCurWS As Integer
Dim WS As Worksheet
Sheets("A&E Summary").Activate
Cells.Select
Selection.Copy
For iCurWS = 2 To Worksheets.Count
Set WS = Sheets(iCurWS)
If LCase$(WS.Name) = "List" Then Exit For
Cells.Select
ActiveSheet.Paste
Next iCurWS
End Sub
For upcoming training course dates see: Pricing & availability
|
|
» Forum post: Project |



Course updates

