Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

copier le document inserer dans une cellule

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

nsqualli

XLDnaute Junior
Bonjour,

j'ai un probleme et j'espere trouver la reponse avec votre aide.

j'ai un document excel, et il y'a des cellules ou on a inserer des documents word, et je dois copier cette cellule dans une autre cellule d'un autre classeur, et j'arrive. j'ai essayé .copy .paste mais le document ne se copie pas.

est ce que vous pouvez m'aider SVP

Merci d'avance.
 
Re : copier le document inserer dans une cellule

Bonsoir

En parant d'un objet Word inséré manuellement dans Excel

et à partir du code de l'enregistreur de macro

La copie se fait bien dans un nouveau classeur.

Code:
Sub Macro1()
With ActiveSheet.Shapes("Object 1")
    .Copy
        Set newbook = Workbooks.Add(xlWBATWorksheet)
        With newbook
           .Title = "Copie objet WORD"
           .Subject = "Macro VBA"
           Set f = ActiveSheet
            With f
                .PasteSpecial Format:="Objet Document Microsoft Word", Link:= _
                    False, DisplayAsIcon:=False
                .Name = "Nouveau"
            End With
            .SaveAs ("c:\temp\testok.xls")
        End With
End With
Set newbook = Nothing
Set f = Nothing
End Sub

A+
 
Re : copier le document inserer dans une cellule

oui c vrai, mais ce que je veux faire, c'est qu'en parcourant une feuille d'un classeur ou il y'a les documents, je veux copier les valeurs des cellules avec les documents dans un autre classeur et c dans ce dernier ou il y'a la macro.

car ta macro existe dans le classeur source et moi dans le classeur destination.
Mais merci quand meme.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
3
Affichages
222
Réponses
10
Affichages
543
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…