comment Remplir un Tableau à Partir d'un champ de saisie " PILOTE ' Le sujet est résolu

Y compris Power BI, Power Query et toute autre question en lien avec Excel
A
Andre13
Membre impliqué
Membre impliqué
Messages : 1'420
Appréciations reçues : 88
Inscrit le : 13 juillet 2017
Version d'Excel : 2007-2013

Message par Andre13 » 30 avril 2018, 17:09

Re,
Super bravo à toi :wink:


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 :oops:
'----------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é
e
eleganceblack
Jeune membre
Jeune membre
Messages : 24
Inscrit le : 20 mai 2016
Version d'Excel : Mac 2016 Fr

Message par eleganceblack » 30 avril 2018, 18:21

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

Amicalment Marco :)
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message