关于小鸡炖蘑菇的笑话:VB设置excel单元格使字体居中

来源：百度文库编辑：查人人中国名人网时间：2024/05/08 03:09:47

我想让字体在单元格中居中，怎么办？

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中录制宏，然后把代码粘贴过去稍微修改一下就可以了。

VB设置excel单元格使字体居中 vb excel单元格格式请问EXCEL中如何设置单元格中字体间距请问EXCEL中如何设置单元格中字体间距 EXCEL单元格设置问题如何通过VB合并Excel单元格以及设置Excel行高？ VFP调用EXCEL,如何合并单元格，并将文字居中？ excel如何让字在单元格内上下居中啊? 在office2003 Excel中不能设置单元格的字体颜色和填充颜色。关于Excel单元格设置问题