Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Y doens't this work?
Sub SetReferences()
Dim ws As Worksheet For Each ws In ThisWorkbook.Worksheets With ws For i = 1 To 1 Cells(i, 2).Value = "='R:\...\...\...\...\...\...\[S1.CSV]S1'!A1" Cells(i, 3).Value = "='R:\...\...\...\...\...\...\[S1.CSV]S1'!B1" Next i Range("B1").Select Selection.AutoFill Destination:=Range("B1:B300"), Type:=xlFillDefault Range("B1:B300").Select Range("C1").Select Selection.AutoFill Destination:=Range("C1:C300"), Type:=xlFillDefault Range("C1:C300").Select End With Next ws End Sub i'm simply trying to loop through all 52 of my sheets and fill B:C 1-300 with the value. |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Macro to update a column in a work based on another work sheet | New Users to Excel | |||
CTRL+spacebar doens't work in Excel 2007 | Excel Discussion (Misc queries) | |||
HELP!!! Macro doens't run on clients maschine | Excel Programming | |||
If I have a work sheet protected and try to run a macro to hide rows or columns it won't work. Correct? | Excel Programming | |||
Why Excel doens't display all text in a cell | New Users to Excel |