En el IDE, utilice este método de VB.NET para añadir un cuadro de texto colocado por la macro a la vista activa.
En el IDE, utilice el siguiente código para el método:
Public Sub MyFirstMacroDocVB()Dim baseVec As Autodesk.Revit.DB.XYZ = Document.Application.Create.NewXYZ(1.0, 0.0, 0.0)Dim upVec As Autodesk.Revit.DB.XYZ = Document.Application.Create.NewXYZ(0.0, 0.0, 1.0)Dim origin As Autodesk.Revit.DB.XYZ = Document.Application.Create.NewXYZ(0.0, 0.0, 0.0)Dim align As Autodesk.Revit.DB.TextAlignFlags = Autodesk.Revit.DB.TextAlignFlags.TEF_ALIGN_LEFT Or Autodesk.Revit.DB.TextAlignFlags.TEF_ALIGN_TOPDim pView As Autodesk.Revit.DB.View = Document.ActiveView Dim Transaction As Autodesk.Revit.DB.Transaction = New Autodesk.Revit.DB.Transaction(Document, "NewTextNote")Transaction.Start()Document.Create.NewTextNote(pView, origin, baseVec, upVec, lineWidth, align, strText)Transaction.Commit()End Sub
Consejo: Asegúrese de crear su proyecto en el IDE de macros de Revit antes de intentar ejecutarlo desde el Administrador de macros.
En este ejemplo, cuando cree el proyecto en el IDE de macros de Revit, observe que está generando el proyecto DocVisualBasic y su código de macro VB.NET de nivel de documento reside en ThisDocument.vb. Puede utilizar el Explorador de proyectos del IDE para ver su ubicación temporal en el disco. Recuerde que el código para crear correctamente macros de nivel de documento está almacenado en el archivo RVT después de guardar dicho archivo. Los archivos del proyecto se eliminan de la ubicación temporal cuando Revit se cierra.
El cuadro de texto colocado por la macro