Cherche formule sur excel

Re,

Merci beaucoup pour ce lien, j'ai trouver le code qu'il faut pour windows live hotmail mais je ne m'y connais pas du tout et je ne sais pas trop comment le placer et comment faire pour le mettre en place.

Merci de votre réponse

Private Sub cmdCopier_Click()
If txtFeuilChoisi.Text <> "" Then
Call CopierFeuilleExcel(getTemp & "test.xls")

Else
MsgBox ("Veuillez choisir la feuille a copier")
End If
If ((getTemp & "test.xls") = ActiveWorkbook.FullName) Then
cmdCopier.Enabled = False
cmdEnvoyer.Enabled = True
Else
cmdCopier.Enabled = True
End If
End Sub

'Private classeurDeBase As Excel.Workbook
Private Sub cmdEnvoyer_Click()
ActiveWorkbook.SendMail Recipients:="diopbirama@gmail.com", _
Subject:="Test envoi classeur", _
ReturnReceipt:=True
' URLto = "mailto:diopbirama@gmail.com" & "?subject=test d'envoi de fichier" & "&body=" & Msg
' ActiveWorkbook.FollowHyperlink Address:=URLto
End Sub

Private Sub cmdExit_Click()
Unload Me
End Sub

Private Sub combFeuilleSource_Change()
txtFeuilChoisi.Text = combFeuilleSource.Text
End Sub

'c'est ici que je récupere la liste des feuilles
'du classeur actif (Activeworkbooks)
Private Sub UserForm_Activate()
Dim feuil As Object
For Each feuil In ActiveWorkbook.Sheets
combFeuilleSource.AddItem (feuil.Name)
Next feuil
'classeurDeBase = ActiveWorkbook
If ((getTemp & "test.xls") = ActiveWorkbook.FullName) Then
cmdCopier.Enabled = False
cmdEnvoyer.Enabled = True
Else
cmdCopier.Enabled = True
End If

End Sub

'cette procedure permet de copier la feuille choisie
'vers le classeur cible du dossier Temp
Private Sub CopierFeuilleExcel(ClasseurCible As String)
Sheets(txtFeuilChoisi.Text).Copy
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs (ClasseurCible)
Application.DisplayAlerts = True
End Sub

'cette fonction permet de récuper le répertoire
'temporaire de windows
Function getTemp() As String
Dim chemin As Object
Dim DossierTemp As String
Set chemin = CreateObject("Scripting.FileSystemObject")
DossierTemp = chemin.GetSpecialFolder(TemporaryFolder).ShortPath
getTemp = DossierTemp & "\Temp\"
End Function

Bonjour,
Merci de votre information.
Je n'ai pas la possibilité de tester un code en relation avec [Windows Live Hotmail].
Le lien ci après devrait vous apportez la solution :
https://codes-sources.commentcamarche.net/
Désolé de ne pouvoir en faire plus.

Bonjour mike,

En fait le client remplis le bon de commande et l'envois. Ensuite moi je le reçoit je vérifie la commande et lui envois ensuite la facture avec le lien de paiement. Tout simplement.

Le clic ne marche pas, J'ai mis l'adresse nm-sportswear@live.fr à l'emplacement que tu m'as dis, j'enregistre, j'ouvre le fichier je remplis comme le client et quand je clic sur envoi bond e commande, il y a rien qui se passe.

j'aimerais rajouter une petite option, quand le client envois le bon de commande j'aimerais qu'il reçoive aussi un exemplaire sur son adresse mail, si c'est possible.

Merci de ta réponse

Re,

Récupère ton fichier, fais un clic droit sur l'onglet de feuille
Commande avec TVA
Clic sur Visualiser le code, dans la feuille tu verras un bout de code VBA et tu remarqueras cette ligne. entre les guillemets remplace les xxx par une adresse mail
Dest = "xxx.xxxxxx@xxxx.xx"

ensuite reviens sur la feuille, soit en sélectionnant le fichier dans la barre des tâches, soit en cliquant sur l'icône Excel sur la barre des menus en haut à droite.
Enregistre le fichier et teste l'envoi en un clic sur le bouton.

Tiens moi au courant.
Explique moi ton fonctionnement, si je comprends bien un client achète ou commande de la marchandise, tu fais un bon, jusque là pas de problème mais après ce bon est imprimé pour être archivé, puis envoyé au siège pour information !

