Comments on: Min and Max across sheets

By: fzz

fzz — Wed, 02 May 2007 22:37:00 +0000

dermot: ain’t no array formulas across worksheets. Check this topic’s subject line again.

By: dermot

dermot — Wed, 02 May 2007 09:51:00 +0000

I didn't see anyone suggest an array formula
{=MIN(Sheet1!A1:A100*1)}

By: Michael

Michael — Mon, 30 Apr 2007 21:06:00 +0000

Drat.
I never remember the greater than/less than escapes
Picking up at the bottom loop:

For i = 1 To Len(str)
If Mid(str, i, 1) Like ("[0-9]") And Len(year) < 4 Then
year = year & Mid(str, i, 1)
End If
Next i

str = Replace(str, year, "", 1, , vbTextCompare)
str = Replace(str, ",", "", 1, , vbTextCompare)

DateIt = DateSerial(year, mon, day) + TimeValue(str)

End Function

FWIW.
...Michael

By: Michael

Michael — Mon, 30 Apr 2007 21:02:00 +0000

Hi All -

Given the 3 specified formats:

Dec 12, 2006, 5:00 pm
12 Dec 2006, 5:00 pm
Dec 12 2006, 5:00 pm

This UDF seems to handle them all:

Function DateIt(str As String)

Dim i As Integer, mon As Integer

Dim day As Variant

Dim mnth(12) As String * 3

Dim year As Variant

mnth(1) = "Mon"

mnth(2) = "Feb"

mnth(3) = "Mar"

mnth(4) = "Apr"

mnth(5) = "May"

mnth(6) = "Jun"

mnth(7) = "Jul"

mnth(8) = "Aug"

mnth(9) = "Sep"

mnth(10) = "Oct"

mnth(11) = "Nov"

mnth(12) = "Dec"

For i = 1 To 12

mon = InStr(1, str, mnth(i), vbTextCompare)

If mon > 0 Then

mon = i

Exit For

End If

Next i

For i = 1 To InStr(1, str, ",")

If Mid(str, i, 1) Like "[0-9]" Then

day = day & Mid(str, i, 1)

End If

Next i

If Len(day) > 2 Then day = Left(day, Len(day) - 4)

str = Replace(str, mnth(mon), "", 1, 1, vbTextCompare)

str = Replace(str, day, "", 1, 1, vbTextCompare)

For i = 1 To Len(str)

If Mid(str, i, 1) Like ("[0-9]") And Len(year)

By: Dick Kusleika

Dick Kusleika — Fri, 27 Apr 2007 03:03:00 +0000

“Wouldn’t the formula below work just as well? It should also eliminate your restriction on 100 rows.
=MIN(‘Abused News:Wipeout’!$F:$F)”

Yes, but then someone will but something goofy in F8000. It’s a trade-off, but since it wasn’t my spreadsheet, it’ll be someone else’s problem.

“RTFM and Excel will insert the quotes in the right place.
R = Roll
M = Mouse”

Genius. Now I won’t have to remember where they go.

By: Rick Williams

Rick Williams — Fri, 27 Apr 2007 01:05:00 +0000

Doug:
I hadn’t used “- -” before either, but I ahve use “*1? for the same effect.
Any yeah – nice use to substitute!

By: Tushar Mehta

Tushar Mehta — Thu, 26 Apr 2007 13:21:00 +0000

"The second problem was using MIN and MAX across the sheets. The problem here was that some of the sheet names contain spaces. I knew that I needed some quotes around the sheet name, but I can never remember where."

RTFM and Excel will insert the quotes in the right place.

R = Roll
M = Mouse

{g,d,r}

By: Doug Jenkins

Doug Jenkins — Thu, 26 Apr 2007 10:46:00 +0000

I get the same as Rick

With Australian settings the day-month-year works, but month-year-day doesn’t. With US settings vice-versa.

That’s Excel 2007 with Vista. As reported, transition formula evaluation stops it working.

Nice use of “substitute” anyway .

And I didn’t know about the – - to make a text formula evaluate as a number.

By: Rick Williams

Rick Williams — Thu, 26 Apr 2007 07:52:00 +0000

Hmmm,

It appears that using either your or Dick's formulae I get the same result:
Having in A4:
Dec 12, 2006, 5:00 pm
results in #VALUE!
but reversing the date to:
12 Dec, 2006, 5:00 pm
allows either function to work correctly
result = 39063.70833

Also, if I remove the first comma and change A4 to:
12 Dec 2006, 5:00 pm
and modify the other two formulae to:
=DATEVALUE(LEFT(A4,FIND(",",A4,1)-1))+TIMEVALUE(MID(A4,FIND(",",A4,1)+2,255))
and
= - - SUBSTITUTE(A4,",","",1)
respectively, I get the correct result, but using the value:
Dec 12 2006, 5:00 pm
fails.

Changing my regional setting to US....
(cross fingers..)

Ha!

The formulae that use the data with two commas work in the opposite fashion (i.e. the formulae work for "Dec 12, 2006, 5:00 pm" but not "12 Dec, 2006, 5:00 pm")
but the formulae that use the data with one comma work in the same fashion (i.e. the formulae work for "12 Dec 2006, 5:00 pm" but not "Dec 12 2006, 5:00 pm".

Go figure.

By: fzz

fzz — Thu, 26 Apr 2007 07:22:00 +0000

With the following in cell A4

Dec 12, 2006, 5:00 pm

on my system running Excel 2003 with transition formula evaluation disabled and US regional settings, the following formula in A5

= - - SUBSTITUTE(A4,",","",2)

returns 39063.70833 as expected. If I change A4 to

12 Dec 2006, 5:00 pm

and A5 to

= - - SUBSTITUTE(D4,",","",1)

the formula still returns 39063.70833.

How does Dick's formula work under your regional settings?