Done Rajan,

Thank u...

*
Best Regards,
*
*Venkat *
*Chennai*
*
*

On Wed, Aug 3, 2011 at 3:06 PM, Rajan_Verma <rajanverma1...@gmail.com>wrote:

>  *Select the range according to the msg of Input Box*
>
> * *
>
> *Like Vlookup Function : just give the Range to input box*
>
> *From:* excel-macros@googlegroups.com [mailto:
> excel-macros@googlegroups.com] *On Behalf Of *Venkat CV
> *Sent:* Wednesday, August 03, 2011 2:09 PM
>
> *To:* excel-macros@googlegroups.com
> *Subject:* Re: $$Excel-Macros$$ Vlookup Including Cell Comments..****
>
>  ** **
>
> Hi Rajan,****
>
> ** **
>
> Thanks for reply How can i give the inputs In Input boxes. Please explain*
> ***
>
> ** **
>
> ** **
>
> *Best Regards,*****
>
> *Venkat*****
>
> *Chennai*****
>
> ** **
>
> ** **
>
> On Wed, Aug 3, 2011 at 1:27 PM, Rajan_Verma <rajanverma1...@gmail.com>
> wrote:****
>
> *See if it Helps :*****
>
> * *****
>
> *Sub VlookupByCodes()*****
>
> * *****
>
> *Dim ResultRange As Range*****
>
> *Dim SearchRange As Range*****
>
> *Dim ColNum As Integer*****
>
> *Dim LookUpValue As Range*****
>
> *Dim cellResult As Range*****
>
> *Dim CellSearch As Range*****
>
> *Dim i As Integer*****
>
> * *****
>
> *        Set ResultRange = Application.InputBox("Select the Range Where
> You want Output", , , , , , , 8)*****
>
> *        Set LookUpValue = Application.InputBox("Select the Range of
> searchable Value", , , , , , , 8)*****
>
> *        Set SearchRange = Application.InputBox("Select the Range to
> Search Value", , , , , , , 8)*****
>
> *        ColNum = Application.InputBox("Give Colnum")*****
>
> *        i = 1*****
>
> *                *****
>
> *                    For Each cellResult In ResultRange*****
>
> *                            For Each CellSearch In SearchRange*****
>
> *                                    If CellSearch.Value =
> LookUpValue.Cells(i, 1).Value Then*****
>
> *                                        cellResult.Value =
> CellSearch.Offset(0, ColNum).Value*****
>
> *                                                If
> hasComment(CellSearch.Offset(0, ColNum)) = True Then*****
>
> *                                                    cellResult.AddComment
> *****
>
> *
> cellResult.Comment.Visible = True*****
>
> *
> cellResult.Comment.Text CellSearch.Offset(0, ColNum).Comment.Text*****
>
> *                                                End If*****
>
> *                                        i = i + 1*****
>
> *                                        Exit For*****
>
> *                                    End If*****
>
> *                            Next*****
>
> *                    Next*****
>
> *Set ResultRange = Nothing*****
>
> *Set LookUpValue = Nothing*****
>
> *Set SearchRange = Nothing*****
>
> *Set cellResult = Nothing*****
>
> *Set CellSearch = Nothing*****
>
> *        *****
>
> *End Sub*****
>
> * *****
>
> * *****
>
> *Private Function hasComment(cell As Range) As Boolean*****
>
> *On Error GoTo err:*****
>
> *If cell.Comment.Text <> "" Then*****
>
> *hasComment = True*****
>
> *Else*****
>
> *hasComment = False*****
>
> *End If*****
>
> *err:*****
>
> *If err.Number <> 0 Then*****
>
> *hasComment = False*****
>
> *End If*****
>
> *End Function*****
>
> * *****
>
> *From:* excel-macros@googlegroups.com [mailto:
> excel-macros@googlegroups.com] *On Behalf Of *Venkat CV
> *Sent:* Wednesday, August 03, 2011 12:54 PM
> *To:* excel-macros@googlegroups.com
> *Subject:* Re: $$Excel-Macros$$ Vlookup Including Cell Comments..****
>
>  ****
>
> Dear Ashish,****
>
>  ****
>
> Find attached Sample Worksheet with my requiremnt.. ****
>
> *Best Regards,*****
>
> *Venkat*****
>
> *Chennai*****
>
>  ****
>
> On Wed, Aug 3, 2011 at 12:01 PM, ashish koul <koul.ash...@gmail.com>
> wrote:****
>
> can you attach the worksheet ****
>
>  ****
>
> On Wed, Aug 3, 2011 at 11:11 AM, Venkat CV <venkat1....@gmail.com> wrote:*
> ***
>
> Dear All, ****
>
>  ****
>
> Let me know how to Vlookup Including Cell Comments..in Each Cells...****
>
>  ****
>
>
> ****
>
> *Best Regards,*****
>
> *Venkat*****
>
> *Chennai*****
>
>  ****
>
>  ****
>
>  ****
>
>  ****
>
> --
>
> ----------------------------------------------------------------------------------
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/discussexcel****
>
>
>
> ****
>
> -- ****
>
> *Regards*****
>
> * *****
>
> *Ashish Koul*****
>
> *akoul*.*blogspot*.com <http://akoul.blogspot.com/>*
> http://akoul.posterous.com/*****
>
> *akoul*.wordpress.com <http://akoul.wordpress.com/>****
>
> My Linkedin Profile <http://in.linkedin.com/pub/ashish-koul/10/400/830>***
> *
>
>  ****
>
> P Before printing, think about the environment.****
>
>  ****
>
>  ****
>
> --
>
> ----------------------------------------------------------------------------------
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/discussexcel****
>
>
>
>
> -- ****
>
>  ****
>
>  ****
>
>  ****
>
>  ****
>
> --
>
> ----------------------------------------------------------------------------------
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/discussexcel****
>
> --
>
> ----------------------------------------------------------------------------------
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/discussexcel****
>
>
>
>
> -- ****
>
> ** **
>
> ** **
>
> ** **
>
> ** **
>
> --
>
> ----------------------------------------------------------------------------------
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/discussexcel****
>
> --
>
> ----------------------------------------------------------------------------------
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/discussexcel
>



-- 
*
*
*
*

-- 
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/discussexcel

Reply via email to