Solved

Excel Conditional Column Input

Posted on 2011-03-15
5
315 Views
Last Modified: 2012-05-11
From the sample spreadsheet attached, I'd like some help with a macro or statement which as soon as a tag number is entered on the right side of the fill bar in the TAG NO field, it looks for and matches the same tag number on the left side of the sheet, and then populates the rest of the columns to match the tag number.  If there's no match, I'd like the tag number column on the right to return "no match."  
Palletized-Product-Status.xls
0
Comment
Question by:mrherndon
  • 2
  • 2
5 Comments
 
LVL 50

Accepted Solution

by:
barry houdini earned 500 total points
Comment Utility
Try this formula in Q2 copied down the column

=IF(P2="","",IF(COUNTIF($A$2:$A$5000,$P2),IF(INDEX(B$2:B$5000,MATCH($P2&"",$A$2:$A$5000,0))="","",INDEX(B$2:B$5000,MATCH($P2&"",$A$2:$A$5000,0))),"No Match"))

and in R2 copied across to AC2 and down all those columns

=IF($P2="","",IF($Q2="No Match","",IF(COUNTIF($A$2:$A$5000,$P2),IF(INDEX(C$2:C$5000,MATCH($P2&"",$A$2:$A$5000,0))="","",INDEX(C$2:C$5000,MATCH($P2&"",$A$2:$A$5000,0))),"No Match")))

see attached

regards, barry
26888994.xls
0
 
LVL 41

Expert Comment

by:dlmille
Comment Utility
You just need a simple conditional vlookup statement, like

[Q2] =IF(ISNA(VLOOKUP($P2,$A:$N,COLUMN(B$2),0)),"No Match",VLOOKUP($P2,$A:$N,COLUMN(B$2),0))

and this can be copied across the columns to the right, and/or down.  As you have formatted, it depends on the order of the columns on the left.  As your columns on the left are the same, this VLOOKUP is a simple approach.

You only need a macro if you want the Tag No column to show "No Match" and that would be tough on the user, overwritting the number input with "No Match".  As an alternative, this formula fills all the columns to the right of Tag No with "No Match".

PS - you might also consider adding a Data Validation Field on the Tag No entry field, that way, only valid data can be pulled up on the right - never a "No Match" case!

See attached.

Enjoy!

Dave
Palletized-Product-Status-r1.xls
0
 
LVL 20

Expert Comment

by:pari123
Comment Utility
If you have empty cells within the same row and you don't want to add the ";" to the cells then you can also try this -
this code will skip empty cells.
Sub addme()
    For i = 1 To Cells(65536, "A").End(xlUp).Row
        If Right(Range("A" & i), 1) <> ";" And Range("A" & i) <> "" Then
            Range("A" & i) = Range("A" & i) & ";"
        End If
    Next
End Sub

Open in new window

0
 
LVL 20

Expert Comment

by:pari123
Comment Utility
sorry wrong post... pls ignore.
0
 
LVL 41

Expert Comment

by:dlmille
Comment Utility
@ mrherndon - I'm curious if you tried my solution.

Cheers,

Dave
0

Featured Post

IT, Stop Being Called Into Every Meeting

Highfive is so simple that setting up every meeting room takes just minutes and every employee will be able to start or join a call from any room with ease. Never be called into a meeting just to get it started again. This is how video conferencing should work!

Join & Write a Comment

This collection of functions covers all the normal rounding methods of just about any numeric value.
Deploying a Microsoft Access application in a Citrix environment is not difficult but takes a few steps. However, Citrix system people are often of little help, as they typically know next to nothing about Access. The script provided here will take …
This Micro Tutorial will demonstrate on a Mac how to change the sort order for chart legend values and decrpyt the intimidating chart menu.
Polish reports in Access so they look terrific. Take yourself to another level. Equations, Back Color, Alternate Back Color. Write easy VBA Code. Tighten space to use less pages. Launch report from a menu, considering criteria only when it is filled…

744 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

18 Experts available now in Live!

Get 1:1 Help Now