首页
/
每日頭條
/
生活
/
excel如何自動執行vba程序
excel如何自動執行vba程序
更新时间:2025-02-20 17:52:18

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

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

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

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

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

  1. Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  2. Dim Rng As Range
  3. Application.EnableEvents = False
  4. For Each Rng In Target
  5. If Rng.Row > 2 And Rng.Column = 9 Then '如果單元格行号大于2 并且 列号等于9 (I列)
  6. Rng = IIf(Rng = "√", "", "√") '如果這個單元格原來是"√",改為空,否則,輸入"√"
  7. End If
  8. Next
  9. Application.EnableEvents = True
  10. 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.
Sign up to post
Sort by
Show More Comments
Copyright 2023-2025 - www.tftnews.com All Rights Reserved