See release_notes.md for V2024.1

Author: rmcanany

QtyFromAssy/Module1.vb

@@ -57,24 +57,24 @@ Module Module1
 
 		If ExitCode = 0 Then
 
-			' Save and close assembly
-			SourceAssyfilename = SEDoc.FullName
-			Console.WriteLine("Closing assembly")
-			SEDoc.Save()
-			SEApp.DoIdle()
-			SEDoc.Close()
-			SEApp.DoIdle()
+			'' Save and close assembly
+			'SourceAssyfilename = SEDoc.FullName
+			'Console.WriteLine("Closing assembly")
+			'SEDoc.Save()
+			'SEApp.DoIdle()
+			'SEDoc.Close()
+			'SEApp.DoIdle()
 
 			' Add the properties to each file.
 			PopulateProps(BomDict, PropDict, ProgramSettings("QuantityPropertyName"))
 
-			' Reopen assembly
-			Console.WriteLine("Opening assembly")
-			SEApp.Documents.Open(SourceAssyfilename)
-			SEApp.DoIdle()
-			SEApp.DisplayAlerts = True
+			'' Reopen assembly
+			'Console.WriteLine("Opening assembly")
+			'SEApp.Documents.Open(SourceAssyfilename)
+			'SEApp.DoIdle()
+			'SEApp.DisplayAlerts = True
 
-			SEDoc = CType(SEApp.ActiveDocument, SolidEdgeAssembly.AssemblyDocument)
+			'SEDoc = CType(SEApp.ActiveDocument, SolidEdgeAssembly.AssemblyDocument)
 
 		End If
 

Readme.md

@@ -77,6 +77,8 @@ Kabir Costa [**KabirCosta**](https://github.com/kabircosta)
 
 Alan Pope [**Cadcentral NZ**](https://www.cadcentral.co.nz/macros)
 
+UK Dave [**uk-dave**](https://github.com/uk-dave/SolidEdge)
+
 To suggest other sources, including your own, feel free to message me, 
 RobertMcAnany, on the 
 [**Solid Edge Forum**](https://community.sw.siemens.com/s/topic/0TO4O000000MihiWAC/solid-edge).