Insert text into column

I need to do the following to insert text on one sheet based on a column not being null on another sheet.  I need help with the VBA.

If sheet4 column AP is not null
Insert "1"  into Sheet19 column D
where sheet4 columnC = Sheet 19 Column A   -----        ' for the ID number to match

Thanks in advance.
leezacAsked:
Who is Participating?

Improve company productivity with a Business Account.Sign Up

x
 
Saqib Husain, SyedConnect With a Mentor EngineerCommented:
=IF(INDEX(Sheet4!AP:AP,MATCH(A1,Sheet4!C:C,0))<>"",1,"")

If there is a possibility that sheet19 column A is not found on sheet 4 column C then you can use this formula

=iferror(IF(INDEX(Sheet4!AP:AP,MATCH(A1,Sheet4!C:C,0))<>"",1,""),"Not found")

if you are using version 2003 then change the second formula to

=if(iserror(IF(INDEX(Sheet4!AP:AP,MATCH(A1,Sheet4!C:C,0))<>"",1,"")),"",IF(INDEX(Sheet4!AP:AP,MATCH(A1,Sheet4!C:C,0))<>"",1,""))
0
 
jsdrayConnect With a Mentor Commented:
copy this down sheet19 column D : =IF(ISBLANK(Sheet4!AP1),"",1)
copy this down sheet4 column C: =IF(ISBLANK(Sheet4!AP1),"",Sheet19!A1)
0
 
leezacAuthor Commented:
Thank you - I will test today the suggestions.
0
Free Tool: Port Scanner

Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

 
leezacAuthor Commented:
I am using 2003 now but will be converting to 2010 in the future.
0
 
Saqib Husain, SyedEngineerCommented:
The third formula will work on all versions.

The second formula will not work on 2003.
0
 
Saqib Husain, SyedEngineerCommented:
Only one of the answers could be correct. Then why split points?
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.