Discussion :

[Didpa]

Bonjour

Voilà, sous VBA, j'aimerais selectionner une case, qui ce trouve à l'intersection d'une colonne (Nom) et d'une Ligne (Date) tableau de recherche (Jours)
Voilà, ou j'en suis mais cela bug......quelqu'un voit-il mon erreur ???

Merci d'avance

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
'-------------------Rempli la Feuille Heure TTS-------------------------------------------
  J = CDec(Lab_Mois) & "/" & CDec(TB_Jour) & "/" & CDec(TB_Annee)
   NomPrenom = Lab_Nom.Caption
   Sheets("Heures TTS").Select
         With Sheets("Heures TTS")
            'Chercher la cellule au croisement du Nom dans la colonne A et de la date en la ligne 4
            Set c = .Range.ActiveCell.FormulaR1C1 = _
        "=INDEX(Jours,MATCH (NomPrenom) ,Nom,0),MATCH (J) ,Date,0))"
 
            'y mettre le nom
            c.Select
      End With

[ZimCri]

Bonjour,


Cela bug a quelle ligne?
Ce sera plus facile pour t'aider dans ton problème.