https://www.cjoint.com/?0bCvaij6Bzm

Re,

T'embête pas mike, c'est parfait comme ça ;)

Je vais me débrouiller avec ce que j'ai là ça ira trés bien.

Je voulais savoir si tu connaissais un Tutorial pour le VBA car je persiste avec mon code du bouton envoyer. Ou si tu pense pouvoir m'expliquer en quelque mot ça serait super !

Merci

Re,

Effectivement si dans chaque catégorie tu as des sous catégories comme pour Nike ça complique les choses, c'est possible mais avec du VBA et là c'est une autre histoire il faut avoir bien connaitre Excel et avoir quelques connaissances en VBA ce que je doute.

je vais réfléchir voir si je peux t'adapter un code simple sinon reste sur le fichier joint sur lequel j'ai allongé les listes de saisie jusqu'à la ligne 500 ce qui offre pas mal de possibilités. A ce sujet pour permettre un ordre croissant de la liste déroulante Feuille Commande avec TVA colonne A j'ai placé un filtre sur la feuille Listing.
Sur cette feuille pour saisir des données il est nécessaire de déprotéger la feuille, une fois les saisies terminées tu remarqueras sur la ligne 2 des boutons avec une flèche vers le bas, clic sur celui en A2 et sélectionne Tri croissant, les colonnes A, B, C, et D seront automatiquement classé chronologiquement. Ne pas oublier de reprotéger la feuille et éventuellement avec mot de passe ou la masquer afin d'éviter qu'une personne mette le chiisme.

https://www.cjoint.com/?0byvm5np5cP

Re,

j'ai pas trés bien compris, Si par exemple je veux rajouter une paire de chaussure je fais cette manipulation, cela me donne un menu déroulant mais aprés quand je veux selectionner la taille ça ne veut rien m'afficher donc je sais pas si j'ai fais la bonne manip.

Je nomme la plage (chaussure 2), ensuite validation des données, liste / Source : Chaussure 2 ?

Et ensuite je touche à rien dans source de la case taille non ?
Merci

Re,

Pour ajouter des lignes dans la feuille Listing, il faut commencer par la déprotéger (Onglet Révision/Oter la protection de la feuille)
pour la sécurité des données la reprotéger après (Onglet Révision/Protéger)

ensuite pour créer une liste déroulante, saisir les données en colonne (mettre en surbrillance la plage concernée/saisir le nom dans la barre d'adresse, zone juste au dessus de l'entête de colonne A et confirmer avec la toche Entrée)
Une fois la plage nommée, activer la cellule ou l'on souhaite avoir la liste de validation (onglet Données/validation des données dans Autoriser sélectionner Liste et dans Source =Nom de la plage nommée)

C'est un peu plus compliqué pour activer la liste par rapport à une saisie, il faut nommer la plage en fonction d'un l'affichage exemple pour Chaussure, j'ai nommé la plage Chaussure et dans la colonne taille lorsque j'ai créé la liste de validation, dans source j'ai saisie =INDIRECT(A29) de sorte que si en A29 je sélectionne Chaussure c'est la plage nommée Chaussure qui s'affichera pour sélectionner la taille dans le cas ou en A je sélectionnerai Casquette, c'est la liste nommée Casquette qui s'affichera
-
A+
Mike-31

Une période d'échec est un moment rêvé pour semer les graines du savoir.

Re,

Ce code utilise Outlook, mais traitons un problème à la fois, regarde si les tailles avec liste déroulante te conviennent

https://www.cjoint.com/?0bxqlDwSEfs

Ou si tu préfères l'ancien avec saisie des tailles manuellement

https://www.cjoint.com/?0bxqmGHDqza

Re,

J'ai trouver ce code pour le bouton envoyer :

Sub envoyer(Message As String, Nom_Du_Fichier As String, Adresse As String)
Dim o As Outlook.Application
Set o = New Outlook.Application
Dim Mail As Outlook.MailItem
Set Mail = o.CreateItem(olMailItem)
With Mail
.Subject = "Subjet"
.To = Adresse
.HTMLBody = Message
.Attachments.Add Nom_Du_Fichier
'.Send
.Display
End With
o.ActiveWindow

Set Mail = Nothing
Set o = Nothing
End Sub

