Contenu récent par Dome

Bonjour autre problème, Row = 10 mais j'ai 18 colonnes, et donc erreur 380 merci de me donner une solution Option Explicit Dim i As Long Dim x As Long Dim p As Long Dim a As Integer Dim NL As Integer Dim NbL As Integer Private Sub TextBoxRech_Change() Me.TextBoxRech =...

Bonjour je me permet de vous envoyer mon fichier, merci

bonjour, j'ai 51 et novice dans Excel, mais je suis currieux d'apprendre,

bonjour je suistotalement novice et sur un tableau VBA j'ai une erreur 13 sur : Private Sub TextBoxRech_Change() If Me.TextBoxRech <> "" Then mots = Split(Trim(Me.TextBoxRech), " ") Tbl = choix For i = LBound(mots) To UBound(mots) Tbl = Filter(Tbl, mots(i), True...