作者ptguitar (佩蒂吉他)
看板Office
標題[算表] 錄製後的巨集問題
時間Tue Aug 16 14:14:26 2011
軟體:excel
版本: 任何版本
我錄製了一個刪除特定列的巨集
因為有100多個工作表 要一個一個執行這個巨集
不知道有什麼方法可以讓他一次全部的工作表都可以套上去
巨集如下:
Sub 刪除貼上()
'
' 刪除貼上 Macro
'
' 快速鍵: Ctrl+z
'
ActiveWindow.SmallScroll Down:=-24
Columns("C:C").Select
Selection.SpecialCells(xlCellTypeBlanks).Select
Selection.EntireRow.Delete
Columns("A:B").Select
Range("B1").Activate
Selection.Delete Shift:=xlToLeft
Columns("C:E").Select
Selection.Delete Shift:=xlToLeft
Range("D9").Select
With ActiveSheet.PageSetup
.PrintTitleRows = "$1:$2"
.PrintTitleColumns = ""
End With
End Sub
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 210.65.186.253