bonjour
dans une plage de cellule A1:C30
je rempli une cellule matin midi et soir.........
en supposant que A1;B1 soient occupés, comment faire pour que la cellule
suivante soit automatiquement sélectionnée? , par exemple quelle soit
colorée.
merci
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
anonymousA
bonjour,
A mettre dans le module de feuille ou se situe le range("A1:C30").La proc est faite pour réagir aux tentaives de sélection dans le range considéré si tu veux qu'il réagisse à n'importe quelle cellule de la feuille il faut supprimer le test Intersect. Attention, une fois cette proc en fonction, elle interdit la modif de cellules déjà sélectionnées
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A1:C30")) Is Nothing Then
Application.EnableEvents = False On Error Resume Next Range("A1:C30").Find(What:="").Select If Err.Number <> 0 Then Err.Clear Range("A1").Activate End If Application.EnableEvents = True
Else
End If
End Sub
A+
bonjour dans une plage de cellule A1:C30 je rempli une cellule matin midi et soir......... en supposant que A1;B1 soient occupés, comment faire pour que la cellule suivante soit automatiquement sélectionnée? , par exemple quelle soit colorée. merci
bonjour,
A mettre dans le module de feuille ou se situe le range("A1:C30").La
proc est faite pour réagir aux tentaives de sélection dans le range
considéré si tu veux qu'il réagisse à n'importe quelle cellule de la
feuille il faut supprimer le test Intersect.
Attention, une fois cette proc en fonction, elle interdit la modif de
cellules déjà sélectionnées
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A1:C30")) Is Nothing Then
Application.EnableEvents = False
On Error Resume Next
Range("A1:C30").Find(What:="").Select
If Err.Number <> 0 Then
Err.Clear
Range("A1").Activate
End If
Application.EnableEvents = True
Else
End If
End Sub
A+
bonjour
dans une plage de cellule A1:C30
je rempli une cellule matin midi et soir.........
en supposant que A1;B1 soient occupés, comment faire pour que la cellule
suivante soit automatiquement sélectionnée? , par exemple quelle soit
colorée.
merci
A mettre dans le module de feuille ou se situe le range("A1:C30").La proc est faite pour réagir aux tentaives de sélection dans le range considéré si tu veux qu'il réagisse à n'importe quelle cellule de la feuille il faut supprimer le test Intersect. Attention, une fois cette proc en fonction, elle interdit la modif de cellules déjà sélectionnées
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A1:C30")) Is Nothing Then
Application.EnableEvents = False On Error Resume Next Range("A1:C30").Find(What:="").Select If Err.Number <> 0 Then Err.Clear Range("A1").Activate End If Application.EnableEvents = True
Else
End If
End Sub
A+
bonjour dans une plage de cellule A1:C30 je rempli une cellule matin midi et soir......... en supposant que A1;B1 soient occupés, comment faire pour que la cellule suivante soit automatiquement sélectionnée? , par exemple quelle soit colorée. merci
ChrisV
Bonjour Sycora,
Une soluce (un peu capilotractée) sans VBA... avec la plage de donnée A1:C30 nommée ici Zn
Inertion/Nom/Définir: Nom dans le classeur: nxtC Fait référence à:
sur la plage A1:C30, par mise en forme conditionnelle:
Condition 1, La formule est: RESSE(LIGNE();COLONNE())=nxtC
Format.../Motif/ blabla
ChrisV
"sycora" a écrit dans le message de news: 425e3fe8$0$31774$
bonjour dans une plage de cellule A1:C30 je rempli une cellule matin midi et soir......... en supposant que A1;B1 soient occupés, comment faire pour que la cellule suivante soit automatiquement sélectionnée? , par exemple quelle soit colorée. merci
Bonjour Sycora,
Une soluce (un peu capilotractée) sans VBA...
avec la plage de donnée A1:C30 nommée ici Zn
Inertion/Nom/Définir:
Nom dans le classeur: nxtC
Fait référence à:
sur la plage A1:C30, par mise en forme conditionnelle:
Condition 1, La formule est:
RESSE(LIGNE();COLONNE())=nxtC
Format.../Motif/ blabla
ChrisV
"sycora" <sycora@wanadoo.fr> a écrit dans le message de news:
425e3fe8$0$31774$8fcfb975@news.wanadoo.fr...
bonjour
dans une plage de cellule A1:C30
je rempli une cellule matin midi et soir.........
en supposant que A1;B1 soient occupés, comment faire pour que la cellule
suivante soit automatiquement sélectionnée? , par exemple quelle soit
colorée.
merci
sur la plage A1:C30, par mise en forme conditionnelle:
Condition 1, La formule est: RESSE(LIGNE();COLONNE())=nxtC
Format.../Motif/ blabla
ChrisV
"sycora" a écrit dans le message de news: 425e3fe8$0$31774$
bonjour dans une plage de cellule A1:C30 je rempli une cellule matin midi et soir......... en supposant que A1;B1 soient occupés, comment faire pour que la cellule suivante soit automatiquement sélectionnée? , par exemple quelle soit colorée. merci
