Bonjour à tous!
J'ai un tableau excel (un reçu en fait) que je colle très souvent pour renseigner chaque fois mes clients, et chaque fois que je colle le tableau (par une macro) il faut que je tape en suite au clavier le numéro du reçu et mettre la date, ce que j'oublie parfois, c'est ainsi que j'ai fouillé sur le net et j'ai eu des codes VBA mais je ne sais pas comment les adapter à mon tableau.
1- Macro pour incrémenter le contenu d'une cellule :
Worksheets("Feuil1").Range("A1").Value = Worksheets("Feuil1").Range("A1").Value + 1
Je voudrais adapter cette macro à mon tableau de tel sorte que le numero ''n'' de mon reçu soit ''n+1'', ''n+2''....à chaque fois que je colle le tableau.
2- Macro pour insérer la date du jour dans la cellule ''Bn'' lorsqu’il y a une valeur dans ''An'' :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 1 Then If Not (IsEmpty(Target.Value)) Then Range("B" & Target.Row).Value = Now Else Range("B" & Target.Row).ClearContents End Sub
Comme ma première question, je voudrais modifier cette macro afin d'obtenir la date du jour qui doit rester inchangée à chaque fois que je colle le tableau.
Merci