Browse to htm file and import

Hi

Can anyone point me in the direction of some VBA to attach to a button to allow me to browse to a .HTM or .HTML file and import.

I have found a few bits of VBA to get the filename etc. but not to import.

Possibly I am not using a good enough search term!

Thanks

Neil

Having searched some more on the general web i found something i modified to suit. Just need to allow htm and html now

Dim fNameAndPath As Variant, wb As Workbook
fNameAndPath = Application.GetOpenFilename(FileFilter:="Html Files (*.HTM), *.HTM", Title:="Select File To Be Opened")
If fNameAndPath = False Then Exit Sub
Set wb = Workbooks.Open(fNameAndPath)

Try

HTML Code: 

Hi xlHelp7

I modified your code and it works and it allows any file to be selected.

How can i limit it to htm and html files please.

Neil