Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
PasteSpecial problem
Excel 2003 under XP
I'm having problem with the code below, I want to use "Selection.PasteSpecial Paste:=xlPasteValues..." but the VBA doesn't accept it. I want just the values to be paste and NO format. Tx for any help! -------------------------------------------------------------------------------- Sub ColetaDados() Windows("download.asp").Visible = True Range("I70").Select Selection.End(xlUp).Select Range(Selection, Selection.End(xlUp)).Select Range(Selection, Selection.End(xlToLeft)).Select If ActiveWindow.RangeSelection.Address = "$A$5:$I$8" Then Range("A8:I8").Select End If Selection.Copy Workbooks("download.asp").Close SaveChanges:=False Worksheets("Plan1").Range("B3").Select Selection.End(xlDown).Select SendKeys String:="{DOWN}", Wait:=True 'The problem is here. ActiveSheet.Paste Selection.Interior.ColorIndex = xlNone ActiveWindow.ScrollRow = 34 Range("L34").Select End Sub |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
PasteSpecial problem | Excel Programming | |||
Problem in PasteSpecial function | Excel Programming | |||
selection.pastespecial problem | Excel Programming | |||
PasteSpecial problem | Excel Programming | |||
PasteSpecial problem | Excel Programming |