我有一个警报消息列表,我想根据单元格H5中的值显示在单元格K5中。我在模块中有这段代码。
Sub Display_Alarm_Descriptions()
Dim alarmNumber As Integer, alarmMsg As String
alarmNumber = Range("H5").Value
If alarmNumber = 0 Then alarmMsg = "No Active Alarms"
If alarmNumber = 1 Then alarmMsg = "Proofer Output Fa