[RESOLVED] [Excel] Copying and pasting cells from a selected row

[vbfbryce]

Have both your Master and your other workbook open, then do something like this:

Sub copyVals()
    Dim wbMaster As Workbook
    Dim wbAnother As Workbook
    Dim wsMaster As Worksheet
    Dim wsAnother As Worksheet
    Dim currentRow As Long
    Dim pasteRow As Long
    
    Set wbMaster = Workbooks("masterBook.xlsm") 'change to your book's name
    Set wsMaster = wbMaster.Sheets(1)
    Set wbAnother = Workbooks("anotherBook.xlsx")   'change to your book's name
    Set wsAnother = wbAnother.Sheets(1)
    currentRow = ActiveCell.Row     'the row from which to copy
    'copy from A in Master to A in Another
    pasteRow = (wsAnother.Range("a" & Rows.Count).End(xlUp).Row) + 1    'first empty cell in column A in "Another book"
    wsMaster.Range("a" & currentRow).Copy
    wsAnother.Range("a" & pasteRow).PasteSpecial
    Application.CutCopyMode = False
    'copy from C in Master to B in Another
    wsMaster.Range("c" & currentRow).Copy
    wsAnother.Range("b" & pasteRow).PasteSpecial
    Application.CutCopyMode = False
    'copy from G in Master to C in Another
    wsMaster.Range("g" & currentRow).Copy
    wsAnother.Range("c" & pasteRow).PasteSpecial
    Application.CutCopyMode = False
End Sub