谢谢了

解决方案 »

  1.   

    With Selection
            .HorizontalAlignment = xlCenter
            .VerticalAlignment = xlCenter
            .WrapText = False
            .Orientation = 0
            .AddIndent = False
            .IndentLevel = 0
            .ShrinkToFit = False
            .ReadingOrder = xlContext
            .MergeCells = False
        End With
      

  2.   

    Range("A1").Select
        With Selection
            .HorizontalAlignment = xlCenter
            .VerticalAlignment = xlBottom
            .WrapText = False
            .Orientation = 0
            .AddIndent = False
            .ShrinkToFit = False
            .MergeCells = False
        End With
      

  3.   

    我用VB去创建了一个EXCEL文件, 并向其中写了若干数据后,
    为什么我再去Set wkbobj =getobject("文件名")的时候,
    却发现创建对象不起来,  自然也取不到wkbobj.Worksheets(1).UsedRange.Address,
    如果我用其它的不是程序创建的EXCEL文件,  是可以创建对象的,
      

  4.   

    问题找到了,
    是因为EXCEL application
    进程没关掉, .quit
    不管用,
    请问如何杀掉EXCEL进程?