我用过的各种宏代码语句,保留以便后续使用
工具/原料
excel
宏
方法/步骤
1、一佼沣族昀:ctrl+v默认数值粘贴Sub数值粘贴()''宏3宏''快捷键:Ctrl+v'Range(A艘早祓胂ctiveCell.Address).SelectSelection.PasteSpecialPaste:=xlPasteValues,Operation:=xlNone,SkipBlanks_:=False,Transpose:=FalseEndSub
2、二:合并单元格'合并单元格Range("H7:J7").S娣定撰钠electWi墉掠载牿thSelection.HorizontalAlignment=xlCenter.VerticalAlignment=xlCenter.WrapText=False.Orientation=0.AddIndent=False.IndentLevel=0.ShrinkToFit=False.ReadingOrder=xlContext.MergeCells=FalseEndWithSelection.Merge
3、三:获取表格最后一行lastrow=b.Range("B65536").End(xlUp).Row
4、四:在**sheet前复制sheet并重命名ActiveSheet.SelectActiveSheet.CopyBefore:=Sheets("Summary")ActiveSheet.SelectActiveSheet.Name=Range("D2").Value
5、五:插入一行Rows("7:7").SelectSelection.Insertshift:=xlDown,CopyOrigin:=xlFormatFromLeftOrAbove
6、六:关闭屏幕更新,加快宏的执行速度Application.ScreenUpdating=False................Application.ScreenUpdating=True