M
michel
Guest
bonjour à tous ,
j'ai cette macro qui me rend un tres grand service. en fait, quand je double clique sur une cellule, ca me note 1 dans la cellule, et m'allimente une 2e feuille en rajoutant + 1 a chaque fois.
j'aimerais, qu'en enregistrant mon travail, à la fin, le remplissage du 1er tableau, efface le données que je viens de rentrer mais que ca garde le 2e tableau qui vient d'etre allimenté.
merci de votre aide
Michel
Sub DblClick()
Dim Ligne As Integer
Dim Colonne As Integer
Ligne = ActiveCell.Row
Colonne = ActiveCell.Column
Cells(Ligne, Colonne).Value = 1
Sheets("FeuilTotal").Cells(Ligne, Colonne).Value = Sheets("FeuilTotal").Cells(Ligne, Colonne).Value + 1
End Sub
j'ai cette macro qui me rend un tres grand service. en fait, quand je double clique sur une cellule, ca me note 1 dans la cellule, et m'allimente une 2e feuille en rajoutant + 1 a chaque fois.
j'aimerais, qu'en enregistrant mon travail, à la fin, le remplissage du 1er tableau, efface le données que je viens de rentrer mais que ca garde le 2e tableau qui vient d'etre allimenté.
merci de votre aide
Michel
Sub DblClick()
Dim Ligne As Integer
Dim Colonne As Integer
Ligne = ActiveCell.Row
Colonne = ActiveCell.Column
Cells(Ligne, Colonne).Value = 1
Sheets("FeuilTotal").Cells(Ligne, Colonne).Value = Sheets("FeuilTotal").Cells(Ligne, Colonne).Value + 1
End Sub