diff --git a/app/DD-Record-Organiser/frmConstructor_Main.vb b/app/DD-Record-Organiser/frmConstructor_Main.vb
index 5fbd7db..894a287 100644
--- a/app/DD-Record-Organiser/frmConstructor_Main.vb
+++ b/app/DD-Record-Organiser/frmConstructor_Main.vb
@@ -1113,20 +1113,23 @@ Public Class frmConstructor_Main
 #Region "TreeView"
 
     Public Sub SetSelectedNodeStyle(tncoll As TreeNodeCollection)
-        For Each node As TreeNode In tncoll
+        If NODE_NAVIGATION = False Then
+            For Each node As TreeNode In tncoll
 
-            If node.IsSelected Then
-                node.NodeFont = New Font(TreeViewMain.Font.FontFamily, TreeViewMain.Font.Size, FontStyle.Bold)
-                node.Text = node.Text
-            Else
-                node.NodeFont = New Font(TreeViewMain.Font.FontFamily, TreeViewMain.Font.Size, FontStyle.Regular)
-            End If
+                If node.IsSelected Then
+                    node.NodeFont = New Font(TreeViewMain.Font.FontFamily, TreeViewMain.Font.Size, FontStyle.Bold)
+                    node.Text = node.Text
+                Else
+                    node.NodeFont = New Font(TreeViewMain.Font.FontFamily, TreeViewMain.Font.Size, FontStyle.Regular)
+                End If
 
-            If node.Nodes.Count > 0 Then
-                SetSelectedNodeStyle(node.Nodes)
-            End If
+                If node.Nodes.Count > 0 Then
+                    SetSelectedNodeStyle(node.Nodes)
+                End If
+
+            Next
+        End If
 
-        Next
         TreeViewMain.Refresh()
     End Sub
     Private Sub NodeRecursive(ByVal n As TreeNode, searchRecord As Integer)