ElseIf формула для проверки, если ячейка пуста, и если так, чтобы убрать другие ячейки - PullRequest
0 голосов
/ 01 мая 2020

Я создал таблицу цитирования, в коде VBA у меня есть следующее:

Sub MatchI19()
If Range("J19").Value = "IWA" Then
    Range("K19").Value = "IWA"
    ElseIf Range("J19").Value = "IWK" Then
    Range("K19").Value = "IWK"
    ElseIf Range("J19").Value = "IWVD" Then
    Range("K19").Value = "IWVD"
End If
End Sub
Sub IndexMatchI19()
If Range("K19").Value = "IWA" Then
Range("L19") = "=INDEX(IWA!C:C,MATCH(I19,IWA!E:E,0))"
Range("M19") = "=INDEX(IWA!B:B,MATCH(I19,IWA!E:E,0))"
Range("N19") = "=INDEX(IWA!F:F,MATCH(I19,IWA!E:E,0))"
ElseIf Range("K19").Value = "IWK" Then
Range("L19") = "=INDEX(IWK!C:C,MATCH(I19,IWK!E:E,0))"
Range("M19") = "=INDEX(IWK!B:B,MATCH(I19,IWK!E:E,0))"
Range("N19") = "=INDEX(IWK!F:F,MATCH(I19,IWK!E:E,0))"
End If
End Sub

Я хотел бы добавить к этому еще один раздел. Если я удалю «Код продукта» из ячейки I19 после того, как этот VBA запустится, я увижу N / A код ошибки в L19, M19 и N19. Я хотел бы добавить фрагмент кода, который в основном определяет, содержит ли ячейка текст, что он закрывает ячейки L19, M19 и N19 или содержит какой-то стандартный текст, чтобы дать пользователю команду что-то сделать.

У кого-нибудь есть идеи? Заранее спасибо

1 Ответ

1 голос
/ 01 мая 2020

Благодаря @BigBen правильный способ форматирования этой формулы VBA: "= IFERROR (INDEX (IWA! C: C, MATCH (I19, IWA! E: E, 0))," "" ")"

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...