Если не значение между не работает.VBA в Excel - PullRequest
0 голосов
/ 25 мая 2018

Я использовал Stackoverflow для решения многих проблем, но на этот вопрос я не могу найти ответ.Если не состояние, то это неправда, никогда, но даже когда это должно быть.

dim Val as integer
    for i = 1 to 2
       Val=.Range("N" & i).Value 'Val is 0 for example

       Msgbox(Val) 'to debug what the value is and this example it is 0

       If not (300<=Val<=500) then 'this statement is never true even if Value=0
           'Do stuff
       End If

    next i

1 Ответ

0 голосов
/ 25 мая 2018

Попробуйте вместо этого:

for i = 1 to 2
   Val=.Range("N" & i).Value 'Value is 0 for example

   Msgbox(Val) 'to debug what the value is and this example it is 0

   If Val >= 300 And Val<=500 then ' check if Val is between 300 and 500
       'Do stuff
   End If

next i

Переименовали вашу переменную в Val, чтобы различить ее и .Value.свойство

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