In need to be able to highlight a row if the date in that row is greater than
10 business days. I have already stored today as a variable called "today."
--
Regards,
Michael

Use the WORKDAY function. You could set up Conditional Formatting using:
"=WORKDAY(today,10)>$A$1"

Give that a try.
Matthew Pfluger

"Michael from Austin" wrote:

> In need to be able to highlight a row if the date in that row is greater than
> 10 business days. I have already stored today as a variable called "today."
> --
> Regards,
> Michael

On Wed, 19 Mar 2008 10:03:01 -0700, Michael from Austin
<(E-Mail Removed)> wrote:

>In need to be able to highlight a row if the date in that row is greater than
>10 business days. I have already stored today as a variable called "today."

Go to Tools > Addins and make sure "Analysis Toolpak - VBA" is checked. In
the VBE, go to Tools > References and set a reference to atpvbaen.xls. Then
you can call the NETWORKDAYS function directly

Sub HighlightDays()

If Abs(networkdays(Sheet1.Range("A4").Value, Date)) > 10 Then
Sheet1.Range("A4").EntireRow.Interior.Color = vbYellow
End If

End Sub
--
Dick Kusleika
Microsoft MVP-Excel
http://www.dailydoseofexcel.com

Worked.. Thanks So much...........
--
Regards,
Michael


"Matthew Pfluger" wrote:

> Use the WORKDAY function. You could set up Conditional Formatting using:
> "=WORKDAY(today,10)>$A$1"
>
> Give that a try.
> Matthew Pfluger
>
> "Michael from Austin" wrote:
>
> > In need to be able to highlight a row if the date in that row is greater than
> > 10 business days. I have already stored today as a variable called "today."
> > --
> > Regards,
> > Michael

Worked!!!! Thanks so much.........
--
Regards,
Michael


"Dick Kusleika" wrote:

> On Wed, 19 Mar 2008 10:03:01 -0700, Michael from Austin
> <(E-Mail Removed)> wrote:
>
> >In need to be able to highlight a row if the date in that row is greater than
> >10 business days. I have already stored today as a variable called "today."
>
> Go to Tools > Addins and make sure "Analysis Toolpak - VBA" is checked. In
> the VBE, go to Tools > References and set a reference to atpvbaen.xls. Then
> you can call the NETWORKDAYS function directly
>
> Sub HighlightDays()
>
> If Abs(networkdays(Sheet1.Range("A4").Value, Date)) > 10 Then
> Sheet1.Range("A4").EntireRow.Interior.Color = vbYellow
> End If
>
> End Sub
> --
> Dick Kusleika
> Microsoft MVP-Excel
> http://www.dailydoseofexcel.com
>