Comment Remplir un Tableau à Partir d'un champ de saisie PILOTE

Re,

Super bravo à toi

Note : si un jour tu essaies de mettre un filtre élaboré ou automatique aux en-têtes des colonnes le code ne servira pas et ne s’exécutera plus un aperçu que j'ai vu sur le net ci-dessous à modifier Cells(1, 1).row par le numezro de ligne, mais là je suis encore novice

'----------merci à JB-------------------------
Dim A As Long
With Range("_FilterDataBase")
A = .Cells(1, 1).Row
On Error Resume Next
With .SpecialCells(xlCellTypeVisible)
For Each r In .Rows
If r.Row <> A Then
r.Cells(1, 1).Select
exit for
End If
Next
End With
End With

crdlt,

André

Trés Bien c'est noté Merci beaucoup André et bonne semaine a toi

Amicalment Marco

Rechercher des sujets similaires à "comment remplir tableau partir champ saisie pilote"