Question

我想在Excel中创建自动化单元格，它将显示要在该单元格中输入的数据类型。我想创建一个单元格，在这里显示＆＃34;输入用户名＆＃34;，＆＃34;在这里输入DOB＆＃34;与fb和Gmail登录页面中显示的内容相同。我不想保存任何凭据。

我创建了多个下拉列表，人们在点击该单元格之前不了解有下拉列表。所以我想创建自动化单元格，它将显示要输入到其中的数据类型。当我点击那个单元格时它应该会消失，如果我擦除了那个我输入的单元格中的内容，它就会出现。

Answer 1

查看更改选择事件：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    if target.address = "$A$1" then
         target.value = ""
    else
         Dim value as string
         value = range("$A$1").value
         if value="" then   'Note: It'd be better to check here if the user input is correct!
             range("$A$1").value = "Enter DOB here"
         end if
    end if
End Sub

修改用户的评论：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    if target.address = "$A$1" then
         if target.value = "Enter DOB here"
             target.value = ""
         end if
    else
         Dim value as string
         value = range("$A$1").value
         if value="" then   'Note: It'd be better to check here if the user input is correct!
             range("$A$1").value = "Enter DOB here"
         end if
    end if
End Sub

单元格应包含示例输入值，供用户查看

1 个答案: