Thanks Amresh
On Wed, Jan 16, 2013 at 6:33 PM, Amresh Maurya <amreshkushw...@gmail.com>wrote:
> PFA ATTACHED FILE.
>
> USE THIS CODE
> Sub minmm()
> Dim n As Integer
> Range("B5:B5").Select
> With Selection.Interior
> .PatternColorIndex = xlAutomatic
> .ThemeColor = xlThemeColorDark1
> .TintAndShade = 0
> .PatternTintAndShade = 0
> End With
> n = 5
> Sheet1.Cells(5, 14).Formula = "=MIN(RC[-10],RC[-6],RC[-2])"
> Sheet1.Range(Cells(5, 14), Cells(10, 14)).Select
> Selection.FillDown
> Sheet1.Range(Cells(5, 15), Cells(10, 15)) =
>
> "=IF(RC[-1]=RC[-3],""Suresh"",IF(RC[-7]=RC[-1],""mukesh"",IF(RC[-1]=RC[-11],""amit"")))"
> Sheet1.Range(Cells(5, 14), Cells(10, 15)).Copy
> ActiveCell.PasteSpecial xlPasteValues
> Application.CutCopyMode = False
> Range("o5").Select
> For s = 1 To 6
> Cells(n, 15).Select
> If ActiveCell.Value = "Suresh" Then
> Cells(n, 12).Select
> With Selection.Interior
> .Pattern = xlSolid
> .PatternColorIndex = xlAutomatic
> .ThemeColor = xlThemeColorAccent6
> .TintAndShade = -0.249977111117893
> .PatternTintAndShade = 0
> End With
> Cells(n, 12).Select
> ElseIf ActiveCell.Value = "mukesh" Then
> Cells(n, 8).Select
> With Selection.Interior
> .Pattern = xlSolid
> .PatternColorIndex = xlAutomatic
> .ThemeColor = xlThemeColorAccent6
> .TintAndShade = -0.249977111117893
> .PatternTintAndShade = 0
> End With
> Cells(5, 12).Select
> ElseIf ActiveCell.Value = "amit" Then
> Cells(n, 4).Select
> With Selection.Interior
> .Pattern = xlSolid
> .PatternColorIndex = xlAutomatic
> .ThemeColor = xlThemeColorAccent6
> .TintAndShade = -0.249977111117893
> .PatternTintAndShade = 0
> End With
> End If
> n = n + 1
> Next
> Range("a1").Select
>
> End Sub
>
> On Wed, Jan 16, 2013 at 4:57 PM, Amit Gandhi <silkyro...@gmail.com> wrote:
> > Thanks Anil
> >
> > But i am unable to do so? Can you show this in example file.
> >
> > Regards
> >
> > Amit
> >
> >
> > On Wed, Jan 16, 2013 at 2:03 PM, अनिल नारायण गवली <
> gawlianil8...@gmail.com>
> > wrote:
> >>
> >> Dear Amit,
> >>
> >> U can use conditional format for each col in that u can use format only
> >> rows that contain lessthanequalto and in formula write =min(range) and
> >> format cell color to desire color.
> >>
> >> Regards,
> >> Gawli Anil
> >>
> >>
> >>
> >> On Wed, Jan 16, 2013 at 1:24 PM, Amresh Maurya <
> amreshkushw...@gmail.com>
> >> wrote:
> >>>
> >>> Hello Amit,
> >>>
> >>> PFA file .Kindly use the below code.
> >>>
> >>> Sub minmm()
> >>> n = 5
> >>> Sheet1.Cells(5, 14).Formula = "=MIN(RC[-10],RC[-6],RC[-2])"
> >>> Sheet1.Range(Cells(5, 14), Cells(10, 14)).Select
> >>> Selection.FillDown
> >>> Sheet1.Range(Cells(5, 15), Cells(10, 15)) =
> >>>
> >>>
> "=IF(RC[-1]=RC[-3],""Suresh"",IF(RC[-7]=RC[-1],""mukesh"",IF(RC[-1]=RC[-11],""amit"")))"
> >>> Sheet1.Range(Cells(5, 14), Cells(10, 15)).Copy
> >>> ActiveCell.PasteSpecial xlPasteValues
> >>> Application.CutCopyMode = False
> >>> Range("n4").Select
> >>> End Sub
> >>>
> >>> Regards
> >>> Amresh
> >>>
> >>> On Wed, Jan 16, 2013 at 12:31 PM, Amit Gandhi <silkyro...@gmail.com>
> >>> wrote:
> >>> > Hi Experts
> >>> >
> >>> > I have some data and I have get minimum no out of that by MIN
> formula.
> >>> > Now I
> >>> > want a formula or VBA macro to do following.
> >>> >
> >>> > 1. Minimum of column D, H, L gets highlighted as shown above.
> >>> > 2. Minimum's name is mentioned against each cell in column O.
> >>> >
> >>> > Pls see sample file attached.
> >>> >
> >>> > Pls help me here.
> >>> >
> >>> > Regards
> >>> >
> >>> > Amit
> >>> >
> >>> > --
> >>> > Join official Facebook page of this forum @
> >>> > https://www.facebook.com/discussexcel
> >>> >
> >>> > FORUM RULES
> >>> >
> >>> > 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) Jobs posting is not allowed.
> >>> > 6) Sharing copyrighted material and their links is not allowed.
> >>> >
> >>> > NOTE : Don't ever post confidential data in a workbook. Forum owners
> >>> > and
> >>> > members are not responsible for any loss.
> >>> > ---
> >>> > You received this message because you are subscribed to the Google
> >>> > Groups
> >>> > "MS EXCEL AND VBA MACROS" group.
> >>> > To post to this group, send email to excel-macros@googlegroups.com.
> >>> > To unsubscribe from this group, send email to
> >>> > excel-macros+unsubscr...@googlegroups.com.
> >>> > Visit this group at
> http://groups.google.com/group/excel-macros?hl=en.
> >>> >
> >>> >
> >>>
> >>> --
> >>> Join official Facebook page of this forum @
> >>> https://www.facebook.com/discussexcel
> >>>
> >>> FORUM RULES
> >>>
> >>> 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) Jobs posting is not allowed.
> >>> 6) Sharing copyrighted material and their links is not allowed.
> >>>
> >>> NOTE : Don't ever post confidential data in a workbook. Forum owners
> and
> >>> members are not responsible for any loss.
> >>> ---
> >>> You received this message because you are subscribed to the Google
> Groups
> >>> "MS EXCEL AND VBA MACROS" group.
> >>> To post to this group, send email to excel-macros@googlegroups.com.
> >>> To unsubscribe from this group, send email to
> >>> excel-macros+unsubscr...@googlegroups.com.
> >>> Visit this group at http://groups.google.com/group/excel-macros?hl=en.
> >>>
> >>>
> >>
> >>
> >>
> >> --
> >> Thanks & Regards,
> >> Gawli Anil Narayan
> >> Software Developer,
> >> Abacus Software Services Pvt Ltd
> >>
> >> --
> >> Join official Facebook page of this forum @
> >> https://www.facebook.com/discussexcel
> >>
> >> FORUM RULES
> >>
> >> 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) Jobs posting is not allowed.
> >> 6) Sharing copyrighted material and their links is not allowed.
> >>
> >> NOTE : Don't ever post confidential data in a workbook. Forum owners and
> >> members are not responsible for any loss.
> >> ---
> >> You received this message because you are subscribed to the Google
> Groups
> >> "MS EXCEL AND VBA MACROS" group.
> >> To post to this group, send email to excel-macros@googlegroups.com.
> >> To unsubscribe from this group, send email to
> >> excel-macros+unsubscr...@googlegroups.com.
> >> Visit this group at http://groups.google.com/group/excel-macros?hl=en.
> >>
> >>
> >
> >
> >
> >
> > --
> > 'Expecting the world to treat u fairly coz u r a good person is like
> > expecting the lion not to attack u coz u r a vegetarian.
> > Think about it.'
> >
> > Take care
> >
> > Amit
> >
> > --
> > Join official Facebook page of this forum @
> > https://www.facebook.com/discussexcel
> >
> > FORUM RULES
> >
> > 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) Jobs posting is not allowed.
> > 6) Sharing copyrighted material and their links is not allowed.
> >
> > NOTE : Don't ever post confidential data in a workbook. Forum owners and
> > members are not responsible for any loss.
> > ---
> > You received this message because you are subscribed to the Google Groups
> > "MS EXCEL AND VBA MACROS" group.
> > To post to this group, send email to excel-macros@googlegroups.com.
> > To unsubscribe from this group, send email to
> > excel-macros+unsubscr...@googlegroups.com.
> > Visit this group at http://groups.google.com/group/excel-macros?hl=en.
> >
> >
>
> --
> Join official Facebook page of this forum @
> https://www.facebook.com/discussexcel
>
> FORUM RULES
>
> 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) Jobs posting is not allowed.
> 6) Sharing copyrighted material and their links is not allowed.
>
> NOTE : Don't ever post confidential data in a workbook. Forum owners and
> members are not responsible for any loss.
> ---
> You received this message because you are subscribed to the Google Groups
> "MS EXCEL AND VBA MACROS" group.
> To post to this group, send email to excel-macros@googlegroups.com.
> To unsubscribe from this group, send email to
> excel-macros+unsubscr...@googlegroups.com.
> Visit this group at http://groups.google.com/group/excel-macros?hl=en.
>
>
>
--
'Expecting the world to treat u fairly coz u r a good person is like
expecting the lion not to attack u coz u r a vegetarian.
Think about it.'
Take care
Amit
--
Join official Facebook page of this forum @
https://www.facebook.com/discussexcel
FORUM RULES
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) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.
NOTE : Don't ever post confidential data in a workbook. Forum owners and
members are not responsible for any loss.
---
You received this message because you are subscribed to the Google Groups "MS
EXCEL AND VBA MACROS" group.
To post to this group, send email to excel-macros@googlegroups.com.
To unsubscribe from this group, send email to
excel-macros+unsubscr...@googlegroups.com.
Visit this group at http://groups.google.com/group/excel-macros?hl=en.
