Need Help with Script

D

DustinS

If cell [X11] = An even increment of 100,000 (100k,200k,300k etc)

Then copy [Sheet1!$E$32:$AH$32] to [Sheet2!$A$1:$AD$30] (Copy 1 Row x
30 Columns of data from sheet 1 to sheet 2)


I need to copy the data from the 30 cell range to a new 30 cell range on
sheet 2 every 100,000 cycles.

Example:

Cycle 100,000 21 91 89 86 87 81 79 77 76 75 74 73 72 71 70 69 68 67 67
66 66 66 66 69 69 68 68 68 68 104
200,000 77 1 95 95 90 87 84 82 80 79 77 76 75 74 74 73 72 71 71 70 70
69 69 68 68 70 71 72 51 54



If you can help me put this in the format of an excel script let me know!

Thanks!
 
G

gearoi

sub subname


LOOP begin (not sure if you need a do while ..... loop or a for ..
next loop... need more info)

If cell [X11] mod 100000 = 0 then

sheets("Sheet1").select
range("$E etc.").select
activerange.copy
sheets("sheet2").select
range("top of where you want to paste").select
activesheet.paste (you might have to record a copy and paste macro t
find the right syntax for copying and pasting)

end if

LOOP en
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Calculate Stanine Values 6
Axis formatting 0
Code to set print range 1
Count & List Combinations 9
For Loop 9
How to get the array like this? 6
Rank and Sort 2
copying cells 2

Top