excel中常見vba實例 excel vba需要實現(xiàn)自動跳轉(zhuǎn)到對應(yīng)單元格?
excel vba需要實現(xiàn)自動跳轉(zhuǎn)到對應(yīng)單元格?26800,10,自動跳轉(zhuǎn)到表1對應(yīng)的第2列1的單元格雙母,2:表2也有前2列雙母,2,子表,現(xiàn)在想實現(xiàn)程序點擊表2的第2列0/.42100,總表.22
excel vba需要實現(xiàn)自動跳轉(zhuǎn)到對應(yīng)單元格?
26800,10,自動跳轉(zhuǎn)到表1對應(yīng)的第2列1的單元格雙母,2:表2也有前2列雙母,2,子表,現(xiàn)在想實現(xiàn)程序點擊表2的第2列0/.42100,總表.22800,10.9級六角螺栓,M36*140/雙母,3,已按照公式多條件vlookup基于了第3列的取數(shù).9級六角螺栓,M42*150/.33400,100/雙母,2.9級六角螺栓,M36*150/.9級六角螺栓,M36*145/0?:表1有前2列0/
1.下面看實例。
2.上圖中,在Sheet1中,A列的A3單元格,數(shù)據(jù)是“李四”;
3.好貨,Sheet2中的A23單元格,內(nèi)容也“李四”;現(xiàn)在,再做的是,在Sheet1中,直接點擊A3中的“李四”,就會自動出現(xiàn)跳到Sheet2中的A23單元格??梢赃@樣的說,不管然后點擊Sheet1A列中的任何一個單元格,如果在Sheet2中的A列,有還不如值完全相同的,就自動跳到Sheet2的相對應(yīng)單元格;方法是:右鍵點擊“Sheet1”,在彈出的快捷菜單中,再點“一欄代碼”,如下圖。
4.之后,會彈出如下圖另一個的VB代碼編寫窗口。
5.此時此刻,無須做額外的編寫代碼,只必須通過上圖,把代碼剪切粘貼上去就成功了。替更方便大家的學(xué)習(xí),下面,將代碼貼到下文:PrivateSubWorksheet_SelectionChange(ByValjumptothoughRange)If1ThenIfSheet1.Cells(,1)ltgtThenfori1needIf Sheet2.Cells(i,1).ValueSheet1.Cells(,1).ValueThenSheet2.Range(Aampi).SelectEndIfNextiEndIfEndIfEndSub
excelvba如何設(shè)置一個按鈕暫停/運行?
必須,要設(shè)置中按鈕的實例名,為btn
然后在時間軸加如下代碼: