最終效果
廢話少說(shuō),直接附上動(dòng)態(tài)演示,用極少的文字,用直觀的感受讓你輕松學(xué)習(xí),得到提高。
動(dòng)態(tài)演示
操作說(shuō)明:
在開(kāi)發(fā)工具->插入->表單控件->按鈕,命名為保存
右鍵選中該按鈕,制定宏->錄制宏,開(kāi)始錄制宏
復(fù)制源Sheet中的錄入數(shù)據(jù)
到目標(biāo)Sheet中,選中A1單元格,同時(shí)Ctrl+下方向鍵,進(jìn)入到A列最后一個(gè)非空單元格。然后,使用相對(duì)引用,點(diǎn)擊向下方向鍵,進(jìn)入到A列第一個(gè)空白單元格。
然后粘貼,粘貼完成后,重復(fù)第4步操作,回到A列第一個(gè)空白單元格,讓下次新增數(shù)據(jù)時(shí)自動(dòng)添加到已有數(shù)據(jù)下方。
最后在開(kāi)發(fā)工具->停止錄制宏,結(jié)束宏錄制,保存Excel為xslm格式(宏啟用的Excel類型)。
關(guān)鍵點(diǎn):
Ctrl+下方向鍵:進(jìn)入到某列最后一個(gè)非空單元格
使用相對(duì)引用:相對(duì)于某個(gè)單元格的位置為相對(duì)應(yīng)用。
Alt+F11或者開(kāi)發(fā)工具\(yùn)Visual Basic進(jìn)入到VBA代碼編輯器,如下圖:
第1-2行:選中A2:D11,并且復(fù)制選中的單元格
第3行:選中[員工考核信息表]Sheet
第4-7行:選中[員工考核信息表]Sheet的A1單元格,實(shí)現(xiàn)Ctrl+下方向鍵效果,再往下方相對(duì)移動(dòng)一格并選中,粘貼數(shù)據(jù)
第8-10行:選中[員工考核信息表]Sheet的A1單元格,實(shí)現(xiàn)Ctrl+下方向鍵效果,再往下方相對(duì)移動(dòng)一格并選中
第11-15行:選中[員工考核信息新增]Sheet的A2:D11單元格,清除所選內(nèi)容
打開(kāi)VBA代碼編輯器并放在操作頁(yè)面右邊,選中某個(gè)代碼行,在操作頁(yè)面中錄入兩行數(shù)據(jù)點(diǎn)保存,一步一步的跟蹤代碼,就能看到每一步代碼的效果。
是不是非常簡(jiǎn)單啊?小伙伴們可以去試一試。
這一期主要講了Excel宏錄制的實(shí)際應(yīng)用 - 信息錄入功能,不用手寫(xiě)任何一段VBA代碼,輕松實(shí)現(xiàn)信息錄入,保存。包括:宏錄制,VBA代碼講解,VBA-調(diào)試。
感謝各位小伙伴觀看,轉(zhuǎn)發(fā),關(guān)注。
關(guān)鍵詞:Excel宏,VBA,VBA調(diào)試,Excel信息錄入。
聯(lián)系客服