GeFormat function in Office 97
 

Can anyone confirm whether this function will operate
under Office 97 - i have a workbook that stalls if run on
O97 - no error message - but runs on a colleagues O2000.
This function is used during the phase in question...

Function GetFormat(Cell As Range) As String
GetFormat = Cell.NumberFormat
End Function

many thanks.

GeFormat function in Office 97
 

It worked for me in Excel 97.

--
Regards,
Tom Ogilvy

"Mike" wrote in message
...
Can anyone confirm whether this function will operate
under Office 97 - i have a workbook that stalls if run on
O97 - no error message - but runs on a colleagues O2000.
This function is used during the phase in question...

Function GetFormat(Cell As Range) As String
GetFormat = Cell.NumberFormat
End Function

many thanks.

GeFormat function in Office 97
 

are you sure the cell is:
a single cell
or a merged cell
or a range of cells with exactly the same numberformats?

to solve try: cell(1).numberformat

--
keepITcool
| www.XLsupport.com | keepITcool chello nl | amsterdam


Mike wrote :

Can anyone confirm whether this function will operate
under Office 97 - i have a workbook that stalls if run on
O97 - no error message - but runs on a colleagues O2000.
This function is used during the phase in question...

Function GetFormat(Cell As Range) As String
GetFormat = Cell.NumberFormat
End Function

many thanks.