Macro to copy a specific cell and paste in another cell, for all sheets in workbook

Hi

I have a macro that will cut and paste cell B11 to cell A13. I need it to do that for every sheet in the workbook. Can someone please help me complete this macro?

Please Login or Register  to view this content.

FYI, I'm doing this from my phone, so it might not be formatted correctly.

sheets("Sheet1").Range("B11").copy Destination:=Sheet.Range("A13")

sheet.Range("A13").Select

also this checking sheet.index<>1 then


I wouldnt use variable names like that, too confusing use something like wsSheetInspected, as Sheets is a keyword of excel, so mighty close. :o)

AB33, you're cutting the original back into the original, he needs the index check.