Facing issue with "If IsEmpty"

[Rohith1324]

Hi,

I have cell where there is simple formula as below :

And basis on the above cell I have VBA code where I am using the "If IsEmpty" -

but when I execute the code I think the code is not considering the cell as empty when

and its moving and executing the else part of it.

If IsEmpty(C.Offset(0, 75).Value) = True Then
Else
bot.FindElementByXPath("//*[@id='N317:QuantityShipped:" & (C.Offset(0, 75).Value) & "']").Clear
bot.FindElementByXPath("//*[@id='N317:QuantityShipped:" & (C.Offset(0, 75).Value) & "']").SendKeys C.Offset(0, 9).Value
End If

Could someone please assist on how to fix this.

Regards,
Rohith

 

[earthworm]

Hi,

I have cell where there is simple formula as below :

View attachment 46558

And basis on the above cell I have VBA code where I am using the "If IsEmpty" -

but when I execute the code I think the code is not considering the cell as empty when View attachment 46559 and its moving and executing the else part of it.

If IsEmpty(C.Offset(0, 75).Value) = True Then
Else
bot.FindElementByXPath("//*[@id='N317:QuantityShipped:" & (C.Offset(0, 75).Value) & "']").Clear
bot.FindElementByXPath("//*[@id='N317:QuantityShipped:" & (C.Offset(0, 75).Value) & "']").SendKeys C.Offset(0, 9).Value
End If

Could someone please assist on how to fix this.

Regards,
Rohith

=try formula COUNTA=TRUE

 

[Rohith1324]

=try formula COUNTA=TRUE

Hi, you mean Instead of If IsEmpty(C.Offset(0, 75).Value) = True Then i have to use COUNTA = TRUE - in VBA Code ?

 

[Rohith1324]

=try formula COUNTA=TRUE

May be I just wanted to bit clarify my requirements :

the Cell would be visually blank ( due to the formula in excel the cell will be showing no values ) but when you click on that particular cell it would have an formula.

My requirement is that inspite the cell contains formula but visually blank I want to write VBA Code saying when the Cell is visually blank it should tell "Yes"/"True" if that gives me the result I can execute the rest of the script ( it has many lines )

 

[Akuini]

Try replacing:

If IsEmpty(C.Offset(0, 75).Value) = True Then

with:

If Len(C.Offset(0, 75).Value) = 0 Then

 

[Fluff]

Or even

If C.Offset(0, 75).Value = "" Then

 

[Rohith1324]

Try replacing:

If IsEmpty(C.Offset(0, 75).Value) = True Then

with:

If Len(C.Offset(0, 75).Value) = 0 Then

thank you It worked..

 

[Rohith1324]

thank you even this worked...

Or even

If C.Offset(0, 75).Value = "" Then

 

[Fluff]

Glad we could help & thanks for the feedback.