Re : cherche fil - stat donnees sur n tableau!
Bonsir Chti, le forum
j`espere que tu vas bien.
Je reviens avec du retard encore car le code est costaud pour moi
Alors j`ai pas mal regarde le code et sans surprises j`ai des questions car je ne comprends pas tout :
Peux tu m`expliquee le T(4, Lgn) que tu utilises et le str = 12345 ?
TabRecap(2, x) = T(4, Lgn)
TabRecap(3, x) = T(5, Lgn)
If Str = 12345 Then MsgBox T(5, Lgn)
2/ pourquoi tu reitinialises la variable?
Je vois pas a quoi sert la function TestFiltre(ByVal W As String) As Variant
Peux tu m`expliquer la logique de passer par un filtre ?
Set Rng = Nothing 'on réinitialise la variable
On Error Resume Next
With Wks.AutoFilter.Range
Set Rng = .Offset(1, 0).Resize(.Rows.Count - 1, 1) _
.SpecialCells(xlCellTypeVisible)
3/ Var_Compte_Found = False 'on ne sait pas si deja dans la base#
Tu testes si le compte existe ds la base. Correct ?
Merci pour les explications que tu as mises ds ton code.
J`ai pas tout compris encore mais ca marche bien.
Merci encore pour toute ton aide.
Bonne soiree a toi et au forum
VBA_DEAD