Skip to content

Commit

Permalink
Ignore temporary objects in navigation pane
Browse files Browse the repository at this point in the history
If you delete certain objects from the navigation pane and export source immediately afterwards, you may find some temporary objects still listed in the navigation pane, prefixed by `~`. These are removed automatically by Access when the pane is refreshed, so there is no need to export these items to the source file.
  • Loading branch information
joyfullservice committed Jun 29, 2023
1 parent 59ed553 commit a19e5ca
Showing 1 changed file with 2 additions and 0 deletions.
2 changes: 2 additions & 0 deletions Version Control.accda.src/modules/clsDbNavPaneGroup.cls
Expand Up @@ -294,6 +294,8 @@ Private Function GetDictionary(Optional blnUseCache As Boolean) As Dictionary
' Add any item listed in this group
If Nz(!ObjectName) = vbNullString Then
' Saved group with no items.
ElseIf Left(Nz(!ObjectName), 1) = "~" Then
' Skip temporary placeholder after deletion.
Else
Set dObject = New Dictionary
dObject.Add "Name", Nz(!ObjectName)
Expand Down

0 comments on commit a19e5ca

Please sign in to comment.