Excel应用VBA实验题目解析.docVIP

Esy02选定sheet1工作表，合并A1：C1单元格，并输入“TEST”，背景颜色设置为浅黄色，字体颜色设置为红色，字体大小设置为10磅。Sub Macro1() Macro1 Macro 宏由 xu 录制，时间: 2013/3/26 Application.Left = 201.25 Application.Top = 61.75 Range(A1:C1).Select With Selection .HorizontalAlignment = xlCenter .VerticalAlignment = xlBottom .WrapText = False .Orientation = 0 .AddIndent = False .IndentLevel = 0 .ShrinkToFit = False .ReadingOrder = xlContext .MergeCells = False End With Selection.Merge Range(A1:C1).SelectActiveCell.FormulaR1C1 = TESTRange(A1:C1).Select With Selection