2012-05-28 1 views
0
If ActiveSheet.Cells(myRow, 3).Value = "" Then 
    APCtext = "" & APC = 2 
ElseIf ActiveSheet.Cells(myRow, 3).Value = "?" Then 
    APCtext = "Unknown" & APC = 3 
Else 
    APCtext = ActiveSheet.Cells(myRow, 3).Value & APC = 1 
End If 

Первое значение, которое должно быть получено, не пустое или вопросительный знак, однако оно не возвращает это значение в разделе else. Может ли кто-нибудь указать, что не так с этим кодом?Простые vbscript - значения не возвращаются из таблицы

+0

я думаю, что вы пытаетесь запустить 2 заявления и с помощью '&', чтобы сделать это. просто сделайте следующий оператор в новой строке и используйте начало для своих утверждений. – ericosg

+0

ах нормально, что нормальное соглашение? –

+0

'&' - это конкатенация строк в vbscript. –

ответ

0

Попробуйте это:

If ActiveSheet.Cells(myRow, 3).Value = "" Then 
    APCtext = "" 
    APC = 2 
ElseIf ActiveSheet.Cells(myRow, 3).Value = "?" Then 
    APCtext = "Unknown" 
    APC = 3 
Else 
    APCtext = ActiveSheet.Cells(myRow, 3).Value 
    APC = 1 
End If 
+0

thankyou, очевидная ошибка>. < –