Hide Rows based on cell content after unique records sort

[RudeRam]

I have worksheet were folks will paste info into column A and Vlookup returns results.
I have set a sort my unique records only, what I want to have happen if there is no data in column B 1 want that row to be hidden also.
Ideally I’d like to combine with what I have recorded for the sort:

Sub Sort()
'
' Sort Macro
'
' Keyboard Shortcut: Ctrl+Shift+S
'
Range("A1:B92").AdvancedFilter Action:=xlFilterInPlace, Unique:=True
End Sub

Thanks in advance for any help on this.

Rick

PS Apologies for all information the from the worksheet, figured better to include all then not enough

Excel 2010
	A	B
1	Event Code	Event Descp
2	51	Online Username Change
3	72	CGIAccountProfile
4	56	#N/A
5	113	#N/A
6	264	#N/A
8	265	#N/A
9	71	#N/A
11	369	cqPresentment
12	132	#N/A
13	258	#N/A
14	331	#N/A
15	45	#N/A
16	306	#N/A
17	23	#N/A
18	521	#N/A
19	450	#N/A
21	483	#N/A
22	296	#N/A
23	537	#N/A
24	360	cqRegisterIntro
25	246	#N/A
26	386	contactOCSDisplay
27	134	Consumer online banking activation by phone bank
28	583	#N/A
29	543	#N/A
30	204	#N/A
33	476	#N/A
34	277	#N/A
35	387	creditCardAuth
36	90	#N/A
37	559	OutOfWalletAuthen
38	465	#N/A
39	425	#N/A
40	268	#N/A
41	468	#N/A
Sheet1

Cell Formulas
Range	Formula
B2	=VLOOKUP(A2,Risky_Events,4,0)
B8	=VLOOKUP(A8,Risky_Events,4,0)
B11	=VLOOKUP(A11,Risky_Events,4,0)
B21	=VLOOKUP(A21,Risky_Events,4,0)
B33	=VLOOKUP(A33,Risky_Events,4,0)

Named Ranges
Name	Refers To	Cells
Risky_Events	=Sheet2!$B$2:$E$91

 

[JoeMo]

Assuming you mean that an error returned by your VLOOKUP is what you mean by a cell with no data:

Sub Sort()
' Keyboard Shortcut: Ctrl+Shift+S
'
Range("A1:B92").AdvancedFilter Action:=xlFilterInPlace, Unique:=True
On Error Resume Next
    Range("B2:B92").SpecialCells(xlCellTypeFormulas, xlErrors).EntireRow.Hidden = True
On Error GoTo 0
End Sub

 

[RudeRam]

JoeMo,

Thank for the reply, yes that is what I mean, I have the #N/A "hidden" by formatting I honestly forgot they were there. Your edits worked perfectly.

Thank you again

Rick