Contenu récent par C60a

Bonjour à tous, J'aimerais récupéré des données dans un Userform depuis un classeur fermé Q2.xlsx ensuite faire une mise à jour pour ces mêmes données. J'ai utilisé les objets ADODB pour le faire, mais voila j'ai une erreur quant à la mise à jour dans le classeur fermé. Merci d'avance.

Bonsoir Youki, Merci infiniment pour le dernier fichier. @+

Bonjour, J'ai essayé, mais ça n'a pas fonctionner ! Tu veux pour le filtre ou pour le format de la colonne E ? Parce que chez sa continu de ne pas fonctionner ! Voila un nouvel exemple avec une seule de ligne de données, ou la colonne E est formatée lors de sa conception. Mais une fois...

Bonjour youki, Non ! La même question que je me pose ! La colonne E est bien sous format date. J'ai remets le code de formatage de la colonne E dans WorkBook_Open() pour éviter le problème .... Pourtant le format est bein sur en date ?

Parfois ça fonctionne sans problème, mais parfois je suis obligé de formater la colonne E avec la macro Mydate pour pouvoir obtenir des résultats. N'y aura-t-il pas un moyen de faire cela d'une façon automatique sans avoir recours à lancer le code manuellement à chaque fois que les choses...

Bonsoir, Voila une solution provisoire, ou à chaque fois que le TextBox5 qui servira pour la saisie de la date à le focus, la colonne E sera formatée en date ! Private Sub TextBox5_GotFocus() Columns("E:E").NumberFormat = "dd/mm/yyyy" For lig = 5 To [E65000].End(3).Row...

Bonjour youki, Pour le moment, juste un truc que je ne peux l'expliqué : Quand je tape une date directement dans le TextBox5 (Colonne E) sans passer par les autres TextBox, le filtre appliqué ne retourne rien, pourtant la date saisie s'y trouve bien dans le tableau des données !? Je continu...

Bonsoir youky, Maintenant la recherche par date fonctionne bien. J’essaye avec le format de la colonne C.

Les données en colonne E sont bien en format date. j'ai essayé ce test pour obtenir un résultat, mais ça n'a pas encore fonctionner : Private Sub TextBox5_Change() If TextBox5 = "" Then ActiveSheet.Range("$A$4:$G$4").AutoFilter Field:=5: Exit Sub On Error Resume Next If...

Re, J'ai testé avec ces valeurs : 1 - aa - 1233 - aaa - 27/11/2016 Mais pour la date ça na pas fonctionner ? Pourtant il y a bien la date 27/11/2016 en colonne E !

Bonsoir youky, Merci d'avoir répondu à mon sujet. Ne peut-on pas rechercher avec un format numérique ou format date ?

Bonjour à tous, J'aimerais dans la ligne A2:G2 saisir des mots qui déclenchent successivement un filtrage automatique sur chaque colonne en cours, Si je saisie en A2, un filtre automatique est appliqué en colonne A selon les lettres saisie en A2. Si je saisie en B2, un filtre est appliqué...

Bonjour JCGL, D'ou je peux faire ce choix ?

Re, Je ne peux savoir quel fichier m'a fait implanter cette erreur ?

Bonjour Calvus, JCGL Cet avertissement avait été activé après avoir ouvert quelques fichiers Excel du net. Et depuis il ne s’arrête de surgir .... L'option est déjà décochée :