Thanks Kent. Actually Beverly gave me the answer and Witango works
beautifully for my purpose. I'm including code here that was generated
from my program to create a few tabs and a couple of columns and rows
within each worksheet to show others who may have the need to do this
how it is done. As Beverly pointed out, if you save this as somefile.xml
Excel will read it and process it correctly as data within worksheets.
In my reading I'm also finding ways to include formulas within cells as
well so some really sophisticated worksheets could be created using this
method. The top portion of the form I just created an include file since
that will not change. Thanks Beverly. Just needed some idea of what
direction to look in.

Here is XML code, created by Witango. That will produce worksheets and
several rows and columns within each worksheet.

<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
 xmlns:o="urn:schemas-microsoft-com:office:office"
 xmlns:x="urn:schemas-microsoft-com:office:excel"
 xmlns:ss="urn:schemas-microsoft-com:office:spreadsheet"
 xmlns:html="http://www.w3.org/TR/REC-html40";>
 <DocumentProperties xmlns="urn:schemas-microsoft-com:office:office">
  <Author>wolfg</Author>
  <LastAuthor>wolfg</LastAuthor>
  <Created>2008-06-27T13:37:20Z</Created>
  <LastSaved>2008-06-27T13:38:06Z</LastSaved>
  <Company>DRS Optronics, Inc.</Company>
  <Version>11.8132</Version>
 </DocumentProperties>
 <OfficeDocumentSettings
xmlns="urn:schemas-microsoft-com:office:office">
  <DownloadComponents/>
  <LocationOfComponents HRef="file:///D:\"/>
 </OfficeDocumentSettings>
 <ExcelWorkbook xmlns="urn:schemas-microsoft-com:office:excel">
  <WindowHeight>12015</WindowHeight>
  <WindowWidth>15195</WindowWidth>
  <WindowTopX>195</WindowTopX>
  <WindowTopY>-225</WindowTopY>
  <ActiveSheet>178</ActiveSheet>
  <ProtectStructure>False</ProtectStructure>
  <ProtectWindows>False</ProtectWindows>
 </ExcelWorkbook>
 <Styles>
  <Style ss:ID="Default" ss:Name="Normal">
   <Alignment ss:Vertical="Bottom"/>
   <Borders/>
   <Font/>
   <Interior/>
   <NumberFormat/>
   <Protection/>
  </Style>
 </Styles>


<Worksheet ss:Name="340160-009RB-234340">
  <Table ss:ExpandedColumnCount="2" ss:ExpandedRowCount="5"
x:FullColumns="1"
   x:FullRows="1">
                        <Row>
                        <Cell><Data
ss:Type="String">340161-009</Data></Cell>
                        <Cell><Data ss:Type="String">01115</Data></Cell>
                </Row>
                        <Row>
                        <Cell><Data
ss:Type="String">400070-009RB</Data></Cell>
                        <Cell><Data
ss:Type="String">102893</Data></Cell>
                </Row>
                        <Row>
                        <Cell><Data
ss:Type="String">400078-009</Data></Cell>
                        <Cell><Data
ss:Type="String">m01062</Data></Cell>
                </Row>
                        <Row>
                        <Cell><Data
ss:Type="String">400080-009RB</Data></Cell>
                        <Cell><Data
ss:Type="String">102477</Data></Cell>
                </Row>
                        <Row>
                        <Cell><Data
ss:Type="String">400086-009RBM</Data></Cell>
                        <Cell><Data
ss:Type="String">102180</Data></Cell>
                </Row>
        
  </Table>
 </Worksheet>

<Worksheet ss:Name="350700-009RB-266200">
  <Table ss:ExpandedColumnCount="2" ss:ExpandedRowCount="6"
x:FullColumns="1"
   x:FullRows="1">
                        <Row>
                        <Cell><Data
ss:Type="String">350701-009</Data></Cell>
                        <Cell><Data ss:Type="String">01350</Data></Cell>
                </Row>
                        <Row>
                        <Cell><Data
ss:Type="String">400070-009</Data></Cell>
                        <Cell><Data
ss:Type="String">104771</Data></Cell>
                </Row>
                        <Row>
                        <Cell><Data
ss:Type="String">400075-009</Data></Cell>
                        <Cell><Data
ss:Type="String">h00997</Data></Cell>
                </Row>
                        <Row>
                        <Cell><Data
ss:Type="String">400080-009</Data></Cell>
                        <Cell><Data
ss:Type="String">201826</Data></Cell>
                </Row>
                        <Row>
                        <Cell><Data
ss:Type="String">400080-009</Data></Cell>
                        <Cell><Data
ss:Type="String">201826</Data></Cell>
                </Row>
                        <Row>
                        <Cell><Data
ss:Type="String">400086-009</Data></Cell>
                        <Cell><Data
ss:Type="String">201774</Data></Cell>
                </Row>
        
  </Table>
 </Worksheet>

<Worksheet ss:Name="340160-009RB-235693">
  <Table ss:ExpandedColumnCount="2" ss:ExpandedRowCount="7"
x:FullColumns="1"
   x:FullRows="1">
                        <Row>
                        <Cell><Data
ss:Type="String">340089</Data></Cell>
                        <Cell><Data
ss:Type="String">P2321807</Data></Cell>
                </Row>
                        <Row>
                        <Cell><Data
ss:Type="String">340089</Data></Cell>
                        <Cell><Data
ss:Type="String">P2321918</Data></Cell>
                </Row>
                        <Row>
                        <Cell><Data
ss:Type="String">340161-009</Data></Cell>
                        <Cell><Data ss:Type="String">31279</Data></Cell>
                </Row>
                        <Row>
                        <Cell><Data
ss:Type="String">400070-009</Data></Cell>
                        <Cell><Data
ss:Type="String">105553</Data></Cell>
                </Row>
                        <Row>
                        <Cell><Data
ss:Type="String">400078-009</Data></Cell>
                        <Cell><Data
ss:Type="String">M01763</Data></Cell>
                </Row>
                        <Row>
                        <Cell><Data
ss:Type="String">400080-009</Data></Cell>
                        <Cell><Data
ss:Type="String">202790</Data></Cell>
                </Row>
                        <Row>
                        <Cell><Data
ss:Type="String">400086-009</Data></Cell>
                        <Cell><Data
ss:Type="String">200469</Data></Cell>
                </Row>
        
  </Table>
 </Worksheet>
</Workbook>

-----Original Message-----
From: Kent Swisher [mailto:[EMAIL PROTECTED] 
Sent: Friday, June 27, 2008 11:57 AM
To: [email protected]
Subject: Re: Witango-Talk: Different excel question

Gene

I used PERL with CPAN Spreadsheet::WriteExcel module to do somthing like
you want.
________________________________________________________________________
TO UNSUBSCRIBE: Go to http://www.witango.com/developer/maillist.taf

Reply via email to