Guest User

Untitled

a guest
Jan 12th, 2018
73
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.14 KB | None | 0 0
  1. Sub Macro1()
  2. Workbooks.Open("C:xampphtdocs1.xlsx")
  3. ActiveWorkbook.SaveAs Filename:="C:xampphtdocstest.html" FileFormat:=xlHtml
  4. End Sub
Add Comment
Please, Sign In to add comment