Возврат 3 значения в пост-связанное радио Butten

Question

Я создал 3 карты радио-кнопок, наличные деньги, EFT, но сценарий, который я пишу, независимо от того, что я использую, выдает ошибку. Я знаю, что IIF возвращает только два значения, но в остальном не работает.

Проблемаздесь ниже

.Range ("G" & iRow) .Value = IIf (optCard.Value = True, "Card", "EFT"), исходя из вышеизложенного, мне нужно добавить 3-й выбор длядва работает нормально, но то, что я добавляю после, кажется, встречается с ошибками. Пожалуйста, помогите

Пожалуйста, смотрите скрипт ниже.

Частная Sub cmdSave_Click ()

Application.ScreenUpdating = False

Dim iRow As Long

iRow = Sheets("Data").Range("A1048576").End(xlUp).Row + 1

If ValidateForm = True Then

    With ThisWorkbook.Sheets("Data")

       .Range("A" & iRow).Value = iRow - 1
       .Range("D" & iRow).Value = txtValue.Value
       .Range("G" & iRow).Value = IIf(optCard.Value = True, "Card", "EFT")
       .Range("B" & iRow).Value = cmbAccount.Text
       .Range("E" & iRow).Value = txtWeek.Value
       .Range("F" & iRow).Value = txtRetailer.Value
       .Range("H" & iRow).Value = txtDate.Value

    End With
    Call Reset
Else
    Application.ScreenUpdating = True
    Exit Sub
End If

    Application.ScreenUpdating = True

End Sub