selectionner une cellule

[hicham28]

Bonjour, et merci de votre aide,
J’aimerai bien savoir si c'est possible de sélectionner ou de colorer temporairement avant le déplacement du curseur une cellule, pour bien vérifier si les données existaient déjà ou pas, voila le code

Set c = Range("Liste_Login").Find(Utilisateur_Login, , , xlWhole)
If Not c Is Nothing Then
MsgBox "existe"
Else
MsgBox "n'existe pas"
End If

 

[Pierrot93]

Re : selectionner une cellule

Bonjour Hicham,

pas sûr d'avoir bien compris ta demande, regarde peut être le code ci-dessous si il peut t'aider :

Dim c As Range
Set c = Range("Liste_Login").Find(Utilisateur_Login, , xlValues, xlWhole, , , False)
If Not c Is Nothing Then c.Interior.ColorIndex = 3

@+

 

[GBI]

Re : selectionner une cellule

Bonjour, et merci de votre aide,
J’aimerai bien savoir si c'est possible de sélectionner ou de colorer temporairement avant le déplacement du curseur une cellule, pour bien vérifier si les données existaient déjà ou pas, voila le code

Set c = Range("Liste_Login").Find(Utilisateur_Login, , , xlWhole)
If Not c Is Nothing Then
MsgBox "existe"
Else
MsgBox "n'existe pas"
End If

Bonjour hicham,
Vas-tu exporter une liste de plusieurs logs ou juste une seule cellule à chaque fois.

Private Sub essai()

Set c = Range("Liste_Login").Find(Utilisateur_Login, , , xlWhole)
If Not c Is Nothing Then

c.Select
With Selection.Interior
        .ColorIndex = 3
MsgBox "existe"
End With
Else
MsgBox "n'existe pas"
End If
End Sub

Voilà ce que j'ai bidouillé dans le cas ou tu n'as qu'un seule cellule d'utilisateur à exporter

 

[hicham28]

Re : selectionner une cellule

Bonjour, pour éviter la saisie des doublons, j'aimerai que si la donnée que j’essaie de saisir est présente au sein d’une plage de cellule, colorer la cellule qui contient cette donnée, j'espère être un peu claire, merci pour ton aide

 

[Pierrot93]

Re : selectionner une cellule

Bonjour à tous

petit rappel tout de même, concernant la méthode "find", certains arguments sont enregistrés à chaque utilisation. S'ils ne sont pas indiqués, ils seront rappelés d'office par la méthode, ce qui peut ne pas donner le résultat attendu... cf extrait de l'aide vba...

Notes
Les paramètres des arguments LookIn, LookAt, SearchOrder et MatchByte sont enregistrés chaque fois que vous utilisez cette méthode. Si vous ne spécifiez aucun paramètre pour ces arguments lors du prochain appel de la méthode, les paramètres enregistrés sont utilisés. Le fait de définir les paramètres de ces arguments modifie les paramètres de la boîte de dialogue Rechercher, ce qui a pour effet de changer les paramètres enregistrés qui sont utilisés lorsque vous ne spécifiez pas les arguments. Pour éviter toute ambiguïté, définissez ces arguments de façon explicite chaque fois que vous utilisez cette méthode.

 

[hicham28]

Re : selectionner une cellule

merci a vous,
merci

 

[Pierrot93]

Re : selectionner une cellule

Re

Edité, plus de temporaire...;