Résultats de la recherche

  1. D

    Fond textbox si date du jour

    Derniére question svp concernant cette mise en page :) Il y à moyen d'avoir les textbox juste à côté également colorisé de la même façon ? Il détecte le jour "j" = rouge Et donc il met en rouge les Textbox de la même ligne ?
  2. D

    Fond textbox si date du jour

    En rajoutant à la ligne le format on es ok ;) Else Controls("TextBox" & I).BackColor = RGB(255, 128, 128) Controls("TextBox" & I).Value = Format(d, "dddd dd-mm-yy")
  3. D

    Fond textbox si date du jour

  4. D

    Fond textbox si date du jour

    Bonjour, Je comprend pourquoi Forecolor ne fonctionne pas c'est parceque dans la Textbox de la date du jour il y as aucun texte... Il colorise la textbox du jours sa ok mais aucune date n'est marqué dedans 'Boucle de textbox1 à 31 pour afficher les dates du mois madate =...
  5. D

    Fond textbox si date du jour

    Oups désolé pas facile du tout "Controls("TextBox" & i).ForeColor = RGB(0, 0, 0)" Ne fonctionne pas Option explicit c'est quoi ? Une aide pour trouver les "codes" ?
  6. D

    Fond textbox si date du jour

    AH oui lol merci à toi c'est top :) Bete question , c'est quoi la modif du code pour changer la couleur du texte ? (pas le fond)
  7. D

    Fond textbox si date du jour

    Bonsoir, merci à toi J'ai toutes mes textbox de 1 à 31 qui reste vide aucune date s'affiche Par contre une des textbox est bien noir (du coup il détecte bien la "date du jours" Mais aucune date aucun texte dans les textbox
  8. D

    Fond textbox si date du jour

    Bonjour, J'ai un code vba qui m'affiche les date du jours du mois en cours Partant de la Textbox 1 à la Textbox 31 Mais j'aimerais que la date du jours réel soit elle avec le fond de la Textbox en rouge. J'ai essayer plusieurs choses mais rien ne fonctionne :/ Merci à vous Voici le code...
  9. D

    XL 2019 Aide sur une recherche listbox

    Oufff un GRAND merci Franchement non j'ai rien compris au code et encore moins à ta réponse mais elle fonctionne :D
  10. D

    XL 2019 Aide sur une recherche listbox

    Bonjour, J'ai un code en vba (usf) qui m'affiche des données de mes factures clients. Dans la feuille excel "facture" en : colonne 1 = n° facture colonne 2 = nom colonne 3 = prénom ect.. Pour le moment la recherche grâce à la barre fonctionne mais uniquement si je recherche un numéro de...
  11. D

    XL 2016 Plusieurs recherche sur une listbox

    Pour supprimer des labels et leurs Textboxs si j'en ai besoin que de 6 par exemple je fait comment ? Je vient d'essayer de bêtement effacer et forcément sa bug... :/
  12. D

    XL 2016 Plusieurs recherche sur une listbox

    Bon j'ai fait le plus simple donc copier coller les deux feuilles excels dans mon classeur et copier coller la présentation + codage sur un nouvel USF dans mon fichier quelques adaptations et ok je valide sa fonctionne ;) reste à modifier l'ensemble à ma guise pour que le tout me convienne ^^...
  13. D

    XL 2016 Plusieurs recherche sur une listbox

    Je vais essayer cela :) Ensuite si je réussis à faire cela, sa sera toujours possible que je cherche pour compléter mon USF pour avoir un bouton pour rajouter des articles ? ou le fait que sa soit en tableau bloque tout ajouts ? En gros idéalement mon USF doit pouvoir me montrer tous mes...
  14. D

    XL 2016 Plusieurs recherche sur une listbox

    Sa peut être pas mal :) Sur cette ligne je modifie avec quoi ? NomTableau = "tableau1" ' adapter Ma feuille de donnée est sur la page : Articles et commence de A2 à F2 à ... x fois le nombre d'articles
  15. D

    XL 2016 Plusieurs recherche sur une listbox

    Bonjour, J'ai actuellement une Listbox qui m'affiche des informations d'articles liée à Textbox1 (pour la recherche de base) pour rechercher uniquement par l'intitulé de l'article. Private Sub TextBox1_Change() Dim DerLigne&, Ligne& ListBox1.Clear With Worksheets("Tarification")...
  16. D

    XL 2019 Listbox affiche infos cellule selon condition

    Bonjour, Pour le moment j'ai une listbox qui m'affiche des infos venant de ma base de donnée : If Me.OptionButton3.Value = True Then 'Si bouton = Facture ListBox1.Clear With Worksheets("Facture") DerLigne = .Cells(Rows.Count, 2).End(xlUp).Row For Ligne = DerLigne To 3 Step -1...
  17. D

    XL 2019 Copier contrôle TAG (USF vers Feuille) selon condition

    Merci à toi en effet je pense que sa doit fonctionner mais... Vus que de toute façon une fois qu'on est en dessous de la condition : If CTRL.Tag = "CQ" And Me.ComboBox13.Value = "Acompte" Then O.Cells(PLV, CTRL.Tag).Value = CTRL.Value il fait ensuite : Else...
  18. D

    XL 2019 Copier contrôle TAG (USF vers Feuille) selon condition

    Salut, merci à toi :) Next CTRL 'prochaine contrôle de la boucle Next sans For qu'il m'affiche
  19. D

    XL 2019 Copier contrôle TAG (USF vers Feuille) selon condition

    Bonjour à tous, Vous m'avez beaucoup aidé sur mon programme de facturation à l'époque. J'aimerais modifier le code qui me sert d'enregistrer mes facture / devis (selon contrôle TAG) -> il enregistre dans des feuilles séparer selon si facture ou devis ... Maintenant, j'aimerais rajouter une...
  20. D

    Problème de date inverser VBA USF

    En même temps un programme de compta pour indépendant on se doute bien que si j'ai pas le temps de rentrée une facture ajd je doit donc la faire demain mais à la date d ajd !!!! Fin tout le monde nas pas la même logique