Home |
Search |
Today's Posts |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Check one of your other posts.
Ed Davis wrote: Does anyone know what is wrong with this code? The first time I run this macro it works fine and the correct info goes where it needs to go. Each and every other time I run it, only the first section works. If run several times it should give the same results on each line. This is the code that I am using now. This section works fine. Sheets("Sheet1").Select Range("A4").Select Range("D4").Select Selection.Copy Sheets("Audilla").Select Range("A34").End(xlDown).Offset(1, 0).Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False This section works fine. the first time only. Sheets("Sheet1").Select Range("AH34").Select Application.CutCopyMode = False Selection.Copy Sheets("Audilla").Select Range("B34").End(xlDown).Offset(1, 0).Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False This section works fine the first time only. Sheets("Sheet1").Select Range("AQ34").Select Application.CutCopyMode = False Selection.Copy Sheets("Audilla").Select Range("C34").End(xlDown).Offset(1, 0).Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False This section works fine the first time only Sheets("Sheet1").Select Range("AZ34").Select Application.CutCopyMode = False Selection.Copy Sheets("Audilla").Select Range("D34").End(xlDown).Offset(1, 0).Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False -- Dave Peterson |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Macro recorded... tabs & file names changed, macro hangs | Excel Worksheet Functions | |||
Macro to copy and paste values (columns)I have a macro file built | Excel Programming | |||
Macro not showing in Tools/Macro/Macros yet show up when I goto VBA editor | Excel Programming | |||
macro to delete entire rows when column A is blank ...a quick macro | Excel Programming | |||
Start Macro / Stop Macro / Restart Macro | Excel Programming |