☰

如果从数据验证列表中选择的值满足条件，则使用 VBA 代码制定输入单元格

tag-icon • tag-icon microsoft-excel
如果从数据验证列表中选择的值满足条件，则使用 VBA 代码制定输入单元格

我需要一些 VBA 代码方面的帮助。请参见下面的电子表格，但其基本工作原理如下：

  1. 电子表格的作用是输入预算并记录支出

  2. A 列是数据验证列表，其中列出了我有预算的项目。在此示例中，我的列表包括苹果、橙子、梨和香蕉

  3. 对于每个选定的项目，用户将其分配的预算输入到 B 列（预算），然后制定支出/剩余列。因此，B 列是 ENTRY 列

我的问题是，如果用户选择香蕉，则不需要预算，因此我想将 B 列（预算列，即 ENTRY 列）设置为自动读取 $ 0.00。这样会向用户表明不需要预算。

任何帮助，将不胜感激

Fruit    Budget     Spend   Remaining
APPLES   $100.00    $-       $100.00 
ORANGES  $150.00    $-       $150.00 
PEARS    $200.00    $-       $200.00 
BANANAS         $-       $-

 

答案1

我认为预算栏不需要任何 VBA 代码，因为一个简单的 IF 公式就可以解决这个问题。

您可以将此公式用于预算列。

=IF(A2="Apple",100,IF(A2="Orange",150,IF(A2="Banana",0,IF(A2="Pear",120,"No Budget"))))

注意： 当您选择 Banana 时，公式将输入 0，并且由于支出列有其他公式，因此将处理下一步。

还，“没有预算”如果两个名字都不会出现在 A 列中，您也可以用空格替换它

现在介绍支出栏（C 列）。需要根据 A 列中的水果名称和 B 列中的预算价值，使用下面的公式进行进一步计算。

=IF(AND(A2="Apple",B2>0),B2+100,IF(AND(A2="Orange",B2>0),B2+150,IF(AND(A2="Pear",B2>0),B247+120,"No Budget")))

希望这对你有帮助。

相关内容