To check if a workbook is open, if it’s not open it
This Procedure will ask for a file name to the user, will check if the file is open and if it’s not open it will open the file otherwise give a message to the user. Public Sub IsWorkbookOpen()Dim Wb As Workbook, wkbk As Variant‘get the dialog box to open the filewkbk = Application.GetOpenFilename(“Excel Files,*.xls”)If wkbk […]
Continue reading