Office中国论坛/Access中国论坛

标题: excel单元格的宽度与字体大小问题 [打印本页]

作者: ahzy2002 时间: 2002-12-24 23:45
标题: excel单元格的宽度与字体大小问题
当excel单元格输入的数字、字体长度超过单元格设置的宽度时，单元格的字体能自动缩小适应，使输入内容可见，这样的vba怎么编？请高手帮忙。

作者: cattjiu 时间: 2002-12-25 00:28
不需要编VBA，单元格--右键--设置单元格格式--如图打勾：
[upload=bmp]http://www.office-cn.net/vvb/uploadimages/2002122416273152912.bmp[/img]

作者: cattjiu 时间: 2002-12-25 00:33
Range("D8").Select
With Selection
      .HorizontalAlignment = xlGeneral
      .VerticalAlignment = xlBottom
      .WrapText = True 'here
      .Orientation = 0
      .AddIndent = False
      .ShrinkToFit = False
      .MergeCells = False
End With

作者: ahzy2002 时间: 2002-12-25 22:05
感谢！

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)