Does any know how to have fields from a table in Dreamweaver be exported into Microsoft Excel? I want to have a button that lets me take a table from dreamweaver and have it into imported into Excel, preferably in a format that is ready to print.
"fields from a table in Dreamweaver "
are nothing but the fields of an EMPTY table, you meant from HTML file? look into XML or just copy-paste into Excel
Here is a new tutorial on how to write to an Excelsheet using ASP. The result is nothing serious, but it shows the potential
First we set the type of script
<%@ LANGUAGE="VBSCRIPT" %>
Make the object, and set the object to an Excelsheet
Dim ExcelFace
Set ExcelFace = CreateObject("Excel.Sheet"
Now lets write the rest of the script, see the comments
' show or dont show Excel to user, TRUE or FALSE
ExcelFace.Application.Visible = True
' Create the yellow face
ExcelFace.ActiveSheet.Range("F3:K25".Interior.ColorIndex = 6
' Create both the blue eyes
ExcelFace.ActiveSheet.Range("G6:G10".Interior.ColorIndex = 5
ExcelFace.ActiveSheet.Range("J6:J10".Interior.ColorIndex = 5
' Create a purple nose
ExcelFace.ActiveSheet.Range("H13:I18".Interior.ColorIndex = 29
' create a red mouth
ExcelFace.ActiveSheet.Range("G21:J24".Interior.ColorIndex = 3
' Write the text
ExcelFace.ActiveSheet.Cells(1,1).Value = "Now isnt this fun "
' Save the the excelsheet to excelface
ExcelFace.SaveAs "c:\excelface.xls"
' Close Excel with the Quit method on the Application object.
ExcelFace.Application.Quit
' Release the object variable.
Set ExcelFace = Nothing
%>
This completes yer ASP page, look below for the complete code of excelface.asp
<%@ LANGUAGE="VBSCRIPT" %>
<%
' Create Object
Dim ExcelFace
Set ExcelFace = CreateObject("Excel.Sheet"
' show or dont show excelto user, TRUE or FALSE
ExcelFace.Application.Visible = True
' Create the yellow face
ExcelFace.ActiveSheet.Range("F3:K25".Interior.ColorIndex = 6
' Create both the blue eyes
ExcelFace.ActiveSheet.Range("G6:G10".Interior.ColorIndex = 5
ExcelFace.ActiveSheet.Range("J6:J10".Interior.ColorIndex = 5
' Create a purple nose
ExcelFace.ActiveSheet.Range("H13:I18".Interior.ColorIndex = 29
' create a red mouth
ExcelFace.ActiveSheet.Range("G21:J24".Interior.ColorIndex = 3
' Write the text
ExcelFace.ActiveSheet.Cells(1,1).Value = "Now isnt this fun "
' Save the the excelsheet to excelface
ExcelFace.SaveAs "c:\excelface.xls"
' Close Excel with the Quit method on the Application object.
ExcelFace.Application.Quit
' Release the object variable.
Set ExcelFace = Nothing
%>
<HTML>
<HEAD>
<TITLE>Excelface</TITLE>
</HEAD>
<BODY>
</BODY>
</HTML>
[tt]Nothing in life is to be feared. It is only to be understood
Excellent post, thanks! (I'm not the OP -- it's just that this is really useful -- I've always created comma- or tab-delimited files and imported them into Excel, but this is much better. Star indeed!)
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.