VBA 選定sheet方法總結

2021-08-26 23:41:56 字數 1285 閱讀 5976

假定excel共有2個sheet,分別是sis、sheet1,而實際後台名稱是sheet2、sheet1,如下圖:

sheets(2).select,指由左至右第2個sheets,即sheet1,包含隱藏sheet!

2、worksheets("sheet1").select

sheets("sheet1").select,直接選中指定名稱的sheet,雙引號內為sheet名稱,選中sheet1

3、sheet2.select

指定名稱屬性,選中的是sis

多個sheet迴圈操作

for each sh in workbooks(rpt_name).sheets(array("sheet1", "sheet2", "sheet3", "sheet4"))   --雙引號內為sheet名稱

sh.usedrange.value = sh.usedrange.value --去公式

next sh

for each sh2 in worksheets(array(6, 7, 8, 9, 10, 11, 12, 13, 14))   --按序列選中

sh2.delete

next sh2

--按名稱條件,選中多個sheet

i = 0

for each ws in worksheets

if instr(ws.name, "費用清單") <> 0 then

i = i + 1

redim preserve arr(1 to i)

arr(i) = ws.name

end if

next

if i > 0 then

worksheets(arr).select

end if

--按順序選中sheet

if activesheet.index <> worksheets.count then

activesheet.next.activate

end if

VBA方法總結

1 取得日文漢字的讀音的方法 例如強 2 儲存excel檔案時不彈出是否儲存的alter wb.close false 3 提示訊息不要 4 excel的sheet比例的大小調整 activewindow.zoom 70 5.利用excel來開啟文字檔案的方法 dim jsfilesheet as ...

VBA之sheet頁的生成

1.直接生成sheet頁 worksheets.add 直接生成sheet activesheets.name sheet1 給當前生成的sheet頁命名為sheet1 2.生成的sheet頁在指定的頁面前面 worksheets.add before worksheets sheet2 生成she...

vba 工作案例 sheet間拷貝內容

核心 就是copy destination。sub copy data copy data 巨集 dim fzjgs as variant dim cities as variant cities array 廣州 深圳 珠海 汕頭 佛山 韶關 湛江 肇慶 江門 茂名 惠州 梅州 汕尾 河源 陽江 ...