tft每日頭條

 > 圖文

 > excel怎麼複制vba語句

excel怎麼複制vba語句

圖文 更新时间:2024-07-04 02:09:15

轉自EXCEL不加班

按照約定,點“在看”人數太少,今天開始就不聊函數PK,轉移話題聊VBA。

還記得這張現金日記賬彙總表嗎?

彙總表,提取每一個銀行的名稱還有餘額。

excel怎麼複制vba語句(經常做Excel表格的你)1

明細表,餘額就是E列最後一個金額。

excel怎麼複制vba語句(經常做Excel表格的你)2

你的做法可能是先一個個複制粘貼工作表名稱,再一個個複制粘貼每個表的餘額。這當然可以解決問題,不過效率太低了吧,你不加班誰加班?

也有比較聰明的,先獲取工作表名稱,然後用LOOKUP函數查找餘額,這樣保證以後的餘額更新,也能正确獲取。

excel怎麼複制vba語句(經常做Excel表格的你)3

如果你學VBA,那你就會看到讓你震驚的一幕,點一下彙總的按鈕,1秒搞定。

excel怎麼複制vba語句(經常做Excel表格的你)4

這才是真正的效率!

也許你會認為這個VBA代碼很麻煩,其實這個真的很簡單,很短的語句就可以實現。

excel怎麼複制vba語句(經常做Excel表格的你)5

Sheets.Count就是統計一共有多少個工作表。

Sheets(i).Name就是獲取每個工作表的名稱。

Sheets(i).Range("e65536").End(xlUp)就是獲取每個工作表E列最後一個非空單元格的值。

Cells(i, 1)就是A列,Cells(i, 2)就是B列。

For Next就是一個循環語句。

知道了意思以後,如果要自己更改就變得更簡單了。

VIP群有一個類似的問題,就是A列提取工作表名稱,B列提取每個表的B2單元格。

Sub 彙總1() Dim i% For i = 2 To Sheets.Count Cells(i, 1) = Sheets(i).Name Cells(i, 2) = Sheets(i).[b2] NextEnd Sub

Sheets(i).[b2]這個就是代表每個表的B2單元格,B2在VBA有很多種表示法,除了[B2],還有Cells(2, 2)、Range("b2")。

VBA入門雖然有點難,不過隻要你掌握了基本的方法,工作效率會大大提升。

,

更多精彩资讯请关注tft每日頭條,我们将持续为您更新最新资讯!

查看全部

相关圖文资讯推荐

热门圖文资讯推荐

网友关注

Copyright 2023-2024 - www.tftnews.com All Rights Reserved