Inkedit

[Résolu]
Signaler
Messages postés
78
Date d'inscription
mercredi 30 octobre 2019
Statut
Membre
Dernière intervention
24 octobre 2021
-
Messages postés
78
Date d'inscription
mercredi 30 octobre 2019
Statut
Membre
Dernière intervention
24 octobre 2021
-
Bonjour ,
depuis un certain temps j'essaie de copier les données d'une feuille excel dans mon Inkedit mais a chaque fois que je copie une plage de cellules cela apparait dans le Inkedit comme un tableau. Il y a-t-il un moyen de copier un ensemble de cellules et de les coller dans inkedit sans et que celles-ci n'apparaient pas comme un tableau.

1 réponse

Messages postés
78
Date d'inscription
mercredi 30 octobre 2019
Statut
Membre
Dernière intervention
24 octobre 2021

Messages postés
17143
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
24 octobre 2021
911
bonjour,
je n'ai pas testé, et j'essaierais de remplacer
Worksheets("Fiche1").Range("A10").Copy

par
SetClipboard Worksheets("Fiche1").Range("A10")
Messages postés
78
Date d'inscription
mercredi 30 octobre 2019
Statut
Membre
Dernière intervention
24 octobre 2021
>
Messages postés
17143
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
24 octobre 2021

InkEdit2.text = vbCrLf

PutInClipBoard vbCrLf & ""
Worksheets("Fiche1").Shapes("Monimage").Copy
PasteToControl InkEdit2.hWnd
'Application.CutCopyMode = False

'SetClipboard vbNewLine & " "
'PasteToObj InkEdit2.hWnd

Worksheets("Fiche1").Range("B7:F1048575").CopyPicture
PasteToObj InkEdit2.hWnd
Application.CutCopyMode = False

SetClipboard vbNewLine & " "
PasteToObj InkEdit2.hWnd

Je l'ai trouver la solution,merci yg_be