excel如何自動執行vba程序-tft每日頭條

首页

每日頭條

生活

excel如何自動執行vba程序

更新时间：2026-01-12 11:46:58

錄入過程中，為了反複錄入符号“√”，讓不少人心煩。

excel如何自動執行vba程序（ExcelVBA自動錄入一個）1

解決的辦法可以使用數據有效性，也可以使用VBA，方法很簡單。

假如I列要輸入“是否三好學生”，如果是，錄入一個“√”，因為第1、2行為标題行，從第3行開始，點擊鼠标，顯示一個“√”。

鼠标右鍵點擊工作表标簽，選擇“查看代碼”，将如下代碼粘貼到光标處：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Rng As Range
Application.EnableEvents = False
For Each Rng In Target
If Rng.Row > 2 And Rng.Column = 9 Then '如果單元格行号大于2 并且列号等于9 (I列)
Rng = IIf(Rng = "√", "", "√") '如果這個單元格原來是"√"，改為空，否則，輸入"√"
End If
Next
Application.EnableEvents = True
End Sub

返回工作表，即可使用該功能。

Comments

Welcome to tft每日頭條 comments! Please keep conversations courteous and on-topic. To fosterproductive and respectful conversations, you may see comments from our Community Managers.

Show More Comments

推荐阅读

星球父子的日常搞笑

搞笑合集第一章老八返祖這一天，一隻小兔子正在草地上蹦迪，老八突然從天上掉了下來，屁股正好把正在蹦迪的小兔子給用屁臭死了。本來他光坐一下是沒事的，但他卻放了個昆，把小兔子給臭死了。老八把小兔子給烤了，帶屁的兔子肉，老八大喊，爽!香!好吃!這個...

2026-01-12

蜜蜂越冬箱養法

根據環境不同，蜜蜂不一定都需要室内越冬，一般隻要冬天保證足夠的食物，蜜蜂就能安全過冬，而在天氣比較惡劣的時候，室内越冬可以很好地保護蜂群免受侵害。室内越冬與室外越冬有何不同？在室内越冬蜜蜂比在室外越冬對蜜蜂要好。在寒冷地區，室外越冬的蜜蜂要...

2026-01-12

300環用時最短紀錄

今年賽季已經拉開帷幕，環意大利職業公路自行車賽剛剛結束，環法國職業公路自行車賽即将舉行，但是，大家在看這些頂級自行車大賽的時候，是不是總是看的雲裡霧裡的呢？在相關賽事的直播和報道中，各種相關術語，你是否搞的清楚呢？今天小編就整理出來有關公路...

2026-01-12

最好看的松樹盆景造型

大雪壓青松，青松挺且直。要知松高潔，待到雪化時。--陳毅《青松》古人說門前松、門後竹。松樹從古到今深受人們的喜歡，贊美松樹的詩詞不計其數。家養的松樹盆景養得好，一點也不比山間的遜色。松樹不畏嚴寒，就算是在嚴寒時分也非常挺拔。許多文人都自比松...

2026-01-12

魚身上這塊肉緻癌

縱觀餐桌上的各類美食，最值得大家關注的其實還是“肉類食品”；而在各種美味肉食中，魚類是建議大家每天都要進食的一類食材；魚肉味道鮮美且營養充足，食用對于身體而言有着多種積極的意義；正因為如此，魚肉應該吃，更應“安全健康”食用，一篇“食肉美文”...