Openoffice Basic Vba Code