LinkBack URL
About LinkBacks
Like so:
LR = Range("A" & Rows.Count).End(xlUp).Row Range("A1:G" & LR & ",K1:L" & LR).Copy Workbooks.Add Range("A1").PasteSpecial xlPasteValues Application.CutCopyMode = False
Like so:
LR = Range("A" & Rows.Count).End(xlUp).Row Range("A1:G" & LR & ",K1:L" & LR).Copy Workbooks.Add Range("A1").PasteSpecial xlPasteValues Application.CutCopyMode = False
_________________
Microsoft MVP 2010 - Excel
Visit: Jerry Beaucaire's Excel Files & Macros
If you've been given good help, use theicon below to give reputation feedback, it is appreciated.
Always put your code between code tags. [CODE] your code here [/CODE]
?None of us is as good as all of us? - Ray Kroc
?Actually, I *am* a rocket scientist.? - JB (little ones count!)
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
Register To Reply
Bookmarks