ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Determine number format of excel cell (https://www.excelbanter.com/excel-programming/374736-determine-number-format-excel-cell.html)

James Bond[_2_]

Determine number format of excel cell
 
hi,

I am writing a program to read data from excel sheet.
while reading a cell which contains a date, it returns a number.

Eg:Suppose cell A1 contains the following date : February 13, 1900
The Range object that refers the cell, returns to me 44 as value.

By googling, I found the method to convert it back to the date format.
they are : Application.WorksheetFunction.Text(value, "mm/dd/yyyy")
or DateTime.FromOADate(double d)


But my question, is there any way i can determine if the cell has DATE
type.

I can get the format of the date by using Range.NumberFormat. But I
need to first know, if the cell is DATE type for that?

Any help would be appreciated.

Thank you.


NickHK

Determine number format of excel cell
 
Why not read the .Text property instead of the .Value property of the range.

Or
Public Function GetVarType(InputCell As Range) As Long
'Check the help for the meaning of the return values
'But a Date will return # 7
GetVarType = VarType(InputCell.Value)
End Function

NickHK

"James Bond" wrote in message
oups.com...
hi,

I am writing a program to read data from excel sheet.
while reading a cell which contains a date, it returns a number.

Eg:Suppose cell A1 contains the following date : February 13, 1900
The Range object that refers the cell, returns to me 44 as value.

By googling, I found the method to convert it back to the date format.
they are : Application.WorksheetFunction.Text(value, "mm/dd/yyyy")
or DateTime.FromOADate(double d)


But my question, is there any way i can determine if the cell has DATE
type.

I can get the format of the date by using Range.NumberFormat. But I
need to first know, if the cell is DATE type for that?

Any help would be appreciated.

Thank you.





All times are GMT +1. The time now is 12:45 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com