Per poter incollare su Excel basta che i dati siano separati da tabulazione e al termine di ogni riga vi sua un NewLine.
Dim sb As New System.Text.StringBuilder
For Each row As System.Data.DataRow In ds.MyTable.Rows
For Each column As System.Data.DataColumn In ds.MyTable.Columns
sb.Append(row(column))
sb.Append(ControlChars.Tab)
Next
sb.Append(ControlChars.NewLine)
Next
Clipboard.SetDataObject(sb.ToString)
Ovviamente l'idea puo essere poi estesa per copiare ad esempio le righe selezionate di una DataGrid o GridView in un foglio di Excel.