Combine Two vba Lines(If Condition + Vlookup)
 

Hi there

Code:
--------------------

'IF isempty(cells(r,14)) then leave Cells(r, 15) empty.
Cells(r, 15) = Application.VLookup(Cells(r, 4), AccChart2, 2, False)

--------------------


how to combine these tow line to be written in one VBA line?


--
helmekki


------------------------------------------------------------------------
helmekki's Profile: http://www.excelforum.com/member.php...fo&userid=6939
View this thread: http://www.excelforum.com/showthread...hreadid=392467

Combine Two vba Lines(If Condition + Vlookup)
 

If IsEmpty(Cells(r, 14)) Then
Cells(r, 15) = Null
Else
Cells(r, 15) = Application.VLookup(Cells(r, 4), AccChart2, 2,
False)
End If


I think this is what you are trying to do


--
tony h
------------------------------------------------------------------------
tony h's Profile: http://www.excelforum.com/member.php...o&userid=21074
View this thread: http://www.excelforum.com/showthread...hreadid=392467

Combine Two vba Lines(If Condition + Vlookup)
 

This seems too simplistic, but do you mean

IF Not isempty(cells(r,14))
Cells(r, 15) = Application.VLookup(Cells(r, 4), AccChart2, 2, False)
End If


--
HTH

Bob Phillips

"helmekki" wrote in
message ...

Hi there

Code:
--------------------

'IF isempty(cells(r,14)) then leave Cells(r, 15) empty.
Cells(r, 15) = Application.VLookup(Cells(r, 4), AccChart2, 2, False)

--------------------


how to combine these tow line to be written in one VBA line?


--
helmekki


------------------------------------------------------------------------
helmekki's Profile:
http://www.excelforum.com/member.php...fo&userid=6939
View this thread: http://www.excelforum.com/showthread...hreadid=392467

Combine Two vba Lines(If Condition + Vlookup)
 

Thank u very muc

--
helmekk

-----------------------------------------------------------------------
helmekki's Profile: http://www.excelforum.com/member.php...nfo&userid=693
View this thread: http://www.excelforum.com/showthread.php?threadid=39246