请教:谁知道在使用VB导出EXCEL后单元格的内容居中.在线等候.谢谢!!1
本人在调出EXCEL后发现单元格内容不居中,如果想让其居中该如何做.还有就是如果单元格的内容有的是数值型有的是字符型.这和居中有关系吗?因为我发现数值型的自动右对齐而字符型的左对齐.如果想让他们都居中对齐该如何做.希望给出代码.为此我先谢谢各位的帮忙了.同时本人必送分. 问题点数:100、回复次数:4Top
1 楼sinom(小白MOU)回复于 2002-10-13 09:17:32 得分 40
Sheet1.Cells.HorizontalAlignment = 3'sheet1为sheet对象
Sheet1.Cells.VerticalAlignment = 3Top
2 楼sinom(小白MOU)回复于 2002-10-13 09:25:53 得分 40
dim sApp As Excel.Application
dim sBook As Excel.Workbook
dim sSheet As Excel.Worksheet
Set sApp = CreateObject("Excel.Application")
Set sBook = sApp.Workbooks.Open(XLS文件路径)
Set sSheet = sBook.Worksheets("sheet1")
。。。
Sheet1.Cells.HorizontalAlignment = 3'ssheet为sheet对象
Sheet1.Cells.VerticalAlignment = 3
sApp.DisplayAlerts = False '不提示储存
sApp.Save
sBook.Close
sApp.Quit '强行把Excel给关闭
Set sSheet = Nothing
Set sBook = Nothing
Set sApp = NothingTop
3 楼fastson()回复于 2002-10-13 09:40:59 得分 10
使用vba有什么问题的不用问别人,自己录制宏然后编辑,看看代码就行了Top
4 楼icy_csdn()回复于 2002-10-13 09:52:52 得分 10
同意楼上观点!Top




