Thank you raj for your help
On Sun, Aug 7, 2011 at 8:04 PM, Rajan_Verma <rajanverma1...@gmail.com>wrote: > *See this Function :* > > * * > > *if sum of any Two cell in selected Range is Equal to Given Value in > Second Parameter of Function then Function will Return the Address of that > Two Cells, here Flag will be True if condition will match, * > > *Next if Condition will not match Flag will be False, then I check again > if Flag is False then I Assign another Value to Function Name,* > > * * > > *Flag is nothing more then Simplify the programming ..* > > * * > > * * > > *Function GetAddress(Rng As Range, Value1 As Integer) As String* > > *Dim Flag As Boolean* > > *Dim cell As Range* > > *Dim cell2 As Range* > > *Flag = False* > > * * > > * For Each cell In Rng* > > * For Each cell2 In Rng* > > * If cell.Value + cell2.Value = Value1 Then* > > * Flag = True* > > * GetAddress = cell2.Address & "|" & cell.Address* > > * Exit For* > > * End If* > > * Next cell2* > > * Next cell* > > * * > > * If Flag = False Then* > > * GetAddress = "No Match Found"* > > * End If* > > *End Function* > > * * > > * * > > *From:* excel-macros@googlegroups.com [mailto: > excel-macros@googlegroups.com] *On Behalf Of *vijayajith VA > *Sent:* Sunday, August 07, 2011 7:22 PM > *To:* excel-macros@googlegroups.com > *Subject:* $$Excel-Macros$$ help 4**** > > ** ** > > Hi Excel gurus.**** > > ** ** > > Can anybody explain me on below code ?**** > > Just i wanted to kn About flag with examples ..Please dont scold me for > asking this type of silly questions ... i am still learing **** > > ** ** > > ** ** > > ** ** > > Thnks **** > > For Each cell In rng > flag = 0 > For t = LBound(List) To UBound(List) > If cell.Value = List(t) Then > > flag = 1 > Exit For > End If > Next > > If flag = 0 Then > List(i) = cell.Value > i = i + 1 > End If > Next > UniqueList = List(Pos) > End Function **** > > -- > > ---------------------------------------------------------------------------------- > 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