Retour à la ligne automatiquement

Staple1600

XLDnaute Barbatruc

• 2 Octobre 2016

• #16

Re

Il allait de soi puisque c'est la macro qui insère la date alors en colonne I, tu dois effacer ces formules.
=SI(ESTVIDE(G2);"";AUJOURDHUI())

Ou alors il faut modifier la macro

VB:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target.Column = 9 And Target.Offset(, -2) <> "" Then Target = Date
If Target.Column = 9 And Not IsEmpty(Target) Then
If Me.ListObjects(1).ListRows.Count = Target.Row - 1 Then
Me.ListObjects(1).ListRows.Add
End If
End If
End Sub

NB: Il est possible que cette macro parfois beugue

 

Dernière édition: 2 Octobre 2016

Vote positif 0 Vote négatif

F

franckxjr

Guest

• 2 Octobre 2016

• #17

il y à t-il des formules comme la date automatiques plutot des codes?
pour rajouter une ligne en automatique car j'ai beaucoup de classeurs et je ne vais pas vous ennuyer avec ça !
je suis a mon compte je suis pas informaticien !!!

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 2 Octobre 2016

• #18

Re

Moi je ne suis pas à mon compte et je ne suis par information non plus 😉

Donc au final, tu laisses tomber les macros donc ?

J'aurai du m'en tenir à ce que je disais plus haut, diantre 😉

Donc je réitère: à quoi bon proposer du code VBA, si ensuite tu ne l'utilises pas ...

Cliquez pour agrandir...

Sans VBA, je ne vois pas trop comment automatiser les choses.

Sauf à insérer la ligne manuellement, ce qui est faisable puisqu'au final tu dois saisir des données manuellement dans ton classeur.

 

Vote positif 0 Vote négatif

F

franckxjr

Guest

• 2 Octobre 2016

• #19

ben tu es fort alors !!
car j'utilise ta formule dans un autre classeur et pour une autre feuille et marche pas !
je ne vais pas te demander a chaque fois ...

 

Vote positif 0 Vote négatif