Résultats de la recherche

.Voila ce Code If .ListIndex = -1 Then Exit Sub [Tableau1].ListObject.ListRows(.ListIndex + 1).Delete End With

bonjour à tous ! j'ai un petit souci pour la suppression de ligne. Enfaite j'ai créé un filtre pour mon tableau et j'ai fait afficher les résultats du filtre dans ma Listbox à l'aide d'une variable du type Tableau maintenant quand je sélectionne une ligne dans ma Listbox pour supprimer j'ai...

D'accord, Effectivement c'est une date je le ferai merci

Bonjour Patrick ! Vraiment je ne sais pas comment vous remercier , j'ai mes entêtes qui s'affiche et le code qui fonctionne parfaitement , c'est ce que j'ai recherché à réaliser depuis là merci pour votre expertise

la fois passé vous m'avez proposé une autre méthode qui marche à défaut qu'il n'affiche pas aussi les entêtes du tableau donc c'est pour cela je essayer de modifier le code pour obtenir les entêtes mais je vais aussi tester cette méthode

Avec votre méthode là ça fonctionne sauf que l'entête du tableau disparaît en affichant seulement la barre des en-têtes

J'utilise aussi la version Excel 2016 mais lorsque je lance Userform 1, quand je clique sur ajouter puis sur valider le classeur se ferme se ferme par contre quand je lance le formulaire ajout et que je clique sur valider, il y a pas de blocage

Bonsoir ! Je besoin vraiment d'aide sur mon le message d'erreur ci:"la méthode Add de l'Objet Listrows à échoué " qui l'arrêt immédiat du classeur

Bonsoir à tous ! Je voulais désactiver le message d'alerte qui s'affiche lorsque je clique sur sauvegarde/Enregistrer.

Bonsoir Patrick ! J'ai encore un souci par rapport à votre méthode consternant les listboxes, je n'arrive pas à fusionner le bistbox_entete et listbox_adhesion, les deux listboxes sont séparés et chacun affiche un barre de défilement merci pour votre compréhension

Bonsoir ! tout à fait exact j'ai parcouru tout le code et je n'ai pas vu une seule modification et pourtant ça marche, enfaite je ne pas créer le code , je ne faisais seulement répéter ce qui existe déjà pour améliorer mon niveau mais j'apprécie votre expertise, merci de partager votre secret

bonsoir je n'arrive pas à croire ! Votre simplicité m'a bien permis de comprendre ce bout de code et me permettra même à l'avenir de simplifier mon code, j'avoue l'autre code là ne adapté à mon niveau, car je n'ai comprené rien en ça et je ne faisais que codé. vraiment je vous remercie pour...

Justement après tant de tentative j'ai constaté quand je voulais inserer une nouvelle ligne elle prend la valeur zéro, dont si vous pouvez vraiment m'aider à l'initialiser autrement

Bonsoir à tous ! Ça fait de semaine que je n'arrive pas à m'en sortir sur ce message d'erreur : La Méthode Value de l'objet Range à échoué.lors que je lance le formulaire pour ajouter un adhérent, le classeur se ferme directement et affiche le message ci-dessus

Private Sub UserForm_Initialize() Dim NbrLot As Byte, i As Byte, StrLot$ NbrLot = Range("NbrLots").Value 'On récupère le Nombre de Lots' For i = 1 To NbrLot 'on boucle sur le Nombre de Lots' StrLot = "Lot_" & Format(i, "00") 'on définit le Nom du Lot' Me.ComboBox1.AddItem StrLot 'On ajoute...

Bonjour ! Je suis depuis une semaine sur mon code par rapport au userform multipage, lors que le lance le userform multipage2 nommé Client le classeur se ferme et redémarre automatiquement

Voilà le fichier dont j'avais soumis hier qui n'a été bien téléchargé