Discussion :

[nikof]

bonjour a vous
je suis entrain de m’entraîner sur le vba excel et j'ai monte un petit projet pour essayer d'atteindre votre niveau.
mais je viens de rencontrer mes limite là....je bloque à la combinaison d'une fonction si et la recherchev, je m'aide toujours parfois avec l'enregestrement macro mais la la la...je ne comprend plus---s'il vous plait l'explication ou autre approche d'un sinsei me permettre de voir un peu plus clair..
s'il vous plait me laisser pas tomber.
je vous mait mon code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
Sub retourCle()
'declaration des variables
Dim compteur As Byte, Cbre As Integer
compteur = 6
'faire une boucle tant que la cellule vide n'est pas trouver
        Range("G6").Select
        Do
        compteur = compteur + 1
        Cells(compteur, 7).Select
        Loop While Not IsEmpty(ActiveCell)
'condition si cellule vide trouver
        If IsEmpty(ActiveCell) Then
            Cbre = InputBox("Quel chambre remet la clé :", "Heure retour clé")
        Else
            If Cbre = Application.VLookup(Cbre, Sheets("Ajout2").Range("B6:I20"), 3, False) Then
            ActiveCell.Formula.NumberFormatLocal = Time()
            End If
        End If
End Sub

[anasecu]

Bonjour,

mais la la la...je ne comprend plus---s'il vous plait l'explication

C'est simple cependant :
- tu cherches la première cellule vide et tu arrête ta boucle
- tu testes si elle est vide, pourquoi ?
Sauf si excel devient fou elle sera toujours vide et tu ne feras jamais ta RECHERCHEV

[nikof]

ah oui....tout a fait logique, je vais essayer votre conseil

[anasecu]

Bonsoir,

Bon courage en espérant que tu vas pouvoir rendre la clé : c'est ce que j'ai cru comprendre du projet...

[nikof]

effectivement.....et cette clé est belle et bien rentrée grâce a toi, dommage que tu n'a pas voulu jeter un œil sur le projet ,
cependant tu dois avoir tes raisons donc je respect ça...merci encore pour tes encouragements.
je ne baisserai pas les bras...

[anasecu]

Bonjour,

dommage que tu n'a pas voulu jeter un œil sur le projet

Je n'ai pas vu de projet particulier dans ta demande à part la macro que tu nous as soumise.