时间戳

首页 > 解决方案 > 当必须字段为空时如何在 Excel 中创建警告消息

excel - 当必须字段为空时如何在 Excel 中创建警告消息

问题描述

我有一个表，其中 F 列是名称，H 列是年龄。当 F9 被填满时，我希望 H9 自动成为必填项。

如果我填写了单元格 F9 而没有填写单元格 H9，则会显示一条消息：“请填写年龄！”。只有当我填写了H9时，我才能继续写其他东西。F10-H10、F11-H11 也是如此……

如果 F9 为空，则没有任何反应。

标签： excelvba

解决方案

简单的公式方法：在 H9 中输入

=IF(F9="","","please fill in age!")

然后用户将覆盖公式

作为vba：放入字段所在的工作表

Option Explicit

Sub Worksheet_Change(ByVal Target As Range)

Dim name As Range
Dim age As Range
Dim i As Double
Dim lastrow As Double

lastrow = Cells(Rows.Count, 6).End(xlUp).Row

For i = 9 To lastrow
    Set name = ActiveSheet.Range("F" & i)
    Set age = ActiveSheet.Range("H" & i)
    If name.Value <> "" And age.Value = "" Then
       MsgBox "please fill in age!"
    End If
Next i

End Sub

推荐阅读