求大神,这个excel宏是什么意思?
发布网友
共3个回答
热心网友
这是程序设计吗
子Macro2()
”
”Macro2宏观
“并2008/3/4魁籹エ栋
”
“е硉龄:Ctrl + e
”
行(“一对一”)只有
选择。删除转变:= xlUp
行(“2:2”)只有
选择。删除转变:= xlUp
行(“3:4”)只有
选择。删除转变:= xlUp
行(“4:42”)只有
选择。删除转变:= xlUp
列(“B:B”)只有
选择。删除转变:= xlToLeft
列(“:”)。ColumnWidth = 12.13
列(“C:G”)只有
选择。删除转变:= xlToLeft
列(“E:E”)只有
选择。删除转变:= xlToLeft
列(“H:K”)只有
选择。删除转变:= xlToLeft
列(“我:J”)只有
选择。删除转变:= xlToLeft
列(“我:M”)只有
选择。删除转变:= xlToLeft
列(“K:K”)只有
范围(选择,Selection.End(xlToRight))只有
选择。删除转变:= xlToLeft
ActiveWindow。 ScrollColumn = 2
ActiveWindow。 ScrollColumn = 1
列(“H:J”)只有
Selection.Cut
列(“D:D”)只有
选择。插入转变:= xlToRight
列(“G:G”)只有
选择。插入转变:= xlToRight
范围(“B4:F4”)只有
Selection.Font。 大胆= True
选择
。HorizontalAlignment = xlCenter
。VerticalAlignment = xlCenter
。WrapText = False
。取向= 0
。AddIndent = False
。IndentLevel = 0
。ShrinkToFit = False
。ReadingOrder = xlContext
。MergeCells = False
结尾
范围(“B5”)只有
结束子
热心网友
应该是一段录制的宏，有很多重复和无意义的操作追问那它的作用是什么，谢谢！
追答先是删除了一些行和列，例如：
Rows("3:4").Select【选中第3～4行】
Selection.Delete Shift:=xlUp【删除选中的3～4行，并让下面的行向上移动来填补被删除的行】
Columns("A:A").ColumnWidth = 12.13【调整A列的宽度】
Range(Selection, Selection.End(xlToRight)).Select【从选中区域起，向右连续选中全部活动区域】
Selection.Cut【剪切】
Selection.Font.Bold = True【设置加粗字体，相当于按下Ctrl+B】
With Selection到End With之间是设置单元格格式：水平居中、垂直居中
热心网友
简单的说就是excel中的一段小程序。