Le probleme c'est qu'une fois avoir mis le code dans macros je ne sais pas du tout ce qui faut faire, puis ce code est valide pour outlook et pas pour hotmail, comment je fait pour qu'il soit valide sur hotmail?

Re,

Merci pour toutes ces explications.
Je préfère celle-ci, c'est très propre ! j'aime beaucoup.

Par contre j'ai juste un petit probleme pour les taille

Par exemple si je prend une paire de chaussure la personne ne peut pas changer, il faudrait juste pouvoir choisir la taille.
ex: pour des chaussure : 40, 41,42,43..;
Pour des vêtement : M, L, XL,XXL...

Je pense qu'il faudrait faire des catégories : Vêtement, chaussure, accessoire...

Vêtement (couleur jaune): L,M,XL...
Chaussure (Couleur verte): 40,41,42
accessoires (couleur bleu) : 2,4,5

Ou je peut laisser choisir le client en laissant la case non protéger, ça sera plus simple peut être ;)

Sinon rien a dire, le fichier est impecable

Merci encore

Re,

Maintenant que je connais un peu mieux ton fichier, regarde cette proposition sur deux feuilles, dont la feuille listing peut être protégée ou masquée. Toutes les explications sont dans des zones te texte. Si tu préféres la première version je donnerai la marche à suivre pour modifier les tarifs

https://www.cjoint.com/?0bwoDe6okA6

Re,

C'est bon mike ;) la formule fonctionne.

maintenant il faut juste que tu m'explique comment changer les tarifs des frais de port au cas où je dois les changés ou modifier la disposition . Parce que la je n'arrive pas à afficher ou masquer les colonnes.

Puis pour le bouton envoyer j'utilise hotmail et j'aimerais l'envoyer sur nm-sportswear@live.fr (sur mon adresse en fait et non sur l'adresse du client). Je vais me renseigner un peu sur le vba.

Encore merci pour ce fichier

Re,

Je suis un peu bousculé, je n'ai pas eu le temps de tester la formule, regarde si elle te convient.

Pour envoyer un mail depuis un bouton c'est tout à fait possible mais la il faut avoir un minimum de connaissance en VBA, savoir quelle messagerie tu utilise Oulook, Outlook express, autre ...

le message que tu veux mettre ex. Veuillez trouver en pièce jointe votre facture etc ...

https://www.cjoint.com/?0bwlksxmgxs

Re,

Je serai absent pour l'après midi, je regarde la formule ce soir.

Insérer des bouton est tout à fait possible mais que veux tu faire avec un bouton envoyé

RE,

Tu crois que c'est possible d'insérer un bouton "envoyer" sur une feuille excel ?

ah et j'ai oublier un petit détail mais si tu peux pas le changer c'est pas bien grave.

Si tu peux enlever les frais de port gratuit pour l'international, en fait ça sera frais de port gratuit juste pour la france à partir de 5 articles.

Pour l'international ça sera payant même au dessus de 5 articles parce que sinon je suis perdant sur certains pays.

Si c'est pas possible laisse, c'est pas grave. Pour l'instant c'est juste le bouton "envoyer" qui serait bien pratique.

Merci

Re,

Bon c'est nikel, c'es ce que je voulais.

Par contre tu as fais comment pour bloquer et masquer les formules ?

J'ai fais ce que tu m'a dis et ça ne fonctionne pas

Comment je fais pour changer les valeurs pour les frais de port ?

Re,

Oui j'y arrive en fait c'est pas compliquer
Bon je te dis si c'est ok
Merci mike.

Re,

J'ai revu la formule et protégé la feuille pour éviter l'effacement accidentel des formules
Teste le fichier et on en reparle, arrives tu à afficher et masquer les colonnes

https://www.cjoint.com/?0bukHtcpOj5

A+
Mike-31

Une période d'échec est un moment rêvé pour semer les graines du savoir.

Re,

Les frais se calculent dès que tu saisis le pays de destination en D24,

si en D24 aucune saisie, il n'y a pas de frais ce qui correspond à un enlèvement sur place.

Si en D24 tu sélectionnes un pays les frais correspondants s'affichent jusqu'à concurrence de 5 références dans la colonne C et les frais passent en gratuit dès la 6éme référence.

Dès que les formules seront au point, on reverra le fichier et te donnerais les explications pour modifier les tarifs.

Sais tu Masquer et afficher les colonnes !