QUERY ON Sheets("X").Move After:=Workbooks("Y.xlsm").Sheets(1)

zensathish · May 31, 2019

Hi,

Im opening txt files (contract) from a workbook (MC9.xlsm) and moving opened sheet (contract) to the workbook (MC9.xlsm)

Code:

    Windows("CONTRACT").Activate
    Sheets("CONTRACT").Select
    Sheets("CONTRACT").Move After:=Workbooks("MC9.xlsm").Sheets(1)

Here the workbook name ("MC9.xlsm") is hardcorded. how can i make it dynamic using getbook command or is there any other alternative way.

Norie · May 31, 2019

If MC9.xlsm is the workbook the code is in you can refer to it as ThisWorkbook.

Code:

Workbooks("CONTRACT").Sheets("CONTRACT").Move After:=ThisWorkbook.Sheets(1)

zensathish · May 31, 2019

Thanks Norie. worked as expected.