Résultats de la recherche

Bonjour merci beaucoup ca à l'air de fonctionner. je venais juste de trouver aussi cette formule Une colonne en A donnée et la colonne B pour le rang =RANG(A2;$A$2:$A$11;1)+NB.SI($A$2:A2;A2)-1 encore merci pour l'aide et bonne journée à tous.

Bonjour pour l'inventaire de fin d'année nous avons prévu de recompter toutes nos références qui sont dans le top10 des valeurs par magasin. Sauf que j'ai des valeurs identiques et lorsque je fais mon classement par rang elles ne sont pas prises en compte. CI joint un morceau de mon fichier je...

bonjour et merci de votre aide, je vais tester votre solution.

Bonjour à tous, pour savoir ou sont positionnés mes types de produits dans le magasin, j'ai fait une vue de dessus dans le userform et chaque emplacement est représenté par une textbox dans mon plan d'adressage j'attribue un emplacement et pour chaque référence j'ai un type de produit (jusqu'à...

merci. question mal posée mais réponse inappropriée aussi.

Bonjour, je voudrais savoir si il est possible d'ajouter dans le userform une image, mais ensuite pouvoir depuis cette image lancer une macro. Merci d'avance pour votre aide.

merci bcp

Bonjour ub Mail_small_Text_And_JPG_Range_Outlook() 'Ron de Bruin, 12-03-2022 'This macro use the function named : CopyRangeToJPG Dim OutApp As Object Dim OutMail As Object Dim strbody As String Dim MakeJPG As String With Application .EnableEvents = False...

Bonjour à tous, j'utilise la macro ci dessous pour envoyer des mails récapitulatif mais il me manque une information, que je souhaite ajouter dans le corps du mail. Soit insérer en tant que copie d'écran soit en tant que plage de données. pourriez vous m'indiquer la marche à suivre svp Sub...

Bonjour à toutes et à tous, j'utilise cette macro pour savoir si les camions partent en temps et en heure, le cariste cliquant sur un bouton pour signaler le départ du camion Option Explicit Public tps Sub majh() Sheets("Trucks Departure").Range("B8") = Format(Now, "hh:mm:ss") tps = Now +...

j'ai mis dans le module Declare Sub keybd_event Lib "User32" (ByVal bVk As Byte, _ ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long) Public Const VK_SNAPSHOT = 44 Public Const VK_LMENU = 164 Public Const KEYEVENTF_KEYUP = 2 Public Const KEYEVENTF_EXTENDEDKEY = 1 puis dans...

Bonjour non je n'ai que des messages d'erreur :)

Bonjour à toutes et à tous j'utilise une macro pour imprimer mon useform mais je n'arrive pas à l'imprimer au format paysage, j'ai essayé quelques petits trucs mais pas moyen. pourriez vous m'aider svp Sub impressionForm(usf) Dim x, tbl(), i, texte x = 0 With...

c'est la meme chose que mon premier message ou presque non ?

oui c'est ce que j'ai du coup j'ai une erreur

bonjour ca me donne ca les mots les uns à la suite des autres

Bonjour je souhaite savoir comment modifier ce code pour avoir une mise en page plus sympa car pour le moment c'est basique. savoir comment mettre en couleur et gras et mon top10 en bas peut etre sous forme de tableau ? merci et bonne fin de journée Sub EnvoiMail() Dim MonOutlook As Object...

UN GRAND MERCI !!! nickel je ne sais pas si c'est la meilleure façon mais j'ai mis : Dim destc As String dest = ThisWorkbook.Sheets("Data").Range("J18").Value destc = ThisWorkbook.Sheets("Data").Range("J27").Value With myItem .To = dest .CC = destc

ok nickel. dernière petite question du jour, pour répondre à mon chef si je mets les adresses mail des destinataires dans l'onglet "Data" comment je peux modifier la macro pour qu'elle vienne chercher les adresses mail ? j'ai concatené toutes les adresses mails dans une seule case separée par...