Hide Table of Contents

Reset Untitled Document Count Example (VBA)

For new untitled documents, SOLIDWORKS increments the untitled document count and generates a document name by appending the count to the document type. By default, Part1 is for the first untitled document in a SOLIDWORKS session, Part2 for the next untitled document in that same SOLIDWORKS session, etc.). The untitled document count is automatically reset between SOLIDWORKS sessions.

You can use ISldWorks::ResetUntitledCount to reset the untitled document count within a single SOLIDWORKS session.

The following code example demonstrates how to use ISldWorks::ResetUntitledCount to reset the untitled document count. The code resets the untitled document count at the beginning of the SOLIDWORKS session, creates two untitled documents, maximizes one document, and minimizes the second document.

NOTE: Programs designed to run multiple times in the same SOLIDWORKS session should either assign titles to new documents or reset the untitled document count at the beginning of the SOLIDWORKS session. This ensures that SOLIDWORKS creates predictable names for untitled documents, resulting in predictable outcomes for each invocation of the program.

'--------------------------------------------------------------
' Preconditions: Verify that the specified document template
' exists.
'
' Postconditions:
' 1. Creates two new untitled part documents, Part9 and Part10;
'    maximizes Part9 and minimizes Part10.
' 2. Minimize Part9 and maximize Part10.
'--------------------------------------------------------------
Option Explicit
Dim swApp As SldWorks.SldWorks
Dim Part As SldWorks.ModelDoc2
Dim Part2 As SldWorks.ModelDoc2
Dim ModelView As SldWorks.ModelView
Dim ModelView2 As SldWorks.ModelView
Dim boolstatus As Boolean
Dim longstatus As Long
Dim longwarnings As Long
Sub main()
    Set swApp = Application.SldWorks    
    ' Reset the counts for untitled
    ' documents (parts, assemblies, and drawings)
    ' to 8
    swApp.ResetUntitledCount 8, 8, 8     
    
    ' When a new untitled document is created,
    ' SOLIDWORKS increments the untitled document
    ' count to 9
    ' The next untitled document gets a name with
    ' count = 9 ("Part9")
    Set Part = swApp.NewDocument("C:\ProgramData\SolidWorks\SOLIDWORKS 2016\templates\Part.prtdot", 0, 0, 0)
    swApp.ActivateDoc2 "Part9", False, longstatus
    Set Part = swApp.ActiveDoc
    Set ModelView = Part.ActiveView    
    ' Maximize Part9
    ModelView.FrameState = swWindowState_e.swWindowMaximized    
    ' When a new untitled document is created, SOLIDWORKS
    ' increments the untitled document count to 10
    ' The next untitled document gets a name with
    ' count = 10 ("Part10")
    Set Part2 = swApp.NewDocument("C:\ProgramData\SolidWorks\SOLIDWORKS 2016\templates\Part.prtdot", 0, 0, 0)
    swApp.ActivateDoc2 "Part10", False, longstatus
    Set Part2 = swApp.ActiveDoc
    Set ModelView2 = Part2.ActiveView    
    ' Minimize Part10
    ModelView2.FrameState = swWindowState_e.swWindowMinimized
End Sub


Provide feedback on this topic

SOLIDWORKS welcomes your feedback concerning the presentation, accuracy, and thoroughness of the documentation. Use the form below to send your comments and suggestions about this topic directly to our documentation team. The documentation team cannot answer technical support questions. Click here for information about technical support.

* Required

 
*Email:  
Subject:   Feedback on Help Topics
Page:   Reset Untitled Document Count Example (VBA)
*Comment:  
*   I acknowledge I have read and I hereby accept the privacy policy under which my Personal Data will be used by Dassault Systèmes

Print Topic

Select the scope of content to print:




x

We have detected you are using a browser version older than Internet Explorer 7. For optimized display, we suggest upgrading your browser to Internet Explorer 7 or newer.

 Never show this message again
x

Web Help Content Version: API Help (English only) 2019 SP05

To disable Web help from within SOLIDWORKS and use local help instead, click Help > Use SOLIDWORKS Web Help.

To report problems encountered with the Web help interface and search, contact your local support representative. To provide feedback on individual help topics, use the “Feedback on this topic” link on the individual topic page.