Accès rapide a une ligne ou une zone

[doice]

Bonjour

Je commence a travailler sur un tableau de suivi des temps sur différents poste
je souhaite visualiser rapidement ou accéder rapidement à une date rentrée dans
une cellule donnée (ici en D1)

Pourriez-vous me donner une piste ?

Vous en remerciant par avance

Bonne journée

 

[BOISGONTIER]

Re : Accès rapide a une ligne ou une zone

Bonjour,

=LIEN_HYPERTEXTE("#feuil1!" &ADRESSE(EQUIV(D1;A1:A1000;0);1);"Go")

Les liens hyper-textes

En VBA:

Private Sub Worksheet_Change(ByVal Target As Range)
 If Target.Address = "$D$1" Then
   p = Application.Match(CDbl([D1]), [a:a], 0)
   If Not IsError(p) Then [a1].Offset(p - 1).Select
 End If
End Sub

ou

Private Sub ComboBox1_Click()
   p = Application.Match(CDbl(CDate(Me.ComboBox1)), [a:a], 0)
   If Not IsError(p) Then [a1].Offset(p - 1).Select
End Sub

Private Sub ComboBox1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
  For Each c In [A1:A1000]
    If c <> "" Then Me.ComboBox1.AddItem c
  Next
End Sub

JB

 

[Efgé]

Re : Accès rapide a une ligne ou une zone

Bonjour doice, Bonjour BOISGONTIER,
Trop tard et pas la même chose... mais comme je l'ai fait, je le poste
Cordialement

 

[doice]

Re : Accès rapide a une ligne ou une zone

Je vous remercie de votre rapidité, il ne me reste plus qu'à l'intégrer a mon fichier

GRAND MERCI a tous deux