bonjour a tous
voila, j'ai un code très répétitif car il y a 28 formulaires qui on besoins de cette même ligne de code

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 
' indique si c'est une fiche recette ou depense
If depense.Value <> "" Then Range("b65536").End(xlUp).Offset(0, 1).Value = "fiche depense"
If recette.Value <> "" Then Range("b65536").End(xlUp).Offset(0, 1).Value = "fiche recette"
'inscrit la recette ou la depense
If recette.Value <> "" Then Range("b65536").End(xlUp).Offset(0, 4).Value = recette.Value
If depense.Value <> "" Then Range("b65536").End(xlUp).Offset(0, 5).Value = depense.Value
plutôt que de le copier 28 fois dans chaque formulaire, j'ai penser créer une macro simple (caisse)
j'ai placé caisse dans le programme de chaque formulaire pour qu'il éxécute le code ci-dessous
mais hélas comme "depense" et "recette" sont des textbox, contenue dans chacun des 28 formulaires, le code plante car je ne sais pas comment ratacher le code de la macro au formulaire en cours d'utilisation