如何控制excel的每个单元格的格式 如：width

[szyhy810518]

rt

[szyhy810518]

人哪？
为什么我传的值“00001”会变成“1”？

[stonegoldaustin]

因为你单元格的格式是数值型的.
用下面的代码可以解决:
xlWorkSheet.Cells.NumberFormatLocal = "@"

第一的问题是
cells(rows,columns).width = xxx

[diyee]

hehe.
自己用宏先试试吧，自己试出来的，印象更深刻一些。

[szyhy810518]

第一的问题是
cells(rows,columns).width = xxx
不行的，师傅！

另外，如何设置每一页的页眉和页脚？
谢谢！

[DarkChampion]

设置页眉和页脚的方法大致如下：

Dim ExcelApp As Excel.Application
Dim ExcelWb As Workbook

Set ExcelApp = New Excel.Application
ExcelApp.Visible = True
Set ExcelWb = ExcelApp.Workbooks.Add

With ExcelWb.ActiveSheet.PageSetup
.CenterHeader = "第 &P 页"
.LeftFooter = "&B 机密 &B"
.CenterFooter = "&D"
.RightFooter = " 第 &P 页"
.FirstPageNumber = xlAutomatic
End With

[braveheart2000]

为什么我传的值“00001”会变成“1”？这个问题 ，你解决了吗？ 我也遇到这样的问题？若解决，劳驾把代码发上来？

[braveheart2000]

为什么我传的值“00001”会变成“1”？这个问题 ，你解决了吗？ 我也遇到这样的问题？若解决，劳驾把代码发上来？

[wdh1979]

为什么我传的值“00001”会变成“1”？这个问题 ，你解决了吗？ 我也遇到这样的问题？若解决，劳驾把代码发上来？