Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
looping through worksheets
I have problem looping through worksheets. I am getting
error 9. Please help.This is my code: Sub copy2() Dim update As Range Dim cell As Range Dim a As String Dim i As Integer Dim b As String For i = 1 To 3 Set cell = Workbooks("0620.Xls").Sheets("d.o.").Range ("c27").Offset(0, 1) a = Str(i) b = "control_point" & a Set update = Workbooks("0620.Xls").Sheets(b).Range("d26") update.copy cell.PasteSpecial Paste:=xlPasteValues, _ Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False Next i End Sub |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Looping | Excel Discussion (Misc queries) | |||
finding & looping | Excel Discussion (Misc queries) | |||
Looping Macro | Excel Discussion (Misc queries) | |||
Not Looping | Excel Discussion (Misc queries) | |||
Looping | Excel Discussion (Misc queries) |