Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
François Picalausa
On Aug 9, 5:31 pm, Superman wrote:
Je souhaiterais savoir si il est possible de copier un tableau sur EXCEL et de coller celui ci sur une FORM VB6
Hello,
Si ce sont principalement les données qui t'intéressent (plus que le formattage ou les formules), alors il suffit d'interpréter le résultat de Clipboard.GetText: les tabulations (vbTab) servent de sépararteur de colonnes, tandis que le retour à la ligne (vbcrlf) sert de séparateur de lignes. Exemple (non testé): Dim Lines() As String Dim Colums() As String Dim i As long Dim j as Long
Lines = Split(ClipBoard.GetText, vbCrLf)
For i = 0 To Ubound(Lines) Columns = Split(Lines(i), vbTab)
For j = 0 To Ubound(Columns) 'Imprime les colonnes Debug.? Columns(j), Next j 'Saut de ligne Debug.? Next i
François
On Aug 9, 5:31 pm, Superman <john.am...@free.fr> wrote:
Je souhaiterais savoir si il est possible de copier un tableau sur
EXCEL et de coller celui ci sur une FORM VB6
Hello,
Si ce sont principalement les données qui t'intéressent (plus que le
formattage ou les formules), alors il suffit d'interpréter le résultat
de Clipboard.GetText:
les tabulations (vbTab) servent de sépararteur de colonnes, tandis que
le retour à la ligne (vbcrlf) sert de séparateur de lignes.
Exemple (non testé):
Dim Lines() As String
Dim Colums() As String
Dim i As long
Dim j as Long
Lines = Split(ClipBoard.GetText, vbCrLf)
For i = 0 To Ubound(Lines)
Columns = Split(Lines(i), vbTab)
For j = 0 To Ubound(Columns)
'Imprime les colonnes
Debug.? Columns(j),
Next j
'Saut de ligne
Debug.?
Next i
Je souhaiterais savoir si il est possible de copier un tableau sur EXCEL et de coller celui ci sur une FORM VB6
Hello,
Si ce sont principalement les données qui t'intéressent (plus que le formattage ou les formules), alors il suffit d'interpréter le résultat de Clipboard.GetText: les tabulations (vbTab) servent de sépararteur de colonnes, tandis que le retour à la ligne (vbcrlf) sert de séparateur de lignes. Exemple (non testé): Dim Lines() As String Dim Colums() As String Dim i As long Dim j as Long
Lines = Split(ClipBoard.GetText, vbCrLf)
For i = 0 To Ubound(Lines) Columns = Split(Lines(i), vbTab)
For j = 0 To Ubound(Columns) 'Imprime les colonnes Debug.? Columns(j), Next j 'Saut de ligne Debug.? Next i