关于VB中EXCEL表的控制问题? 如何地VB中实现EXCEL表格的“合并单元格”? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Range("A1:B2").Select Selection.Merge 你可以在excel里面通过录制宏得到绝大多数的excel命令,因为宏命令就是vba语言,和vb的基本相通。 在工具菜单中点宏,然后点录制新宏,之后进行你想要的操作,完成之后点录制完成这时你会发现EXCEL中有一段宏如:Sub 宏()'' 宏 Macro' jingsn 2004-12-4'' Range("A3:B3").Select With Selection .HorizontalAlignment = xlCenter .VerticalAlignment = xlBottom .WrapText = False .Orientation = 0 .AddIndent = False .ShrinkToFit = False .MergeCells = False End With Selection.Merge Range("D6").SelectEnd Sub 恩,用上面说的方法很好的,不用自己写,你如果在Excel怎么控制的,把vba代码贴过去就ok textbox问题,请各位帮助 关于将数据库导出到EXCEL的问题 在TXT文件中怎样把2006-10-20改写成20061020 help! 为什么 sql 连不上 !!! 请教高手:怎么动态呼叫函数或过程? 关于控件问题 關于幫助文件連接VB問題 如何阻止 WebBrowser 内的网页弹出 网页对话框? 帮帮忙!!!如何用WINSOCK下载.txt文件到指定目录!!! vb中的dll使用的低级问题(自制dll并关于加密),盼速回复 怎么用VB6连接Access数据库? 如何将字符串存入.mdb文件?
Selection.Merge
'
' 宏 Macro
' jingsn 2004-12-4
''
Range("A3:B3").Select
With Selection
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlBottom
.WrapText = False
.Orientation = 0
.AddIndent = False
.ShrinkToFit = False
.MergeCells = False
End With
Selection.Merge
Range("D6").Select
End Sub