vba 選中所有區域 但是不包括首行

2021-09-10 16:26:28 字數 774 閱讀 8518

當我們使用vba將乙個工作簿中的所有sheet內容,彙總到乙個sheet中時,

我們需要複製每個sheet中除首行之外的單元格,然後複製到對應位置。

因此,選中所有單元格然後取出首行就顯得比較必要。

option explicit

sub main()

dim rng as range

set rng = currentregionbutfirstrow

rng.select

end sub

private function currentregionbutfirstrow() as range

dim rng as range

dim region_rows as long

dim region_columns as long

set rng = range("a1").currentregion.offset(1, 0) '選中所有區域,包括首行,然後整體向下偏移一行!

let region_rows = rng.rows.count - 1 '行數減1,就目的是resize的時候不包括最後一行空白行

let region_columns = rng.columns.count '這邊列不需要resize,所以就沒有任何操作

set currentregionbutfirstrow = rng.resize(region_rows, region_columns) '使用resize,重整有內容區域

end function

選中panel中所有控制項的方法

在winform中 我就是做了乙個使用者可以自己託控制項到 乙個panel中去 可以改變其屬性,有 button,label,picturebox等 我現在是想實現用滑鼠按住左鍵拖動 框在裡面的控制項就被選中。就是想實現 選中任意panel中的乙個,兩個或多個控制項!這樣。希望哪位大哥大姐能慷慨解囊...

使用jQuery選中所有同組的checkbox

jquery在頁面獲取checkbox陣列時 使用 var num input checkbox name cbx checked length 即可獲得所有name屬性為 cbx 的checkbox陣列。通過length屬性即可得到陣列長度。取id cbxall 是有講究的,因為id cbxall...

TreeView子節點擊中同時選中所有父節點

最近碰到過幾次checkbox樹操作,在winform中比較好容易操作,但在web頁面在後台寫 的話,每次點選結點操作都會回發,這樣導致使用者體驗很不好,這裡在網上找了一段js function setparentstate objnode else setparentstate parentchk...