Thanks Mangesh...
On Fri, May 25, 2012 at 11:04 PM, Mangesh Dayne <mangesh.da...@gmail.com>wrote:
> Simply Awesome !!!
>
>
> On Fri, May 25, 2012 at 8:27 PM, NOORAIN ANSARI
> <noorain.ans...@gmail.com>wrote:
>
>> Dear Mangesh,
>>
>> Please try it...
>>
>> *Sub search_domain()
>> Dim rng As Range
>> Dim rw As Long
>>
>> Dim sh As Worksheet
>> Set sh = ThisWorkbook.Sheets(1)
>> sh.Range("D2:E7").ClearContents
>> For Each rng In sh.Range("H3:H" & sh.Range("H" &
>> Rows.Count).End(xlUp).Row)
>>
>> If Right(rng, Len(rng) - InStr(1, rng, "@")) = Range("B1") Then
>> With sh
>> rw = .Cells(Rows.Count, "E").End(xlUp).Row + 1
>> .Cells(rw, "E").Value = rng.Offset(0, 0)
>> .Cells(rw, "D").Value = rng.Offset(0, -1)
>> End With
>> End If
>> Next rng
>> End Sub
>> *
>>
>> See attached sheet.
>>
>>
>> Thanks & regards,
>> Noorain Ansari
>> www.noorainansari.com
>> www.excelmacroworld.blogspot.com
>>
>>
>> On Fri, May 25, 2012 at 6:57 PM, Mangesh Dayne
>> <mangesh.da...@gmail.com>wrote:
>>
>>> Thanks Noorain for your kind help.
>>> However, I need all the names with their mail id those we are searching
>>> for the domain code.
>>> For example, if we enter rediff.com in search box, then it would show -
>>> Name Email Amit a...@rediff.com Rajan ra...@rediff.com Please help
>>> me on above.
>>> Thanks again.
>>>
>>>
>>> Mangesh
>>>
>>>
>>> On Fri, May 25, 2012 at 6:04 PM, NOORAIN ANSARI <
>>> noorain.ans...@gmail.com> wrote:
>>>
>>>> Dear Mangesh,
>>>>
>>>> Please try it..and see attached sheet..
>>>>
>>>> Sub search_domainname()
>>>> Dim rng As Range
>>>> Dim sh As Worksheet
>>>> Set sh = ThisWorkbook.Sheets(1)
>>>> For Each rng In sh.Range("H3:H8")
>>>> If Right(rng, Len(rng) - InStr(1, rng, "@")) = Range("B1") Then
>>>> MsgBox "Found in Cell" & vbCrLf & rng.Address
>>>> Exit Sub
>>>> End If
>>>> Next rng
>>>> MsgBox "Not Found"
>>>> End Sub
>>>>
>>>> --
>>>> On Fri, May 25, 2012 at 5:29 PM, Mangesh Dayne <mangesh.da...@gmail.com
>>>> > wrote:
>>>>
>>>>> Hi All,
>>>>>
>>>>> Please help me on attached sheet.
>>>>>
>>>>> Thanks lot.
>>>>>
>>>>> with regards,
>>>>>
>>>>> Mangesh
>>>>>
>>>>> --
>>>>> FORUM RULES (986+ members already BANNED for violation)
>>>>>
>>>>> 1) Use concise, accurate thread titles. Poor thread titles, like
>>>>> Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need
>>>>> Advice will not get quick attention or may not be answered.
>>>>>
>>>>> 2) Don't post a question in the thread of another member.
>>>>>
>>>>> 3) Don't post questions regarding breaking or bypassing any security
>>>>> measure.
>>>>>
>>>>> 4) Acknowledge the responses you receive, good or bad.
>>>>>
>>>>> 5) Cross-promotion of, or links to, forums competitive to this forum
>>>>> in signatures are prohibited.
>>>>>
>>>>> NOTE : Don't ever post personal or confidential data in a workbook.
>>>>> Forum owners and members are not responsible for any loss.
>>>>>
>>>>>
>>>>> ------------------------------------------------------------------------------------------------------
>>>>> To post to this group, send email to excel-macros@googlegroups.com
>>>>>
>>>>> To unsubscribe, send a blank email to
>>>>> excel-macros+unsubscr...@googlegroups.com
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>
>>
>>
>> --
>> Thanks & regards,
>> Noorain Ansari
>> www.noorainansari.com
>> www.excelmacroworld.blogspot.com
>>
>>
>>
>>
>>
>
--
Thanks & regards,
Noorain Ansari
www.noorainansari.com
www.excelmacroworld.blogspot.com
--
FORUM RULES (986+ members already BANNED for violation)
1) Use concise, accurate thread titles. Poor thread titles, like Please Help,
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Cross-promotion of, or links to, forums competitive to this forum in
signatures are prohibited.
NOTE : Don't ever post personal or confidential data in a workbook. Forum
owners and members are not responsible for any loss.
------------------------------------------------------------------------------------------------------
To post to this group, send email to excel-macros@googlegroups.com
To unsubscribe, send a blank email to excel-macros+unsubscr...@googlegroups.com
