Criando shapefile a partir das extensões atuais do dataframe na exibição de layout do ArcMap?

Onde está a ferramenta ArcGIS 10 para criar um arquivo de forma a partir das extensões atuais do quadro de dados na exibição de layout?

Olhei em volta e a coisa que eu mais encontro no armário é as ferramentas de Índice de Mapa de Grade / Faixa do Toolbox em Data Drive Pages.

Eu só quero criar um único arquivo shp de retângulo de polígono com base no quadro de dados (na exibição de layout) para qualquer configuração de escala / página.

Eu criei uma ferramenta para fazer isso por meio de uma caixa de ferramentas no ArcGIS 10. Talvez seja mais fácil usar do que scripts. Você pode baixá-lo aqui . Apenas copie seus mxd (s) em uma pasta e execute a ferramenta nessa pasta. Ele criará um shapefile contendo todas as principais extensões de cada mxd nessa pasta.

Esse código c # pode ser usado para criar um suplemento para o Arcmap .

using System;
using System.Collections.Generic;
using System.Text;
using System.IO;
using System.Windows.Forms;
using ESRI.ArcGIS.Geometry;
using ESRI.ArcGIS.Carto;
using ESRI.ArcGIS.ArcMapUI;
using ESRI.ArcGIS.DataSourcesFile;
using ESRI.ArcGIS.Geodatabase;

namespace MainToolsAddin
{
    public class Extent2ShapefileButton : ESRI.ArcGIS.Desktop.AddIns.Button
    {
        public Extent2ShapefileButton()
        {
        }

        protected override void OnClick()
        {
            try
            {
                var polygon = GetExtentPolygon(ArcMap.Document.FocusMap);
                //IGraphicsContainer gc = ArcMap.Document.FocusMap as IGraphicsContainer;
                //var element = new PolygonElementClass() as IElement;
                //element.Geometry = polygon;
                //((IFillShapeElement)element).Symbol = ((IDocumentDefaultSymbols)ArcMap.Document).FillSymbol;
                //gc.AddElement(element,0);
                //((IActiveView)ArcMap.Document.FocusMap).Refresh();
                WritePolygon(@"C:\projects\forums\extents.shp", polygon);
            }
            catch (Exception ex)
            {
                MessageBox.Show(ex.Message);
            }
        }

        protected override void OnUpdate()
        {
        }

        private void WritePolygon(string shpFilePath, IGeometry geom)
        {
            var featClass = OpenShapeFile(shpFilePath);
            if (featClass == null)
                featClass = CreateShapeFile(shpFilePath, geom);
            IFeature feat = featClass.CreateFeature();
            feat.Shape = geom;
            feat.Store();
        }
        private IFeatureClass CreateShapeFile(string shpFilepath, IGeometry geom)
        {
            System.IO.FileInfo fi = new FileInfo(shpFilepath);
            var wsf = Activator.CreateInstance(Type.GetTypeFromProgID("esriDataSourcesFile.ShapefileWorkspaceFactory")) as IWorkspaceFactory;
            var fws = wsf.OpenFromFile(fi.DirectoryName, 0) as IFeatureWorkspace;
            IFieldsEdit flds = new FieldsClass();
            flds.AddField(MakeField("ObjectID", esriFieldType.esriFieldTypeOID,0));
            IGeometryDefEdit geomDef = new GeometryDefClass();
            geomDef.GeometryType_2 = geom.GeometryType;
            geomDef.SpatialReference_2 = geom.SpatialReference;
            var shpField = MakeField("Shape", esriFieldType.esriFieldTypeGeometry, 0) as IFieldEdit;
            shpField.GeometryDef_2 = geomDef;
            flds.AddField(shpField);
            flds.AddField(MakeField("Name", esriFieldType.esriFieldTypeString, 16));
            string fcName = fi.Name;
            if (fcName.ToUpper().EndsWith(".SHP"))
                fcName = fcName.Substring(0, fcName.LastIndexOf("."));

            var fc = fws.CreateFeatureClass(fcName, flds, null, null, esriFeatureType.esriFTSimple, "Shape", "");
            return fc;
        }

