Bonjour le Forum,
voilà j'essaie depuis plusieurs jours de trouver mais mon niveau de VBA n'est pas au top et la j'en vient a demander votre aide, je vais essayer de synthétiser pour être le plus clair possible.
J'ai 2 classeurs ( classeur 1 et classeur 2 ) et je souhaite pouvoir copier les cellules du classeur 1 au classeur 2 , jusque la je sais faire sans souci;
ma problématique viens du faite que je souhaite pouvoir copier les cellules du classeur 1 qui sont toutes sur la même ligne sur le classeur 2 dans des des cellules qui sont à divers endroit (ex: classeur 1 cellule A1 sur classeur 2 Cellule D12 ) , pour ce faire j'utilise ce code:
Workbooks("classeur 2 ").Worksheets("feuil1").Range("D12").Value = Workbooks("classeur 1 ").Worksheets("feuil1").Range("A1").Value
Cette ligne de commande fonctionne pour copier la cellule spécifié du classeur 1 , mais je voudrai que cette commande fonctionne sur la cellule Active du Classeur 1 et pas une cellule spécifique.
J'ai essayé avec ActiveCell mais je dois me tromper quelque part car le code ne fonctionne pas.
Si vous pouviez l'aider cela m’enlèverai un grosse épine du pied et me permettrai de continuer a essayer de finaliser moon code.
Merci pour votre retour
voilà j'essaie depuis plusieurs jours de trouver mais mon niveau de VBA n'est pas au top et la j'en vient a demander votre aide, je vais essayer de synthétiser pour être le plus clair possible.
J'ai 2 classeurs ( classeur 1 et classeur 2 ) et je souhaite pouvoir copier les cellules du classeur 1 au classeur 2 , jusque la je sais faire sans souci;
ma problématique viens du faite que je souhaite pouvoir copier les cellules du classeur 1 qui sont toutes sur la même ligne sur le classeur 2 dans des des cellules qui sont à divers endroit (ex: classeur 1 cellule A1 sur classeur 2 Cellule D12 ) , pour ce faire j'utilise ce code:
Workbooks("classeur 2 ").Worksheets("feuil1").Range("D12").Value = Workbooks("classeur 1 ").Worksheets("feuil1").Range("A1").Value
Cette ligne de commande fonctionne pour copier la cellule spécifié du classeur 1 , mais je voudrai que cette commande fonctionne sur la cellule Active du Classeur 1 et pas une cellule spécifique.
J'ai essayé avec ActiveCell mais je dois me tromper quelque part car le code ne fonctionne pas.
Si vous pouviez l'aider cela m’enlèverai un grosse épine du pied et me permettrai de continuer a essayer de finaliser moon code.
Merci pour votre retour