selection cellule avec autofilter

Bonjour
J'essaie d'utiliser le filtre automatique d'excel avec vba.
Je sais choisir un critere, mais je n'arrive pas a faire en sorte d'écrire et de sélectionner les bonnes cellules dans vba:

Code:

---

1 2 3 4 5 6 7 8 9

Range("A3:K3").Select Selection.AutoFilter Selection.AutoFilter Field:=11, Criteria1:="#VALUE!" For i = 4 To 100 If Range("A" & i).Value <> "Maturity" Then Range("K" & i).Formula = "=MonTH(A" & i & ")" Else: Range("K" & i).Formula = 1 End If

---

en fait je voudrais pouvoir selectionner la premiere cellule repondant au criterer "value!" écrire une formule et l'étendre sur toutes les cellules ayant "#value!"
Mais comment faire pour selectionner cette premiere cellule?
merci d avance

Bonjour,

Perso je ne vois pas l'intérêt de passer par un filtre à moins d'avoir un tableau de 35.000 lignes

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

Sub Macro5() Dim i As Integer   For i = 4 To Cells(Rows.Count, 11).End(xlUp).Row If Cells(i, 11).Text = "#VALUE!" Then If Cells(i, 1) <> "Maturity" Then Cells(i, 11).formule = "=MonTH(A" & i & ")" Else Cells(i, 11) = 1 End If End If Next i   End Sub

---

ben justement...c est un tableau a 20000 lignes lol

aah ok :mouarf: alors je comprend mieux l'intérêt, je voyais ta boucle de 4 à 100, pour ça que je pensais à un petit tableau

Une petite adaptation de :

Code:

---

1 2 3 4

For Each c In Range("A1").CurrentRegion.SpecialCells(xlCellTypeVisible) ...traitement Next

---

?

(enfin peut-être une grosse adaptation... :mouarf:)

Une autre question que je me pose finalement, si c'est pour mettre, une fois pour toutes, une formule dans les cellules, pourquoi passer par une macro ?
Le temps d'écrire la macro pour un tableau, je pense que tu peux inscrire manuellement la formule et la tirer vers le bas dans 10 tableaux !