XL2000: Macro Works Differently on .wk3 Files Than in Microsoft Excel 5.0 (213664)

MORE INFORMATION

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: For more information about the support options that are available and about how to contact Microsoft, visit the following Microsoft Web site: To see an example of the problem, follow these steps:

1. Start Microsoft Excel 5.0.
2. Type the following into a new workbook:

   A1: Left
   A2: General

3. Select cell A1, and then click Cells on the Format menu.
4. Click the Alignment tab in the Format Cells dialog box. Under Horizontal, click Left, and then click OK.
5. On the File menu, click Save As. In the File name box, type test. In the Save file as type list, click WK3 (1-2-3), and then click OK. Click OK again when the Summary Info dialog box appears.
6. On the File menu, click Close. Click No when you are prompted to save the file in the Microsoft Excel format. On the File menu, click Test.WK3.
7. On the Insert menu, point to Macro, and then click Module.
8. Type the following Visual Basic subroutine in the new module sheet:

   Sub Test()
   
      Msgbox(Worksheets(1).Range("A1").Horizontalalignment = xlLeft)
      Msgbox(Worksheets(1).Range("A2").Horizontalalignment = xlLeft)
   
   End Sub
   					

9. Move the insertion point inside the subroutine. On the Run menu, click Start.
   
   Both message boxes return True, even though cell A2 uses the General format.
10. Close the Test.wk3 workbook and do not save the changes.
11. Open the Test.wk3 workbook in Excel 2000.
12. Select A1, and then click Cells on the Format menu.
13. Click the Alignment tab in the Format Cells dialog box. Under Horizontal, click Left (Indent), and then click OK.
14. Press ALT+F11 to start the Visual Basic editor, click Module on the Insert menu, and then type the following on the module sheet:

    Sub Test()
    
       Msgbox(Worksheets(1).Range("A1").Horizontalalignment = xlLeft)
       Msgbox(Worksheets(1).Range("A2").Horizontalalignment = xlLeft)
    
    End Sub
    					

15. Press ALT+F11 to return to Excel, press ALT+F8 to open the Macro dialog box, click Test, and then click Run.

In Microsoft Excel 2000, the first message box returns True; the second message box returns False.