uber司机端使用教程:VB设置excel单元格使字体居中
来源:百度文库 编辑:神马品牌网 时间:2024/10/06 14:10:55
我想让字体在单元格中居中,怎么办?
Dim ex As Object
Dim exwbook As Object
Dim exsheet As Object
Set ex = CreateObject("Excel.Application")
Set exwbook = ex.Workbooks().Add
Set exsheet = exwbook.Worksheets("sheet1")
exsheet.Cells.HorizontalAlignment = xlCenter //居中问题
exsheet.Cells.VerticalAlignment = xlCenter
这个问题我也遇到过
我从Excel的宏中得到了启发
最后搞定了
字体在单元格中居中,录制宏。
你可以在excel中录制宏,然后把代码粘贴过去稍微修改一下就可以了。