单元格的默认值(如果其对应的下拉菜单中包含特定字词/词组)

时间:2018-07-20 15:37:22

标签: excel excel-vba excel-formula

我有一个excel工作表,其中包含多个下拉列表,然后有较大的合并单元格以供注释。我想发生的是,如果下拉选项为“空白”,则注释单元格将显示两个星号(或方括号)。在将这两个星号放置在单元格中或未放置(取决于下拉选项)之后,我希望允许用户在这两个星号之间以及在同一单元格中的外部输入文本。

到目前为止,由于我不确定如何在单元格中使用公式和自定义文本(通常是不同的),因此我手动输入它们。是否有公式或代码可以这样做?还是可能将一个单元格中的公式重定向到另一个单元格,以便您还可以键入内容?

1 个答案:

答案 0 :(得分:0)

好的,这是我第三次尝试解释您的问题。我的印象是,您真正想要的是为注释单元格设置一个“默认值”,如果它对应的下拉列表是“ Material”。

在这种情况下,下拉列表位于A1:A10中,注释位于B1:B10中。

由于此代码的性质,如果任何下拉菜单已已设置为“材料”,则您必须将其更改为其他内容,然后再返回到材料以获取默认值弹出来。

Private Sub Worksheet_Change(ByVal Target As Range)

    'will trigger if the user makes a change to any cell A1 through A10, the dropdown cells
    If Not Intersect(Target, Range("A1:A10")) Is Nothing Then

        If Target.Value2 = "Material" Then
            'assumes the comment cell is one column to the right
            Target.Offset(0, 1) = "**"
        End If

    End If

End Sub