I will LOOK at the VBA code too. If you macro works fine, but your VBA code is NOT INDENTED, points will be taken off. White Space IS IMPORTANT!! Show the logic.
Sub testOpenFile() theFilename = Application.GetOpenFilename("CSV Files,*.csv") Workbooks.Open Filename:=theFilename End Sub