flashing macro

[fastbuck]

Hi out there. I have this crazy macro that I use. There are ten of them that transfer info from one part of the sheet to another. When I active the macros there is a whole heap of flashing backwards and forwards as it does it’s transfer. Would there be a way of fixing it so it runs a bit smoother? Many thanks Narelle


Sub Result_R1()

ActiveSheet.Unprotect Password:=""


' Result_R1 Macro

Range("M6").Select

Selection.Copy

Range("AE2").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

Range("B28").Select

Application.CutCopyMode = False

Selection.Copy

Range("AF2").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

Range("A28").Select

Application.CutCopyMode = False

Selection.Copy

Range("AG2").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

Range("O1").Select

Application.CutCopyMode = False

Selection.Copy

Range("AH2").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

Range("E28").Select

Application.CutCopyMode = False

Selection.Copy

Range("AI2").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

Range("K3").Select

Application.CutCopyMode = False

Selection.Copy

Range("AJ2").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

Range("C28").Select

Application.CutCopyMode = False

Selection.Copy

Range("AK2").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

Range("F28").Select

Application.CutCopyMode = False

Selection.Copy

ActiveWindow.ScrollColumn = 30

Range("AL2").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

Range("D28").Select

Application.CutCopyMode = False

Selection.Copy

Range("AM2").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False



Range("G28").Select

Application.CutCopyMode = False

Selection.Copy

Range("AN2").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

' Result_clear Macro

Range("A28:G28").Select

Range("F28").Activate

Selection.ClearContents

Range("E28").Select

ActiveSheet.Protect Password:=""

End Sub

 

[fastbuck]

I tried a few of those ideas last night. Nothing changed, so I'm going to go through it all again methodically.
Just an update however...I cut and pasted all the copies of the dodgy file to a memory stick and just left the pre-dodgy files on the laptop. Now when I try to open one of the pre-dodgy files or any other spreadsheet including a blank one a message comes up with (The file name could not be found. Check the spelling of the file name, and verify that the file location is correct. If you are trying to open the file from your list of most recently used files, make sure that the file has not been renamed, moved or deleted). I click OK and the file works normally.

 

[fastbuck]

Sorry I missed this reply. If I press ctrl + F8 nothing happens. When I open the Macros box all the macros in there. Fresh worksheets and all other excel files I have work fine. It's just this one. And it looks like even if I remove it form the computer altogether it still hampers me. I wish I could share the workbook but it has mine and other peoples confidential info on it.

 

[Michael M]

Well, I guess were stumped....any way to change the info and then post the file.
I'm more than happy to look at it privately, if that helps !

 

[fastbuck]

Really appreciate your help and your offer. Unfortunately it contains other peoples betting account details and other confidential information. It just wouldn't be good practise to take the risk. In the meantime I am able to use the pre-dodgy workbook while I search for an answer. Howard suggested I post a new thread with a different subject line to possibly get more answers, but thought of trying to explain it all again nearly makes me ill Is there a way to change the subject line on this thread. Thanks N

 

[Michael M]

No, I'm afraid you'll have to repost.
When you do though, make sure you include a link to this thread, as a reference, that way you won't get pinged for a duplicate thread
AND
you won't have to explain as much details.