        private IField MakeField(string name, esriFieldType fType, int length)
        {
            IFieldEdit fld = new FieldClass();
            fld.Name_2 = name;
            fld.Type_2 = fType;
            if (length > 0 && fType == esriFieldType.esriFieldTypeString)
                fld.Length_2 = length;
            return fld;
        }

        private IFeatureClass OpenShapeFile(string shpFilepath)
        {
            var wsf = Activator.CreateInstance(Type.GetTypeFromProgID("esriDataSourcesFile.ShapefileWorkspaceFactory")) as IWorkspaceFactory;

            System.IO.FileInfo fi = new FileInfo(shpFilepath);
            string name = fi.Name.ToUpper().EndsWith(".SHP") ? fi.Name.Substring(0, fi.Name.LastIndexOf(".")) : fi.Name;
            string fileName = String.Format("{0}.shp", name);
            if (File.Exists(System.IO.Path.Combine(fi.DirectoryName,fileName)))
            {
                var fws = wsf.OpenFromFile(fi.DirectoryName, 0) as IFeatureWorkspace;
                return fws.OpenFeatureClass(name);
            }
            else
                return null;
        }

        private IPolygon GetExtentPolygon(IMap map)
        {
            // A polygon is returned since the dataframe might be rotated
            var grphCont = ArcMap.Document.PageLayout as IGraphicsContainer;
            var mapFrame = grphCont.FindFrame(map) as IMapFrame;
            var av = map as IActiveView;
            var extent = mapFrame.MapBounds.Envelope;
            ISegmentCollection sc = new PolygonClass() as ISegmentCollection;
            sc.SetRectangle(extent);

            var center = ((IArea)extent).Centroid;
            var angle = -(av.ScreenDisplay.DisplayTransformation.Rotation / 180.0 * Math.PI);
            ((ITransform2D)sc).Rotate(center, angle);
            return (IPolygon)sc;                        
        }
    }
}

Ao criar um novo projeto de suplemento com o Visual Studio, você verá algumas opções como esta. Não tenho certeza se ele funciona com o Visual Studio Express ou se o ArcObjects SDK precisa ser instalado.

Aqui está um script python básico para criar um polígono a partir da extensão do quadro de dados. Ajuste a variável para atender às suas necessidades. Se você deseja apenas um polígono de extensão simples, pode se livrar de 'feat', 'scale' e 'Page'. ('Página' funcionará apenas se você estiver usando páginas controladas por dados).

doc = arcpy.mapping.MapDocument("current")
df = arcpy.mapping.ListDataFrames(doc)[0] #First Dataframe
extent = df.extent
fc = arcpy.GetParameterAsText(0)
feat = arcpy.GetParameterAsText(1)
scale = arcpy.GetParameterAsText(2)
Page = doc.dataDrivenPages.currentPageID

# Create Extent Polygon
array = arcpy.Array()
array.add(extent.lowerLeft)
array.add(extent.lowerRight)
array.add(extent.upperRight)
array.add(extent.upperLeft)
array.add(extent.lowerLeft)
polygon = arcpy.Polygon(array)
cursor = arcpy.da.InsertCursor(fc,["SHAPE@","Page","Feature","Scale"])
cursor.insertRow([polygon, Page, feat, scale])
del cursor

Você pode usar a ferramenta Map Extent to Polygon :

Cria um recurso de polígono a partir da extensão atual do mapa. No layout, a extensão será do quadro de dados do mapa; na visualização de dados, a extensão resultante será da extensão da janela do aplicativo. A rotação do quadro de dados não é suportada.

Essa ferramenta de polígono Criar quadro de dados funciona no ArcGIS Desktop 10.3

Carregue o suplemento, personalize uma barra de ferramentas (ou crie uma nova) e adicione-a.

Se você precisar fazer isso apenas uma vez, poderá encontrar as extensões na janela de propriedades do Quadro de Dados. Em seguida, você pode criar um novo arquivo de forma, adicionar um novo recurso, clicar com o botão direito do mouse e optar por inserir manualmente as coordenadas correspondentes aos cantos.

Caso contrário, vá com o script de @ artwork21.

Eu vejo este portal NOAA com um programa.
Script - extensão para shapefile
Eu sei que já vi isso em algum lugar. Ainda olhando.
Aqui estão algumas ferramentas de ddp no centro de recursos.