Sujet Précédent Sujet Suivant

Création d'une macro spéciale

Fermé
fredbv13 Messages postés 2 Date d'inscription lundi 24 juillet 2017 Statut Membre Dernière intervention 24 juillet 2017 - 24 juil. 2017 à 09:58
via55 Messages postés 14402 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 18 avril 2024 - 24 juil. 2017 à 13:52
Bonjour,

je souhaiterai créer une macro pour pouvoir copier des cellules différente sur un classeur et les coller dans des cellules différente d'un autre classeur.

J'ai parcouru les forums mais étant donné mon excellent niveau ( proche du 0 ) je n'ai pas trouvé de macro correspondante a mon besoins.

Merci pour votre Aide

Cdlt
A voir également:

2 réponses

Réponse 1 / 2
fredbv13 Messages postés 2 Date d'inscription lundi 24 juillet 2017 Statut Membre Dernière intervention 24 juillet 2017
24 juil. 2017 à 10:15
Je m'explique,

Sur le classeur 1 je voudrais copier la cellule "A 30" et la coller dans le classeur 2, Feuille 42 en " A 1" puis la cellule du classeur 1 "B 30" coller dans la cellule du classeur 2 en "A 2" puis la cellule "D 30" coller dans la cellule du classeur 2 "C 1".

puis faire la même chose pour la ligne 31 du classeur 1 et coller sur la feuille 45 dans le classeur 2.

Ainsi de suite.

Merci
0
Réponse 2 / 2
via55 Messages postés 14402 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 18 avril 2024 2 702
Modifié le 24 juil. 2017 à 13:53
Bonjour

N'ayant pas la structure de ton classeur impossible de t'indiquer une macro adaptée
Quoiqu'il en soit l'instruction pour copier la cellule d'un classeur dans un autre est du type :
Worbook("Nom du classeur B").Sheets("Nom de la feuille").Range("F2")=Worbook("Nom du classeur A").sheets("Nom de la feuille").Range("A1")
pour copier par exemple la cellule A1 du 1er classeur dans la cellule F2 du 2ème

Essaye de bâtir ta macro et si tu as des difficultés postes des exemples de tes 2 classeurs su mon partage.fr, fais créer un lien, copies le et reviens le coller ici, on regardera ça


Cdlmnt
Via

"L'imagination est plus importante que le savoir."    A. Einstein
0