本篇经验将和大家分享【在VBA中,单元格地址的应用?】

工具/原料

  • 电脑一台
  • office办公软件

方法/步骤

  1. 1

    【实例:请将表中空单元格填入“未到”?】

  2. 2

    在工作表中,点击菜单栏【开发工具】,在其工具栏内,点击【visual basic】!

  3. 3

    进入VBA编辑界面!点击菜单栏【插入】,在其下拉菜单中,选择【模块】!

  4. 4

    会弹出模块编辑窗口!

  5. 5

    在代码编辑窗口输入以下代码。

    Sub 地址应用实例()

    Dim rng As Range, st As String

    On Error Resume Next

    For Each rng In Sheets("地址应用").[b2:d10]

      If rng = "" Then

        st = st & rng.Address & ","

      End If

    Next

    Range(Left(st, Len(st) - 1)) = "未到"

    End Sub

  6. 6

    点击VBA界面中,工具栏里的“运行”按钮!

  7. 7

    表中空白单元格会瞬间填入“未到”!

    END
经验内容仅供参考,如果您需解决具体问题(尤其法律、医学等领域),建议您详细咨询相关领域专业人士。