View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
jose luis jose luis is offline
external usenet poster
 
Posts: 1
Default How to display an open file?


Hi All,

I want to display and html file in the middle of an application and
after looking at it return to Excel. I already have the html file, the
path and the name, but i havn;t been able to display the file. Coud you
give me a hand with it?

I have tryed these codes:



Code:
--------------------
Sub Abrir()
nPath = ActiveWorkbook.Path
nname = "HCostos2.mht"
arch = nPath & nname
Open arch For Random Access Read Lock Read As #1

End Sub

Sub Cerrar()
Close #1
End Sub
--------------------


Besides i try this one, but I would like make the things easy to the
user and display the file once selected in Excel, and with this method
She still has the possibilty to choose any other file or mistakedly
click another.


Code:
--------------------
Sub Abrir2()
nPath = ActiveWorkbook.Path
nname = "HCostos2.mht"
nname2 = ActiveWorkbook.Name
arch = nPath & nname
myPictureName = Application.GetOpenFilename(filefilter:="HTML Files,*.mht;*.hmtl")

End Sub
--------------------



Thanks in advance,

Regards

Jose Luis


--
jose luis
------------------------------------------------------------------------
jose luis's Profile: http://www.excelforum.com/member.php...o&userid=13312
View this thread: http://www.excelforum.com/showthread...hreadid=384974