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

XL 2016 Bouton pour créer un classeur prérempli

Eric 66180

XLDnaute Nouveau
Bonjour
Débutant dans ce domaine j'aurais voulu savoir comment faire un bouton qui me pourrait me créer un classeur prérempli, comme par exemple dans le fichier joint, mettre les lignes jaunes dans les cases correspondantes de la matrice "Fiche Travaux".
Merci a vous
 

Pièces jointes

  • test1.xlsm
    28.4 KB · Affichages: 7
C

Compte Supprimé 979

Guest
Bonjour Eric 66180 et bienvenue

Je ne peux que vous conseiller d'utiliser l'enregistreur de macros


Pour afficher l'onglet développeur

Ainsi, vous effectuer les actions souhaitées, puis arrêtez le code que vous aurez dans VBA Project

A+
 

sylvanu

XLDnaute Barbatruc
Supporter XLD
Bonsoir Eric, et bienvenu sur XLD,
En PJ un simple essai à améliorer avec :
VB:
Sub RemplirDevis()
    With Sheets("Fiche Travaux")
        .[C3] = "Date EDL : " & Format([G8], "dd/mm/yyyy")
        .[A4] = "Log : " & [B8]
        .[B4] = "Bat : " & [C8]
        .[A11] = "N° Bt : "     ' Quelle cellule mettre ?
        .[A13] = Format([K8], "# ##0.00 €") & vbCrLf & [P8]
        .[A17] = Format([K9], "# ##0.00 €") & vbCrLf & [P9]
        .[A21] = Format([K11], "# ##0.00 €") & vbCrLf & [P11]
        .[A24] = Format([K10], "# ##0.00 €") & vbCrLf & [P10]
        .Select
    End With
End Sub
 

Pièces jointes

  • test1 (1).xlsm
    30.4 KB · Affichages: 1

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…