View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
bxc2739
 
Posts: n/a
Default Need Quick Macro Help!


Additionally:

I have already succeeding in comparing ONLY the zip code.

Here is the code:

Option Explicit

Sub CheckExists()
Dim c As Range, cl As Range, rSearch As Range, rStart As Range

Set rSearch = Worksheets("Siebel").Range("s1",
Worksheets("Siebel").Range("s65536").End(xlUp))
Set rStart = Worksheets("Work").Range("B1",
Worksheets("Work").Range("b65536").End(xlUp))
With Application
.ScreenUpdating = False
.Calculation = xlManual

For Each cl In rStart
With rSearch
Set c = .Find(cl.Value, LookIn:=xlValues)
If Not c Is Nothing Then
cl.EntireRow.Interior.ColorIndex = 3
End With
Next cl

.Application.ScreenUpdating = True
.Calculation = xlCalculationAutomatic
End With
End Sub

royUk at ozgrid gave me this code and it works wonderfully

What I need to do now is the *second step*:
_How_do_I_compare_AT_THE_SAME_TIME_both_the_ZIP_CO DE_(numeric)_AND_the_CUSTOMER_NAME_(string/character/word)_of_sheet2_to_the_Zip_and_Name_of_sheet1.??_

Do I need a nested FOR LOOP or a seperate for Loop after the first
one??
How shall I go about coding this? I've tried a lot of things but it
never works..


--
bxc2739
------------------------------------------------------------------------
bxc2739's Profile: http://www.excelforum.com/member.php...o&userid=32538
View this thread: http://www.excelforum.com/showthread...hreadid=535657