Need Help - Copy/Paste & Header Row

D

Donnie Stone

I have a header in row 1. Is it possible to modify the code so it excludes
it and starts executing in cell A2 for example?
 
B

Bernie Deitrick

Donnie,

For Each cell In Intersect(ActiveSheet.UsedRange.Columns(1),
Range("2:65536"))

HTH,
Bernie
 
D

Donnie Stone

Bernie,

Thanks for your help. I made the changes you recommended and I'm getting
the following:

Run-time error '1004'
Application-defined or object defined error

Any idea what's causing this?
 
B

Bernie Deitrick

Donnie,
If you're running the macro from a cutton on the sheet, you need to set the
TakeFocusOnClick property of the button to false. Otherwise, precede the
line with

Activesheet.Activate

and that should cure it.

HTH,
Bernie
 

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

Repeating a row other than the 1st row as the header row in a table from next page 1
Loop through pages and insert header image 0
Section and Page numbering 0
Skipping the first row in a repeated header 0
Adjust code to run anywhere on sheet 3
Skip copying empty column where remaining rows are filled 2
Create a dynamic master file 1
Need Help with a VBA subroutine 0

Top