Aide Macro

Fermé
ChaL - 13 août 2020 à 13:59
cs_Le Pivert Messages postés 7904 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 14 août 2024 - 13 août 2020 à 16:52
Bonjour,

Je cherche à créer un macro permettant de faire une manip de mise à jour d'un document hebdomadaire.
Chaque matin, je copie/colle des données d'un document excel vers un autre document excel.
J'aimerais pouvoir cliquer sur le lancement de la macro, sélectionner le document à coller et ensuite le copiage se fera automatiquement.
Comment dois-je procéder ?

Merci d'avance pour votre aide !


Configuration: Windows / Chrome 84.0.4147.105
A voir également:

1 réponse

cs_Le Pivert Messages postés 7904 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 14 août 2024 729
Modifié le 13 août 2020 à 17:21
Bonjour,

En vba faire Alt F11 pour accéder à l'éditeur.

Ensuite insérer un module et y mettre ce code qui sera associé à un bouton ou raccourci clavier:

Option Explicit
Sub copie()
Dim c As Range
Dim strFichier As String
Dim classeurDestination As Workbook
strFichier = Application.GetOpenFilename("Excel Files (*.xls), *.xls") 'excel 2003 pour  les suivants remplacer par xlsx
Set c = ActiveCell
Set classeurDestination = Workbooks.Open(strFichier)
  'copier les données de la feuille active du classeur source vers la feuille "Feuil1" ' a adapter du classeur destination
c.Copy Destination:=classeurDestination.Sheets("Feuil1").Range("A1") 'a adapter
End Sub


enregistrer en classeur acceptant les macros

0