Get-dtADUsers.ps1

$dsADUsers = New-Object System.Data.DataSet
$dtADUsers = New-Object System.Data.Datatable 'ADUsers'

$columnsADUsers = Get-ADUser -Identity guest -Properties * | 
   Get-Member -MemberType Property | 
   Select-Object -ExpandProperty Name

$columnsADUsers |
Foreach-Object{
   [void]$dtADUsers.Columns.Add("$($_)")
}

Get-ADUser -Filter * -Properties * |
Foreach-Object{
   $Row = $dtADUsers.NewRow()
   foreach ($column in $columnsADUsers){
      $Row["$($column)"] = if($_.$column -ne $null){($_ | Select-Object -ExpandProperty $column) -join "`n"}else{$null}
   }
   $dtADUsers.Rows.Add($Row)
}

$dsADUsers.Tables.Add($dtADUsers)

$dtADUsers.WriteXml('c:\scripts\export\dsa\dtADUsers.xml')