Anyone was able to use DocumentFormat.OpenXml.dll from Workspace assembly (v8)?

Workspace Assembly System.IO.Packaging.ddl: To reference the
System.IO.Packaging /access items in the System.IO.Packaging assembly within a
Workspace assembly or a business rule and compile, you will need to add the following
code to reference the System.IO.Packaging.dll from the appropriate location:
compilerParameters.ReferencedAssemblies.Add (typeof
(System.IO.Packaging.Package).Assembly.Location); (PF6-4824).

Imports System
Imports System.Data
Imports System.Data.Common
Imports System.IO
Imports System.Collections.Generic
Imports System.Globalization
Imports System.Linq
Imports Microsoft.VisualBasic
Imports System.Windows.Forms
Imports OneStream.Shared.Common
Imports OneStream.Shared.Wcf
Imports OneStream.Shared.Engine
Imports OneStream.Shared.Database
Imports OneStream.Stage.Engine
Imports OneStream.Stage.Database
Imports OneStream.Finance.Engine
Imports OneStream.Finance.Database
Imports DocumentFormat.OpenXml
Imports DocumentFormat.OpenXml.Packaging
Imports DocumentFormat.OpenXml.Spreadsheet
' Needs these adding to the Referenced Assemblies on the Properties tab:
' DocumentFormat.OpenXml.dll; System.IO.Packaging.dll

Namespace OneStream.BusinessRule.Extender.MHTestExcel
	Public Class MainClass
		Public Function Main(ByVal si As SessionInfo, ByVal globals As BRGlobals, ByVal api As Object, ByVal args As ExtenderArgs) As Object
			Try
				Select Case args.FunctionType
					
					Case Is = ExtenderFunctionType.Unknown
                        Dim thisFileName As String = "MyFile.xlsx"

                        ' Create a temporary file
                        Dim filePath As String = String.Format("{0}/{1}", Path.GetTempPath(), thisFileName)
                        
                        ' Create the SpreadsheetDocument object and set its type to Workbook
                        Using document As SpreadsheetDocument = SpreadsheetDocument.Create(filePath, SpreadsheetDocumentType.Workbook)

                            'Create the workbook
                            Dim workbookPart As WorkbookPart = document.AddWorkbookPart()
                            workbookPart.Workbook = New Workbook()
                            
                        End Using
						
					Case Is = ExtenderFunctionType.ExecuteDataMgmtBusinessRuleStep
						
					Case Is = ExtenderFunctionType.ExecuteExternalDimensionSource
						'Add External Members
						Dim externalMembers As New List(Of NameValuePair)
						externalMembers.Add(New NameValuePair("YourMember1Name","YourMember1Value"))
						externalMembers.Add(New NameValuePair("YourMember2Name","YourMember2Value"))
						Return externalMembers
				End Select

				Return Nothing
			Catch ex As Exception
				Throw ErrorHandler.LogWrite(si, New XFException(si, ex))
			End Try
		End Function		

	End Class
End Namespace