Перемещение столбца в датированном от первого до последнего

Question

У меня есть хранимая процедура sql, которая возвращает определенную группу столбцов в моей таблице данных.
Как я могу переместить (скажем) столбец в первой позиции, в последнюю позицию, прежде чем экспортировать данные в Excel?

Dim myConn As New SqlConnection(strConnection)
Dim myCmd As New SqlCommand(strSQL, myConn)
Dim dt As DataTable = New DataTable()
Dim da As SqlDataAdapter = New SqlDataAdapter(strSQL, myConn)
da.Fill(dt)

Dim excelPackage = New OfficeOpenXml.ExcelPackage
Dim excelWorksheet = excelPackage.Workbook.Worksheets.Add("ProjectStatusReports")
excelWorksheet.Cells("A3").LoadFromDataTable(dt, True)

Answer 1

Это изменяет позицию первого столбца на последний в DataTable:

dt.Columns(0).SetOrdinal(dt.Columns.Count - 1)

• http://msdn.microsoft.com/en-us/library/system.data.datacolumn.setordinal.aspx
• http://msdn.microsoft.com/en-us/magazine/cc163495.aspx (поиск SetOrdinal)

Все столбцы перед адресуемой порядковой позицией уменьшаются на один слот, чтобы освободить место для изменения положения.