The object methods are different in Excel 2007. In this case .LookIn should be changed to: VBA Code:
.InitialFileName = PTH2
Nevertheless, you will likely encounter other invalid object methods further in the code.
The object members for the FileDialog object in Excel 2007 are: Methods: Execute, Show Properties: AllowMultiSelect, AllowMultiSelect, Application, ButtonName, Creator, DialogType, FilterIndex, Filters, InitialFileName, InitialView, Item, Parent, SelectedItems, Title
