Portapapeles a grid vb 2005

[doomkel]

si, muchas gracias eledgarr, no use el chr(10) pero si encontre como esta dividido el clipboard para hacer una matriz y ponerla en el grid esta es la solucion

Sub portagrid()
Dim rows As Integer = 0
Dim cols As Integer = 0

Dim s As String = Clipboard.GetText
Dim lines() As String = s.Split(vbLf)



For Each line As String In lines

dgData.Rows.Add()
Dim sCells() As String = line.Split(vbTab)

For cols = 0 To sCells.Length - 1

dgData.Item(cols, rows).Value = sCells(cols).ToString

Next

rows += 1


Next


End Sub