renamed Workbook.active() back into current() so it doens't get confused with the ActiveWorkbook in VBA that refers to the active Window