I have a macro that was working well. It was copying the outputs from 2 merged & concatenated cels, and pasting the results into a separate worksheet. However, I have another macro that launches a new blank worksheet/form and it adds changes the worksheet name by NEW PLATE, then NEW PLATE (2), NEW PLATE (3) and so on. As a result, my maco fails.
In addition to the needed fix, I would also like to have the macro paste the data into another workbook as well.
Code:
Sub Macro10()
'
' Macro10 Macro
'
' Keyboard Shortcut: Ctrl+f
'
Range("B6:G6").Select
Selection.Copy
LR = Sheets("NEW PLATE").Range("B" & Rows.Count).End(xlUp).Row + 1
Sheets("LIST-SUMMARY").Select
lMaxRows = Cells(Rows.Count, "B").End(xlUp).Row
Range("B" & lMaxRows + 1).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("NEW PLATE.Count").Select
Range("I6:AF6").Select
Selection.Copy
LR = Sheets("NEW PLATE").Range("B" & Rows.Count).End(xlUp).Row + 1
Sheets("LIST-SUMMARY").Select
lMaxRows = Cells(Rows.Count, "I").End(xlUp).Row
Range("I" & lMaxRows + 1).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("NEW PLATE").Select
End Sub
Thank you
Bookmarks