Skip to content

Commit a19e5ca

Browse files
Ignore temporary objects in navigation pane
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.
1 parent 59ed553 commit a19e5ca

File tree

1 file changed

+2
-0
lines changed

1 file changed

+2
-0
lines changed

Version Control.accda.src/modules/clsDbNavPaneGroup.cls

+2
Original file line numberDiff line numberDiff line change
@@ -294,6 +294,8 @@ Private Function GetDictionary(Optional blnUseCache As Boolean) As Dictionary
294294
' Add any item listed in this group
295295
If Nz(!ObjectName) = vbNullString Then
296296
' Saved group with no items.
297+
ElseIf Left(Nz(!ObjectName), 1) = "~" Then
298+
' Skip temporary placeholder after deletion.
297299
Else
298300
Set dObject = New Dictionary
299301
dObject.Add "Name", Nz(!ObjectName)

0 commit comments

Comments
 (0)