show directory tree if file not found open

[mdd16]

Hello good people,

I want to copy data from active workbook to another workbook named "Stockmaster.xlsm". I use wb.activate command to shift to second file and execute active sheet.paste command there.

If the user has already opened the second file, code runs fine, else it naturally gives error.

If want create an error handling code whereby if the "Stockmaster.xlsm" file is not open, the directory tree shows up to open the file

and then the code continues.


Thanks in anticipation of help from the good souls out there on this wonderful forum.

warm regards
Mohan Dhingra

[protonLeah]

    Dim D
    D = Application.GetOpenFilename