Is This Content Helpful?
We're glad to know this article was helpful.
Note: These instructions are for ArcGIS 8.x and 9.x only. ArcGIS version 10.0 is the last version of ArcGIS to support Microsoft Visual Basic for Applications VBA).
Instructions provided describe how to calculate X, Y, and Z values in an attribute table using the Field Calculator and Visual Basic for Applications (VBA).
Note: These code examples return a value of type 'double', so use them to calculate either an existing field of type 'double' or a new field of type 'double' that has been added to the table.
This procedure can be used with new or existing fields in an attribute table. If it is necessary to add new fields to the attribute table, see the ArcGIS Desktop Help topic 'Adding and deleting fields in a table'.
Code: Dim Output As Double Dim pPoint As IPoint Set pPoint = [Shape] Output = pPoint.X
Note: The units of the calculated values are the units that the features are stored in, not the map units or display units of the data frame currently worked on.
Note: If the data is stored in feet, the calculated values appear in feet. To allow calculated data to be in different units, other than the data's units, do one of the following: Add a conversion into the calculation expression. Project the data into a coordinate system that uses the units the values should be in, and then perform the calculation.
Code: Output = pPoint.Y
Code: Output = pPoint.Z
Note: A 3D Analyst license is not required to extract Z values from the shape field of an existing 3D layer.