Problème avec fonction HLookup
Holtlion31
Messages postés
26
Date d'inscription
Statut
Membre
Dernière intervention
-
ccm81 Messages postés 10909 Date d'inscription Statut Membre Dernière intervention -
ccm81 Messages postés 10909 Date d'inscription Statut Membre Dernière intervention -
Bonjour à tous.
J'ai un planning de l'année 2016 (01/01/2016 au 31/12/2016)
Mes dates sont en lignes: Ma plage est donc G4 à JG4
Je suppose que la fonction HLookup est celle qu'il me faut mais je n'en suis pas sur
J'aimerai dire: J'ai une date: le 13/01/2016, je cherche cette date dans ma plage G4 à JG4. Une fois que j'ai trouvé la date, je sélectionne la cellule située 3 lignes en dessous de la cellule de la date.
En résumé: ma date cherchée est 13/01/2016. Je la cherche dans la plage G4 à JG4. Dans cet exemple, je me positionne sur O4 + 3 lignes, donc je sélectionne la cellule O7.
J'ai juste besoin de ce bout de code, le reste est ok.
Quelqu'un connais le code?
Merci :)
J'ai un planning de l'année 2016 (01/01/2016 au 31/12/2016)
Mes dates sont en lignes: Ma plage est donc G4 à JG4
Je suppose que la fonction HLookup est celle qu'il me faut mais je n'en suis pas sur
J'aimerai dire: J'ai une date: le 13/01/2016, je cherche cette date dans ma plage G4 à JG4. Une fois que j'ai trouvé la date, je sélectionne la cellule située 3 lignes en dessous de la cellule de la date.
En résumé: ma date cherchée est 13/01/2016. Je la cherche dans la plage G4 à JG4. Dans cet exemple, je me positionne sur O4 + 3 lignes, donc je sélectionne la cellule O7.
J'ai juste besoin de ce bout de code, le reste est ok.
Quelqu'un connais le code?
Merci :)
A voir également:
- Problème avec fonction HLookup
- Fonction si et - Guide
- Fonction miroir - Guide
- Fonction moyenne excel - Guide
- Fonction remplacer sur word - Guide
- Fonction somme excel - Guide
4 réponses
Alors c'est peut être find qu'il me faut finalement.
Je vais essayer d'adapter avec mon fichier
Merci
Je vais essayer d'adapter avec mon fichier
Merci
Je ne m'en sort pas
Voici le code:
Sub Planning_auto()
' Définition des variables
Dim a As Integer
Dim m As String
Dim obj As Object
Dim col As Long
Dim Li As Long
' Valeur maxi de mes variables lors des boucles
m = Sheets("Tableau de Synthèse").Range("B1").Value
For a = 1 To m
Sheets("Tableau de Synthèse").Range("K" & a + 2).Select
Set obj = Rows(4).Find(ActiveCell, , , xlWhole)
If Not obj Is Nothing Then
col = obj.Column
Li = 4 + a + 1
ActiveCell.Value = Range("I" & a + 2).Value
End If
Next a
End Sub
Je n'arrive pas, une fois la date trouvée, à aller chercher la valeur que je veux et la coller dans la cellule sélectionner
Pouvez-vous m'aider svp?
Voici le code:
Sub Planning_auto()
' Définition des variables
Dim a As Integer
Dim m As String
Dim obj As Object
Dim col As Long
Dim Li As Long
' Valeur maxi de mes variables lors des boucles
m = Sheets("Tableau de Synthèse").Range("B1").Value
For a = 1 To m
Sheets("Tableau de Synthèse").Range("K" & a + 2).Select
Set obj = Rows(4).Find(ActiveCell, , , xlWhole)
If Not obj Is Nothing Then
col = obj.Column
Li = 4 + a + 1
ActiveCell.Value = Range("I" & a + 2).Value
End If
Next a
End Sub
Je n'arrive pas, une fois la date trouvée, à aller chercher la valeur que je veux et la coller dans la cellule sélectionner
Pouvez-vous m'aider svp?
1. La variable Li est affectée et non utilisée.
Li = 4 + a + 1
2. idem pour la variable col
col = obj.Column
3. Difficile d'en dire plus sans voir le fichier
Peux tu envoyer la partie concernée de ton fichier, sur cjoint.com et joindre le lien obtenu à ton prochain message. N'oublies pas d'y ajouter des explications et des exemples de résultat attendu
Cdlmnt
Li = 4 + a + 1
2. idem pour la variable col
col = obj.Column
3. Difficile d'en dire plus sans voir le fichier
Peux tu envoyer la partie concernée de ton fichier, sur cjoint.com et joindre le lien obtenu à ton prochain message. N'oublies pas d'y ajouter des explications et des exemples de résultat attendu
Cdlmnt
