ActiveDocument Example

Using Programming Languages other than VBA

Sub Example_ActiveDocument()
	Dim activeDoc As AcadDocument
	' Returns current document in AutoCAD
	Set activeDoc = ThisDrawing.Application.ActiveDocument
	MsgBox "The active document is: " & activeDoc.name, vbInformation, "ActiveDocument Example"
End Sub

Comments?

508 Resource Limit Is Reached

Resource Limit Is Reached

The website is temporarily unable to service your request as it exceeded resource limit. Please try again later.