Contenu récent par MASSJIPE

  1. MASSJIPE

    XL 2016 formule

    Bonjour à tous je n'ai plus fait d'Excel depuis plus 1 an et je suis rouillé je joint une image car fichier trop lourd j'ai mis des formules mais j'ai un doute sur cette question =>Nombre de clients ayant commandés cette année Merci
  2. MASSJIPE

    Microsoft 365 Problème formule

    Bonjour le forum j'ai un soucis avec le résultat de la formule Si un seul Mauvais sur les 3 mesures alors résultat mauvais affiche 1 sinon 0 =SI(OU(N24<18;N25<18;N26<18;N24>40;N25>40;N26>40);0;1) Merci
  3. MASSJIPE

    Microsoft 365 Modification code vba

    re aucune idée je ne connais pas le VBA
  4. MASSJIPE

    Microsoft 365 Modification code vba

    Bonour erreur 1004 avec cette ligne .Range("A" & compteur).Resize(1, 8) = cell.Offset(0, -7).Resize(1, 8).Value
  5. MASSJIPE

    Microsoft 365 Modification code vba

    Bonjour c'est vrai c'est le calcul qui ne vas pas pour les colonnes G H I je pense que c'est dans cette partie du code .Range("A" & compteur).Resize(1, 8) = cell.Offset(0, -7).Resize(1, 8).Value .Range("I" & compteur) = .Range("G" & compteur) * .Range("H" & compteur)...
  6. MASSJIPE

    Microsoft 365 Modification code vba

    Bonjour le Forum Besoin d'aide pour modifier le code vba suite à des ajouts de colonne supplémentaire j'ai fait des essais mais ca ne marche pas Sub Panier() Dim plageProd As Range Dim compteur As Integer Sheets("Bon de commande").Select Range("A9:E34").Select...
  7. MASSJIPE

    Microsoft 365 transfert email

    Pour moi c'est du chinois je comprend rien j'ai inclu t'on code dans le mien et c'est ca qui m'intéresse Sub mail() ' Nécessite la référence : Microsoft Outlook 1x Object Library Dim olApp As Outlook.Application Dim olMail As MailItem Dim CurFile As String Set olApp = New Outlook.Application...
  8. MASSJIPE

    Microsoft 365 transfert email

    Moi j'ai ceci
  9. MASSJIPE

    Microsoft 365 transfert email

    Bonjour Voila ce que j'ai en message Mais en relisant pour premier message j'ai fait une erreure de frappe c'est renvoi et pas revoit (Ma question je voudrais que quand le destinataire reçoit le mail celui clic soit sur un lien nommé (transfert pour accord) dans le corps du message qui renvoit...
  10. MASSJIPE

    Microsoft 365 transfert email

    Bonjour J'ai un soucis sur la ligne en rouge sur mailto: Sub mail() ' Nécessite la référence : Microsoft Outlook 1x Object Library Dim olApp As Outlook.Application Dim olMail As MailItem Dim CurFile As String Set olApp = New Outlook.Application Set olMail = olApp.CreateItem(olMailItem) CurFile...
  11. MASSJIPE

    Microsoft 365 transfert email

    Bonjour voici le code comment l'intégrer Sub mail() ' Nécessite la référence : Microsoft Outlook 1x Object Library Dim olApp As Outlook.Application Dim olMail As MailItem Dim CurFile As String Set olApp = New Outlook.Application Set olMail = olApp.CreateItem(olMailItem) CurFile =...
  12. MASSJIPE

    Microsoft 365 transfert email

    Bonjour le forum Est-il possible de faire ceci. J’ai un fichier Excel (bon de commande) je clic sur un bouton qui envoi le fichier à un destinataire. Ma question je voudrais que quand le destinataire reçoit le mail celui clic soit sur un lien nommé (transfert pour accord) dans le corps du...
  13. MASSJIPE

    erreur 9

    Re Merci à tous la fonction value au lieu de text fonctionne
  14. MASSJIPE

    erreur 9

    Bonjour à tous J'ai une erreur 9 à ligne If CInt(sh.Cells(i, 24).Text) <= CInt(sh.Cells(i, 25).Text) Then ''''''Si le vieillissement est inférieur au délai de traitement initial D'avance merci Option Explicit Private Sub Workbook_Open() Dim sh As Worksheet Dim i As Long, DLign As Long...
  15. MASSJIPE

    XL 2016 avant dernière valeur d'une ligne dans un autre onglet

    Bonjour Merci Bon we