Microsoft KB Archive/165103

= XL97: Value Returned by VarType for Omitted Arguments Differs =

Article ID: 165103

Article Last Modified on 11/23/2006

-

APPLIES TO


 * Microsoft Excel 97 Standard Edition

-



This article was previously published under Q165103





SYMPTOMS
When you call a custom Visual Basic for Applications function from a formula in a cell in a Microsoft Excel 97 worksheet, the VarType function may return different values for missing optional arguments than it does in earlier versions of Microsoft Excel. The IsMissing and IsNull functions may also return different results.



CAUSE
This problem occurs because the method Microsoft Excel 97 uses to send argument from worksheet formulas to Visual Basic for Applications functions is different from the method used by earlier versions of Microsoft Excel.

NOTE: This problem does not occur when you use a Visual Basic for Applications subroutine to call a Visual Basic for Applications function.



RESOLUTION
Microsoft provides programming examples for illustration only, without warranty either expressed or implied, including, but not limited to, the implied warranties of merchantability and/or fitness for a particular purpose. This article assumes that you are familiar with the programming language being demonstrated and the tools used to create and debug procedures. Microsoft support professionals can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific needs. If you have limited programming experience, you may want to contact a Microsoft Certified Partner or the Microsoft fee-based consulting line at (800) 936-5200. For more information about Microsoft Certified Partners, please visit the following Microsoft Web site:

https://partner.microsoft.com/global/30000104

For more information about the support options that are available and about how to contact Microsoft, visit the following Microsoft Web site:

http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMS

If the function uses the VarType, IsMissing, and/or IsNull functions to check the status of a missing argument, it may be necessary to modify the function to accommodate the change in behavior in Microsoft Excel 97.

For example, if your function contains a line of code that is similar to the following If VarType(X) = 10 Then change the line so that it accounts for a VarType of 1 (the default) in Microsoft Excel 97, for example: If (VarType(X) = 10 And Application.Version < 8) Or (VarType(X) = 1 _       And Application.Version = 8) Then This line of code accounts for the difference in behavior between Microsoft Excel 97 and earlier versions of Microsoft Excel.

You can use similar methods to correct any lines of code that uses the IsMissing and/or IsNull functions.



STATUS
Microsoft has confirmed this to be a problem in the Microsoft products listed at the beginning of this article. This problem no longer occurs in Microsoft Excel 2000.



MORE INFORMATION
When you call a custom function from a formula in a worksheet cell, the value that is returned by VarType for missing optional arguments differs according to the version of Microsoft Excel that you are using. The values that are returned by VarType for different versions of Microsoft Excel are listed in the following table.                       VarType Value for Microsoft Excel  Missing Arguments   Corresponds to   --- 97                1 (vbNull)         IsNull = True IsMissing = False

5.0, 7.0         10 (vbError)        IsMissing = True IsNull = False NOTE: This difference does NOT apply when you use a Visual Basic for Applications subroutine to call a custom function. If you omit arguments when you use a Visual Basic for Applications subroutine to call a custom function, the value that is returned by VarType for the missing arguments is 10 in all versions of Microsoft Excel (versions 5.0, 7.0, and Microsoft Excel 97).

The following example demonstrates the change in behavior for the VarType function:

  Type the following Visual Basic for Applications code into a Visual Basic module in Microsoft Excel: Function TestIsMissing(Optional A, Optional B)         TestIsMissing = "IsMissing = " & IsMissing(A) & ", " & _ IsMissing(B) & Chr(10) & "IsNull = " & IsNull(A) & ", " & _ IsNull(B) & Chr(10) & "VarType = " & VarType(A) & ", " & _ VarType(B) End Function

Sub TestProc MsgBox TestIsMissing(A:=1, B:=2) MsgBox TestIsMissing(B:=2) MsgBox TestIsMissing(A:=1) MsgBox TestIsMissing End Sub  In a worksheet in the same workbook, select cells A1:A4. On the Format menu, click Cells. Then, click the Alignment tab. Click to select the Wrap Text check box. Then, click OK. On the Format menu, point to Column and click Width. Type 25, and then click OK.</li> Type the following formulas:

A1: =TestIsMissing(1,2)

A2: =TestIsMissing(,2)

A3: =TestIsMissing(1,)

A4: =TestIsMissing

Note that each formula uses a different set of arguments. Some of the arguments are not used in this example.</li></ol>

Depending on the version of Microsoft Excel you are using, the results that are returned by the formulas are different. The results that are returned are listed in the following table. <pre class="fixed_text"> Cell  Microsoft Excel 97         Microsoft Excel 5.0, 7.0   Different -  A1    IsMissing = False, False   IsMissing = False, False   No         IsNull = False, False      IsNull = False, False      No         VarType = 5, 5             VarType = 5, 5             No

A2   IsMissing = False, False   IsMissing = True, False    Yes IsNull = True, False      IsNull = False, False      Yes VarType = 1, 5            VarType = 10, 5            Yes

A3   IsMissing = False, False   IsMissing = False, True    Yes IsNull = False, True      IsNull = False, False      Yes VarType = 5, 1            VarType = 5, 10            Yes

A4   IsMissing = False, False   IsMissing = True, True     Yes IsNull = True, True       IsNull = False, False      Yes VarType = 1, 1            VarType = 10, 10           Yes Microsoft Excel 97 reports missing arguments as null values because the value that is returned by VarType for these arguments is 1. In earlier versions of Microsoft Excel, the missing arguments are reported as error values because the value that is returned by VarType is 10.

If you run the TestProc macro, the four message boxes that appear are identical in all versions of Microsoft Excel (5.0, 7.0, and Microsoft Excel 97). If you omit arguments when you call a Visual Basic for Applications function from a macro, the value returned by VarType for the missing arguments is always 10.

Additional query words: 97 XL97 xlvbmigrate

Keywords: kbhowto kbprogramming KB165103

-

[mailto:TECHNET@MICROSOFT.COM Send feedback to Microsoft]

© Microsoft Corporation. All rights reserved.