On exit?

H

Heather

I was wondering if someone might know how to fix this problem

I run a bunch of code and a table is copied into a summary tab. When this
is first opened and run it gets hung up on a section that reads
Worksheets(CStr(Trim(wsSource.Range("A12")) & "
Platform")).Range("I7:N19").Copy
With target.Offset(3, 0)
.PasteSpecial xlPasteValues
..PasteSpecial xlPasteFormats
End With
Application.CutCopyMode = False

I am guessing that maybe I need to clear the page on return to another tab
or on exit? Does anyone have any ideas? Thanks in advance!!!!
 
J

Jim Thomlinson

What is the error??? I am guessing subscript out of range??? As a guess you
do not have a sheet

wsSource.Range("A12")) & " Platform"

Purely a guess however...
 
H

Heather

It goes to this when it errors? but works the 2nd time around
.PasteSpecial xlPasteValues


Does it need cleared out like maybe when they first hit the macro it clears
and then creates or something
 

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

Exit code 3
Having difficulty copying and pasting on VBA 3
transpose 1
Formatting and copy or copy and formatting ?? 2
Keeping Conditional fromating When Emailing Using A Control Button 0
Cell values to an array, then array transpose to another workbook 8
Word 2003 won't exit 8
Copying a Range from Multiple Worksheets 4

Top