(Macro) Ajouter des valeurs à une macro Sub RAZ
Bonjour
J'aimerais rajouter des cellules à ma formule pour réinitialiser des données à l'aide d'un bouton
Détail de ma formule
Sub RAZ()
Dim Plage As Range
Union([A13:A73], [B13:B73], [C13:C73], [N13:N73], [O13:O73], [T13:T73], [U13:U73], [Z13:Z73], [AA13:AA73], [AF13:AF73], [AG13:AG73], [AL13:AL73], [AM13:AM73], [AR13:AR73], [AS13:AS73], [AX13:AX73], [AY13:AY73], [O10], [U10], [AA10], [AG10], [AM10], [AS10], [AY10]) = ""
End Sub
J'ai réussi à le faire pour effacer des données , mais j'ai d'autres données à réinitialiser via ce même bouton qui doivent être égale à 1.
J'aimerais ajouter qu'en appuyant sur le même bouton une colonne de valeurs que j'ai pu modifier se réinitialise automatiquement à 1.
Avez-vous des idées ?
Merci à vous
Cordialement
bonjour Rogerot44240,
je préfère utiliser des plages nommées que vous pouvez assigner manuellement et qui ont l'avantage que quand vous changez la mise en page (ajouter ou supprimer des colonnes, ...) s'adaptent.
Dans votre macro, vous n'avez qu'à écrire
Range("Nom1").ClearContents 'vider les contenu
Range("Nom2").Clear 'vider tout (contenu, format, bordures, ...)
Range("Nom3").Value = 1 'assigner une valeur à la plage