从TCL中添加多个列来优化

我正在尝试从TCL中添加多个列来优化。 这是代码

set rows [array size atten] set columns { B} for {set row 1} {$row <= $rows} {incr row} { foreach column $columns { $cells Item $row $column $atten($row) } } 

—-这个数据是单独在excel中填充的

  set a_rows [array size transmit] set a_columns { C} for {set row 1} {$row <= $a_rows} {incr row} { foreach column $a_columns { $cells Item $row $column $transmit($row) } } $workbook SaveAs Filename {c:\tst.xls} $application Quit 

只有第一个数组参数在excel文件中被填充，它完全省略了在excel文件中添加发送数组的代码中的部分。 这怎么解决？

Answer 1

在一个foreach循环中设置两个列。