Meu amigo Daniel Maragna (São Bernardo do Campo – SP) na dica “ArcGIS Utilizando a ferramenta Calculate Values” solicitou que elaborasse algo mais “avançado” sobre a ferramenta, bom irei tentar utilizar um exemplo bem simples para explicar o quão poderoso pode ser esta ferramenta “Calculate Values”
Abaixo tenho um “shapefile” de distritos, perceba que ele é um polígono:

Abrindo a tabela de atributos do referido arquivo, clique no botão “Options” e depois no item “Add Field…”

Iremos criar o campo chamado “Area”, do tipo número com 10 casas.

Após criar o campo clique com o botão direito sobre o campo e depois em “Calculate Values…”

Clique em “Sim” para prosseguir no cálculo.

Agora chegamos ao ponto mais complexo:
a) Primeiro passo é clicar no botão “Advanced” que irá habilitar a opção para calcular opções avançadas.
b) Definindo as variáveis:
Dim dblArea as double
Dim pArea as IArea
Neste caso foi criado a variável dblArea como o formato double; e
foi criado a variável pArea como o formato IArea.
c) Atribuindo valores as variáveis:
Set pArea = [shape]
Neste caso a variável pArea vai receber a informação [shape]
dblArea = pArea.area
Nesta parte dblArea irá receber a informação da variável pArea (indicada acima), mais a informação .area
d) O campo da tabela “Area” irá recebe as informações da variável dblArea

Veja abaixo que o campo abaixo foi preenchido com a área em metros, pois os dados estão em UTM – SAD 69.

Para mostrar a veracidade dos dados utilizei o Xtools e veja que os dados bateram:

Agora um mapa com a informação gerado pelo o campo:
Material de apoio:
Calculating polygon area in ArcMap
http://soa.utexas.edu/crp/gis/arcgis_tips/area_calculation.html
