set inFile to choose file with prompt "Please select an Excel workbook file:"
tell application "Finder"
	set theWorkbookFolder to (container of (inFile)) as string
	set theWorkbookFile to (name of (inFile)) as string
end tell