Résultats de la recherche

Bonsoir a tous; Voila svp comment faire un rabais de 5% 10% 20% 25% par tranche respective de 1000 € 1000 2000 3000 4000 en fonction de la somme d'une facture et ce rien q'avec des si Ci-joint petit fichier exemple MERCI a vous tous et bonne soirée

Re : masquer le bouton fermer Slt Kuhn On m'aide donc j'aide,je t'ai vite fait bien fait copié ce code qui marche chez moi. A toi de jouer a+ Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) If CloseMode = vbFormControlMenu Then MsgBox "Action impossible...

Re : Lien auto pour feuille BrunoM45 en + on est voisin moi c'est georgio91

Re : Lien auto pour feuille Merci à toi Bruno45 et aux autres kan même j'ai ouvert ton fichier et l'ai essayé à priori c'est parfait ,je n'est + qu'a le mettre en application Encore MERCI et à+ Bonne soirée

Bonjour a tous Je joins un fichier dans lequel aprés avoir executer BTN Enregistrer je copie uue feuille et la renomme automatiquement ,en même temp je copie dans la feuille RECAP des info dont le nom de la dite feuille "B5" et c'est là que au lieu de faire un lien manuel je le voudrais...

Re : Range("A5").Select Merci Pascal76 Ca marche , je ne comprends pas pourkoi car le code était bon mais bon . MERCI à tous et toutes et A +

Re : Re Range("B5").Select MERCI Pierrot93, mais si tu pouvais le mettre en application sur mon fichier et me le renvoyer je t'en serais grés car aprés l'avoir appliqué cela ne fonctionne pas Merci aussi à DIXIT

Re Re Re Range ("B5") SVP Je ne comprends + Rien ,pourquoi mon bouton enregistrer ne marche pas Merci à Pierrot93 mais je n'ai tj pas la solution

Re Range("B5").Select Bonjour à tout le monde Je joins un fichier car je n'arrive pas à faire fonctionner le bouton Enregistrer ,la macro bloque sur {Range("B5").Select} Je ne comprends pas pourtant c'est simple NON. MERCI a vous

Bonsoir le forum Pourquoi la commande { Range("A5").Select } m'affiche une erreur ( La methode select de la classe range a échoué) Je me remets à VBA mais cela commence mal Donc SVP à vot' bon coeur Merci

Tout d'abord salut et tous mes voeux de bonheur au forum lorsque j'enregistre un classeur XLS avec un code sur le VBA une boite m'informe q'uil est impossible d'enregistrer sans enlever la protection ,après confirmation XLS enregistre quand même mais cré un fichier sup identique avec un nom...

Salut le forum Merci John & Blunet je persiste avec ma liste triee ,je joint un fichier bidon avec 1 feuille avec donnees et 1 Bouton pour executer le code puis 1 feuille avec 1 listbox & 1 combobox si vous pouviez me valider vos solutions avec cet exemple cela me comblerai Merci à vous et a...

Salut à tous MERCI Creepy pour ta reponse d'Hier Comment remplir une listbox ou combobox dans userform avec une feuille trier Merci d'avance et @+

Merci Hugues mais je voudrais garder mon niveau de securite normal il y aurait il une autre solution ? A+

Resalut à tout le monde Comment eviter le message de validation de macro à l'ouverture Merci et à bientot

Salut à tous et à toute Comment eviter le mess. suivant ' impossible d'enregistrer sous ce format si projet VBA proteger Otez la protection.......................... ' Sachant que je veut garder la protection sur mon code VBA. MERCI d'avance .

Bonsoir tot le monde et Pascal76 Merci pour ta reponse et effectivement bon courage car si je progresse c'est à petit pas Bien on s'y recolle à bientot & encore MERCI

Bonsoir le forum bonsoir Creepy J'ai déja utilise le tutoriel mais mon fichier Zip pese 400 K je ne sais plus :sick: Re tentatve d'explication 1 Usform 'Cde' comprenant1 Calendar + 1Txtbox 'Date'+ 1 Txtbox 'Delai' + 1 Txtbox 'livraison' Date = Dclic calendar / Delai =Nbr jour /...

Rebonsoir tout le monde Dans un userform j'ai 1 Calendrier (CLD), / 1 txt Date valider par click CLD, / 1 txt Delai (Nbr de jour) , / 1 txt livraison (=txt date + txt delai) en format date , / 1 etiquette qui doit afficher semaine N° (selon resultat de txt livraison) cela marche a peu...

bonsoir tout le monde J'ai un souci avec ceci DO UNTIL activecell.offset(0,5).value=Trim(txt_article) activecell.offset(1,0).select LOOP et bien its ok avec du texte mais si c'est un nombre et que l'egalite est bien là cela ne fonctionne pas 'qu'il y aurait du format la dessous Humm ...