![]() |
Testing if Variant is Range or Double?
So I rewrote my interpolation function to take in input as a numeric array
that can be either in Option Base 0 or 1. It is a Variant. Is there some way I can tell if this input is a range instead of numeric? Then I can convert it to values and make this new function also handle the argument that the exisiting function takes. And so replace it. Don <donwiss at panix.com. |
Testing if Variant is Range or Double?
Don,
Sub test() Dim var As Variant var = CDbl(123.456) ' Set var = Range("A1") If TypeOf var Is Range Then MsgBox "It's a range" Else MsgBox "It's not a range" End Sub Rob "Don Wiss" wrote in message ... So I rewrote my interpolation function to take in input as a numeric array that can be either in Option Base 0 or 1. It is a Variant. Is there some way I can tell if this input is a range instead of numeric? Then I can convert it to values and make this new function also handle the argument that the exisiting function takes. And so replace it. Don <donwiss at panix.com. |
Testing if Variant is Range or Double?
Rob van Gelder wrote:
Sub test() Dim var As Variant var = CDbl(123.456) ' Set var = Range("A1") If TypeOf var Is Range Then MsgBox "It's a range" Else MsgBox "It's not a range" End Sub Thanks! It worked like a charm in XP. I couldn't find where "TypeOf var Is Range" comes from. It will also have to work under 97. Don <donwiss at panix.com. |
Testing if Variant is Range or Double?
Look under help for IF
(see the options under condition). It is supported in Excel 97. -- Regards, Tom Ogilvy Don Wiss wrote in message ... Rob van Gelder wrote: Sub test() Dim var As Variant var = CDbl(123.456) ' Set var = Range("A1") If TypeOf var Is Range Then MsgBox "It's a range" Else MsgBox "It's not a range" End Sub Thanks! It worked like a charm in XP. I couldn't find where "TypeOf var Is Range" comes from. It will also have to work under 97. Don <donwiss at panix.com. |
All times are GMT +1. The time now is 10:42 AM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com