XL2000: Arc/Block Arc Adjusted Incorrectly When You Run Macro (213671)


The information in this article applies to:

  • Microsoft Excel 2000
This article was previously published under Q213671

SYMPTOMS

If you draw and adjust an arc or a block arc while recording a Microsoft Visual Basic for Applications macro, the arc may be adjusted incorrectly when you run the recorded macro.

CAUSE

Incorrect values may be recorded into the code. In the following sample code, the value 97.1806 may be incorrect: 
   Selection.ShapeRange.Adjustments.Item(1) = 97.1806
   Selection.ShapeRange.Adjustments.Item(2) = 0.3785

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:

http://www.microsoft.com/partner/referral/

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

To correct this problem, add a minus sign (-) to the left of the value of "Item(1)."

Example: 
   ' Instead of 97.1806, use -97.1806.
   Selection.ShapeRange.Adjustments.Item(1) = -97.1806
   Selection.ShapeRange.Adjustments.Item(2) = 0.3785

STATUS

Microsoft has confirmed that this is a problem in the Microsoft products that are listed at the beginning of this article.

MORE INFORMATION

You can insert an arc or a block arc into a worksheet by performing the following steps:
  1. If the Drawing toolbar is not visible, point to Toolbars on the View menu, and then click Drawing.
  2. On the Drawing toolbar, click AutoShapes, point to Basic Shapes, and then click the arc (first shape in next-to-last row) or block arc shape (last shape in fifth row).
  3. Draw the arc in the worksheet.
You can adjust an arc or a block arc by using the mouse to move the yellow handle inside the arc. When you adjust an arc, you do not actually resize it; instead, you change its angle of sweep and its thickness. When you adjust an arc while recording a macro, two values are recorded into the macro.

However, because of a problem in Microsoft Excel, the first value may be recorded incorrectly; instead of appearing as a negative value, it may appear as a positive value. If you use the workaround in the "Resolution" section of this article, the recorded code correctly adjusts the arc.
Modification Type:MinorLast Reviewed:10/11/2006
Keywords:kbbug kbmacro kbpending kbProgramming KB213671
©2004 Microsoft Corporation. All rights reserved.