| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
More efficient code advice needed
Hi - I've been writing code in what I'm sure is an inefficient way -- can
someone just tell me what the recommended way would be to re-write the following code? Thanks! Sheets("Data for Graphs").Select Columns("D:H").Select Selection.Copy Sheets("Copy of Data for Graphs").Select Columns("J:N").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
More efficient code advice needed
Worksheets("Data for Graphs").Columns("D:H").Copy
Worksheets("Copy of Data for Graphs").Select Range("J1").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Application.CutCopyMode = False -- HTH Bob Phillips "Linking to specific cells in pivot table" crosoft.com wrote in message ... Hi - I've been writing code in what I'm sure is an inefficient way -- can someone just tell me what the recommended way would be to re-write the following code? Thanks! Sheets("Data for Graphs").Select Columns("D:H").Select Selection.Copy Sheets("Copy of Data for Graphs").Select Columns("J:N").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
More efficient code advice needed
Thanks Bob!!
"Bob Phillips" wrote: Worksheets("Data for Graphs").Columns("D:H").Copy Worksheets("Copy of Data for Graphs").Select Range("J1").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Application.CutCopyMode = False -- HTH Bob Phillips "Linking to specific cells in pivot table" crosoft.com wrote in message ... Hi - I've been writing code in what I'm sure is an inefficient way -- can someone just tell me what the recommended way would be to re-write the following code? Thanks! Sheets("Data for Graphs").Select Columns("D:H").Select Selection.Copy Sheets("Copy of Data for Graphs").Select Columns("J:N").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Advice needed | Excel Discussion (Misc queries) | |||
| Advice needed | Charts and Charting in Excel | |||
| advice needed | Excel Worksheet Functions | |||
| Advice needed... | Excel Discussion (Misc queries) | |||
| advice needed | Excel Programming | |||
Hybrid Mode
