VB操作EXCEL文件时，如何处理EXCEL的弹出对话框？

Question

比如如下代码：
Dim xlApp    As Excel.Application
Dim xlBook    As Excel.Workbook
Dim xlSheet    As Excel.Worksheet
Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Add
Set xlSheet = xlBook.Worksheets(1) 
Set xlApp = CreateObject("Excel.Application") '创建EXCEL对象
Set xlBook = xlApp.Workbooks.Open("c:\YS.xls") '打开已经存在的EXCEL工件簿文件
Set xlSheet = xlBook.Worksheets("sheet1") '设置活动工作表
xlSheet.Cells(2, 2) = "aaaa"
xlSheet.Cells(3, 3) = "bbbb"
xlSheet.Range("b2:c5").MergexlApp.Quit '结束EXCEL对象
Set xlApp = Nothing '释放xlApp对象执行时，弹出MICROSOFT EXCEL对话框“选定区域包含多重数值。合并到一个……”我的问题是，如何让程序执行时不弹出这个对话框，而是选择该对话框的默认选择即相当于单击对该话框的“确定”按钮？另，引用EXCEL对象时，EXCEL对象有许多方法和属性，在哪能找到这些方法和属性的帮助？

Answer 1

xlApp.DisplayAlerts = False '关闭警告 
其它属性在Excel中的宏里可以显示的，录制宏就可以看到很多代码

Answer 2

录制宏就知道了
  Range("B2:C3").Select
    With Selection
        .HorizontalAlignment = xlCenter
        .VerticalAlignment = xlCenter
        .WrapText = False
        .Orientation = 0
        .AddIndent = False
        .IndentLevel = 0
        .ShrinkToFit = False
        .ReadingOrder = xlContext
        .MergeCells = False
    End With
    Selection.Merge
End Sub