Remettre dans l'ordre[REGLE]
Bonjour à toutes et tous
Dans un premier temps veuillez recevoir en ce début d'année 2010 tous mes voeux de Santé,Bonheur et prospérité.
Voilà mon petit soucis.
J'aimerais que suite à mise à jour ( voir fichier joint) que les dates se mettent automatiquement dans l'ordre, est ce possible?
Vous remerciant d'avance pour votre aide.
Cordialement.
Bonjour hansolo18
j'espère répondre à ta question et bonne continuation
Private Sub Worksheet_Change(ByVal Target As Range)
If ActiveCell = "" Then Exit Sub
If ActiveCell.Column = 1 Then
Range("A2:N500").Select
Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Header:= _
xlYes, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Range("A2").Select
End If
End Sub
Merci pour ton aide, Mais je ne suis pas trop familliarisé avec ce que tu m'as noté. Que dois je faire avec
BOB71AU a écrit :Private Sub Worksheet_Change(ByVal Target As Range)
If ActiveCell = "" Then Exit Sub
If ActiveCell.Column = 1 Then
Range("A2:N500").Select
Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Header:= _
xlYes, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Range("A2").Select
End If
End Sub
Amicalement
Merci beaucoup c'est juste ce que je cherchai a faire
Bonne et heureuse année 2010
Amicalement