Use 'system.file' so that path can be determined also when package is no...

I wanted to use the function 'WriteXLS' without loading the package, i.e., via 'WriteXLS::WriteXLS'. This failed because 'path.package' fails when the package is not loaded.