时间戳

首页 > 解决方案 > Excel 中的多个参数

excel - Excel 中的多个参数

问题描述

对 excel 编码非常陌生，并且主要遵循教程来帮助我的工作场所。

构建一个用于数据收集的多条目跟踪器，它将数据从一个工作簿传输到另一个工作簿“数据库”。

无论如何，我的跟踪器的一部分使用单选按钮，而我的企业想要引入第三个单选按钮。

路障：当前使用 IIF 函数：

.Range("C" & iRow).Value = IIf(frmDataEntry.optDCH.Value = True, "Discharge" , "Funding")

问题：H将其扩展为 3 个选项并引入“其他”类别的代码是什么，以便如果用户不选择 Discharge 或 Funding，它会选择 Other？

任何帮助将不胜感激！

标签： excelvba

解决方案

尝试这样的事情：

Dim v

Select Case True
    Case frmDataEntry.optDCH.Value: v = "Discharge"
    Case frmDataEntry.optFund.Value: v = "Funding" 'guessing at the control name...
    Case Else: v = "Other"
End Select

.Range("C" & iRow).Value = v

如果此代码在用户表单中，您可以使用Me而不是frmDataEntry

推荐阅读