daily pastebin goal
33%
SHARE
TWEET

Untitled

a guest Jan 12th, 2018 48 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Sub Macro1()
  2. Workbooks.Open("C:xampphtdocs1.xlsx")
  3. ActiveWorkbook.SaveAs Filename:="C:xampphtdocstest.html" FileFormat:=xlHtml
  4. End Sub
RAW Paste Data
Top