Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Old May 25th 05, 04:04 PM
swatsp0p
 
Posts: n/a
Default copy 45 rows down, repetativly, only on button click?


Try...
------------------------------------
Private Sub CommandButton1_Click()

Row = 7 ' adjust starting point as needed
Range("A" & Row).EntireRow.Copy
For i = 0 To 1000 Step 45
'adjust to meet your needs
If Range("A" & Row + i) = "" Then Range("A" & Row + i).PasteSpecial
Next i

End Sub

------------------------------------

Does this work for you?


--
swatsp0p


------------------------------------------------------------------------
swatsp0p's Profile: http://www.excelforum.com/member.php...o&userid=15101
View this thread: http://www.excelforum.com/showthread...hreadid=373342


  #2   Report Post  
Old May 25th 05, 04:06 PM
swatsp0p
 
Posts: n/a
Default


Try...
------------------------------------
Private Sub CommandButton1_Click()

Row = 7
' adjust starting point as needed
Range("A" & Row).EntireRow.Copy
For i = 0 To 1000 Step 45
' adjust to meet your needs
If Range("A" & Row + i) = "" Then Range("A" & Row + i).PasteSpecial
Next i

End Sub


If a row has data in A, it will not paste, then skip another 45 rows
and repeat....

Does this work for you?


--
swatsp0p


------------------------------------------------------------------------
swatsp0p's Profile: http://www.excelforum.com/member.php...o&userid=15101
View this thread: http://www.excelforum.com/showthread...hreadid=373342



Reply
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
copy exact values from RangeA to Range B which has extra rows [email protected] .com Excel Discussion (Misc queries) 1 May 16th 05 09:21 AM
Using Command Button to copy cells Pennington Excel Discussion (Misc queries) 1 April 29th 05 02:30 AM
How to copy values in various rows automatically Me Excel Discussion (Misc queries) 5 March 7th 05 05:09 PM
Activate a macro to insert a row and copy the formuals from the rows above to the blank row oil_driller Excel Discussion (Misc queries) 1 February 11th 05 03:30 PM
copy / paste selective rows Kenny Kendrena via OfficeKB.com Excel Discussion (Misc queries) 5 February 7th 05 12:55 PM


All times are GMT +1. The time now is 02:35 AM.

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

About Us

"It's about Microsoft Excel"

 

Copyright © 2017