From this web page, 2015, I copied the table and pasted into Calc.
There is an apostrophe in cell E22 which is misspelling and has a conflict with '
in SQL statement.
This statement is not correct,
HolidayName = Replace(oSheet.GetCellByPosition(4,r).String,"'","’")
Help me please.