| Home |
| Search |
| Today's Posts |
|
#1
|
|||
|
|||
There has to be any easier way!!
Hi
any suggestions how to improve the macro listed below. Its an absolute pain having to change the macro each week because the data and positions alter after updating the data. Any help much appreciated ----- Mully __________________________________________________ __________ Sub Button2_Click() Range("B3:L3").Select Selection.Copy Range("B24").Select ActiveSheet.Paste Range("B4:L4").Select Application.CutCopyMode = False Selection.Copy Range("B46").Select ActiveSheet.Paste Range("B5:L5").Select Application.CutCopyMode = False Selection.Copy Range("B25").Select ActiveSheet.Paste Range("B6:L7").Select Application.CutCopyMode = False Selection.Copy Range("B47").Select ActiveSheet.Paste Range("B8:L8").Select Application.CutCopyMode = False Selection.Copy Range("B26").Select ActiveSheet.Paste Range("B9:L9").Select Application.CutCopyMode = False Selection.Copy Range("B35").Select ActiveSheet.Paste Range("B10:L10").Select Application.CutCopyMode = False Selection.Copy Range("B49").Select ActiveSheet.Paste Range("B11:L11").Select Application.CutCopyMode = False Selection.Copy Range("B27").Select ActiveSheet.Paste Range("B12:L12").Select Application.CutCopyMode = False Selection.Copy Range("B50").Select ActiveSheet.Paste Range("B13:L13").Select Application.CutCopyMode = False Selection.Copy Range("B28").Select ActiveSheet.Paste Range("B14:L17").Select Application.CutCopyMode = False Selection.Copy Range("B29").Select ActiveSheet.Paste Range("B18:L18").Select Application.CutCopyMode = False Selection.Copy Range("B36").Select ActiveSheet.Paste Range("L20").Select Range("B19:L19").Select Application.CutCopyMode = False Selection.Copy Range("B33").Select ActiveSheet.Paste Range("B22:L22").Select Application.CutCopyMode = False Selection.Copy Range("B51").Select ActiveSheet.Paste Range("A2").Select End Sub |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| How do I set up excel to make estimating(pricing) easier? | Excel Discussion (Misc queries) | |||
| Need a formula that would make life easier | Excel Worksheet Functions | |||
| Trying to enlarge tab size on worksheet for easier reading | Excel Discussion (Misc queries) | |||
| I'd like easier cut and paste functionality | Excel Discussion (Misc queries) | |||
| Excel Hyperlink: Is there an easier way to follow then double-cli. | Excel Discussion (Misc queries) | |||
Threaded Mode
