Contenu récent par dam3117

Bonjour, Je souhaite remplir un tableau à partie d'un userform. il faudrait qu'il me mettre la quantité dans la bonne colonne correspondant à la date au bon numéro et la bonne zone. merci dam3117

Re : gestion de stock bonjour, merci effectivement ce n'est pas clair du tout pour moi.

Bonjour, Je suis création de fichier de gestion de stock entrée sortie inventaire. et je voudrais pour l'inventaire que d'un userform que je suis puisse imprimer qu'il me fasse le total par acticle. merci dam

Re : Gestion des erreurs re, merci moi j'ai mis Workbooks.Open Filename:=nomf... pour l'ouvrir, l'imprimer et la refermer, mais par moment il ne peut pas l'ouvrir car elle n'existe pas. Donc moi au départ c'etait: je tente d'ouvrir nomfii si ok tu l'imprimes, tu la refermes et tu...

Re : Gestion des erreurs Re roland, Pour faire simple: j'ai une feuille d’agréage (ou se trouve la macro) "ActiveWorkbook.FullName" à partir de cette derniere je crée ou pas une feuille une feuille nomfii ou et une feuille nomfbb que je transmets par mail et je veux imprimer ma ou mes pièces...

Re : Gestion des erreurs Re roland, Pour faire simple: j'ai une feuille d’agréage (ou se trouve la macro) "ActiveWorkbook.FullName" à partir de cette derniere je crée ou pas une feuille une feuille nomfii ou et une feuille nomfbb que je transmets par mail et je veux imprimer ma ou mes pièces...

Re : Gestion des erreurs bonjour Roland, oui je confirme par moment le chemin n'hesite pas et je voudrai gerer l'erreur pour continuer la procédure.

Sub SendMail_Outlook() ActiveSheet.Protect Password:="DAM", DrawingObjects:=True, Contents:=True, Scenarios:= _ False, AllowFormattingCells:=True, AllowFormattingColumns:=True, _ AllowFormattingRows:=True, AllowInsertingColumns:=True, AllowInsertingRows _ :=True...

Re : Charger listbox sans doublon Bonjour, Merci pour l'exemple mais je dois avoir plusieurs colonnes dans ma listbox. dam3117

Bonjour le forum, je charge ma listbox avec cette macro mais je n'arrive pas la charger sans doublons. auriez vous une solution Sub listingdepuisle() Dim TheDate As Date ' Déclare les variables. Dim Msg Dim c As Long Windows("RECAP.xls").Activate ActiveSheet.Protect...

Re : imprimer pièces jointe Bonjour à tous, Voila lorsque j'ai au moins deux pièces jointe elle fonctionne nickel. Mais avec une seule PJ ça bug à ce niveau Workbooks.Open Filename:= _ nomfbb erreur d'execution 1004 chemin introuvable... Normal le fichier n’existe pas...

Re : imprimer pièces jointe Bonjour, Ma macro marche nickel jusqu’à ActiveWindow.SelectedSheets.PrintOut copies:=2, Collate:=True cdt Dam

Bonjour le forum, Sub SendMail_Outlook() ActiveWorkbook.Save ActiveWorkbook.Activate Dim Ol As New Outlook.Application Dim Olmail As MailItem Dim CurrFile As String Dim adr, body, bodyvierge As String Dim nomfi, nomfii As String Dim nomfb, nomfbb As String...

Bonjour, Je cherche une méthode pour mettre en pièces jointes deux fichiers actifs; ou une méthode pour mettre plusieurs pièces jointes. merci @+

Re : charger un combobox à partir d'un label Bonjour Dudule? impec merci dam @+