Version imprimable
Citation: Envoyé par boisgontierjacques [...] Code: 1234 Function FiltreArrayColonnes(Tbl, ColResult) FiltreArrayColonnes = Application.Index(Tbl, Evaluate("Row(1:" & UBound(Tbl) & ")"), ColResult) End Function :king:
1234 Function FiltreArrayColonnes(Tbl, ColResult) FiltreArrayColonnes = Application.Index(Tbl, Evaluate("Row(1:" & UBound(Tbl) & ")"), ColResult) End Function
Function FiltreArrayColonnes(Tbl, ColResult) FiltreArrayColonnes = Application.Index(Tbl, Evaluate("Row(1:" & UBound(Tbl) & ")"), ColResult) End Function