File: testing.tcl

package info (click to toggle)
ooxml 1.10-1
  • links: PTS
  • area: main
  • in suites: forky, sid
  • size: 1,484 kB
  • sloc: tcl: 3,922; sh: 1,339; ansic: 180; makefile: 17; xml: 8
file content (12 lines) | stat: -rw-r--r-- 274 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
 
#package require ooxml
source ../ooxml.tcl

array set workbook [ooxml::xl_read printArea.xlsx]

#parray workbook

set spreadsheet [::ooxml::xl_write new]
$spreadsheet presetstyles workbook
$spreadsheet presetsheets workbook
#$spreadsheet write new.xlsx
#$spreadsheet destroy