sur mon tableau en p.j. je dois rentre des chiffres dans la colonne H qui viennent se déduire a la colonne G pour donner un résultat en colonne I, jusque là pas de souci mais après ce calcul j'aimerais pouvoir effacer la colonne H sans que les calculs d'avant s'efface, soir par un bouton raz, ou soit a chaque ouverture du fichier.
Sub RaZ()
' Macro de GB
' Reinitialisation des cellules de collecte
Range("J4:J11") = Range("J4:J11").Value
Range("I4:I11").ClearContents
Range("J4:J11").Formula = "=RC[-3]-RC[-1]"
End Sub
Les explications ne correspondent pas au fichier joint : les cellules inutilement fusionnées en sont la cause.
Pour information, la largeur des colonnes d'une feuille Excel est modulable : ici
Sub RaZ()
' Macro de GB
' Reinitialisation des cellules de collecte
Range("F4:F11") = Range("F4:F11").Value
Range("D4:E11").ClearContents
Range("F4:F11").Copy Range("D4")
Range("F4:F11").Formula = "=RC[-2]-RC[-1]"
End Sub
re bonsoir sincèrement désolé je vous ai joint le fichier après avoir travaille dessus
c'est exactement cela que je cherchais je vous remercie par avance