LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #3   Report Post  
Posted to microsoft.public.excel.worksheet.functions
excelent
 
Posts: n/a
Default reference autofill.

Sub Lasey2()
Dim i
For i = 5 To 1000 Step 7
If Range("Sheet1!A" & i) < "" Then
ActiveCell.Formula = "=Sheet1!A" & i
ActiveCell.Offset(1, 0).Activate
End If
Next
End Sub

 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Maintaining cell reference after sorting GRITS Excel Discussion (Misc queries) 2 April 30th 23 07:42 PM
Circular reference toolbar not working [email protected] Excel Discussion (Misc queries) 3 May 29th 06 01:55 AM
How can I autofill a series to reference non adjacent cells? Microcell Excel Discussion (Misc queries) 1 June 30th 05 09:49 PM
More- AutoFill with Non-Seqeuntial Cell References ? [email protected] Excel Worksheet Functions 4 June 23rd 05 02:42 AM
Relative reference autofill increment other than +1 SteveB Excel Discussion (Misc queries) 3 June 14th 05 07:40 PM


All times are GMT +1. The time now is 03:03 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"