Contenu récent par Max88400

  1. M

    [RESOLU] Attendre la fin du shellexecute

    Re : Attendre la fin du shellexecute Ça marche impec. Merci les gars
  2. M

    [RESOLU] Attendre la fin du shellexecute

    Re : Attendre la fin du shellexecute Merci à vous deux, la compilation des deux à l'air de fonctionner. Tototiti, les 2 modifs ont fonctionnées le print et le mon fichier MJ13 j'ai du ajouter un "on error resume next" car il bouclait et voulait me le fermer 2 fois (je sais pas pourquoi)...
  3. M

    [RESOLU] Attendre la fin du shellexecute

    Re : Attendre la fin du shellexecute Encore Merci tototiti, mais cette commende m'ouvre bien la calculette Windows, et s’arrête lorsque je la ferme manuellement. J'arrive à "calc.exe" remplacer par "AcroRd32.exe" mais ça m'ouvre juste acrobat et le code me dit fini quand je le ferme...
  4. M

    [RESOLU] Attendre la fin du shellexecute

    Re : Attendre la fin du shellexecute Bonjour tototiti, merci de t'être penché sur mon soucis, j'ai essayer de mettre ce code dans un module, mais rien ne se passe.... Je ne sais pas quoi modifier pour que ça corresponde à mon projet, peux tu m'aider? Merci
  5. M

    [RESOLU] Attendre la fin du shellexecute

    Bonsoir à tous, je travaille sur un projet permettant de fusionner via PDFCREATOR des feuilles EXCEL alternées avec un document PDF. Voici le code permettant d'imprimer les PDF. Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal...
  6. M

    VBA - Shellwait

    Bonjour à tous, j'ai une petite macro pour imprimer des PDF qui fonctionne trés bien pour une seule impression. Le problème c'est que j'en ai plusieurs d'affilé entrecouper d'impression de feuilles excel et que shellExecute fonctionne de manière qui fait que mes PDF sont imprimés apres mes...
  7. M

    Saisir mot de passe automatiquement

    Re : Saisir mot de passe automatiquement C'est un fichier qui se trouve sur un disque commun ou sont centralisé tous les.fichier de donné de toute l'entreprise. chacun à acces à tous les fichier à condition qu'il ai les droit. Puisque apparemment mon problèmest pas facilement soluble...
  8. M

    Saisir mot de passe automatiquement

    Re : Saisir mot de passe automatiquement Le fichier est sur le réseau et donc accessible autrement que par le lien hypertexte généré par la macro. Il n'y a donc pas de solution? Merci
  9. M

    Saisir mot de passe automatiquement

    Re : Saisir mot de passe automatiquement Le fichier contenant la macro est lui même déjà protégé par le même mot de passe. Le code VBA ne sera donc accessible que par les personne connaissant le mot de passe il n'y a donc pas.de risque. je le.fichier protégé se trouvant sur le réseau commun de...
  10. M

    Saisir mot de passe automatiquement

    Re : Saisir mot de passe automatiquement Tout à fait Staple1600, Le mot de passe et nécessaire car le fichier contient des donnée confidentielles. J'ai reproduit les 2 fichier. Le mot de passe est TITI en majuscule. Les PJ attireront peut-être du monde... Merci d'avance pour votre aide
  11. M

    Saisir mot de passe automatiquement

    Re : Saisir mot de passe automatiquement Personne pour m'aider?? :(
  12. M

    Saisir mot de passe automatiquement

    Bonjour, j'ai une macro qui me génére des liens hypertexte vers des fichiers excel protégés à l'ouverture par une mot de passe. Je souhaiterais lorsque je suis le lien hypertexte qu'une macro me saisisse automatiquement le mot de passe. J'ai essayé Private Sub Worksheet_FollowHyperlink(ByVal...
  13. M

    probleme tcd

    Re : probleme tcd Bonsoir à tous, Problème "Résolu" en arrondissant à 3 décimal mon prix. Ce n'est pas exactement ce que je souhaitais mais il faut que j'avance donc voilà. Merci à vous tous pour votre aide.
  14. M

    probleme tcd

    Re : probleme tcd Merci Misange, j'ai tenté avec le .value mais ça me marche pas. Help me...
  15. M

    probleme tcd

    Re : probleme tcd Voilà, j'ai essayé cette macro : Sheets("legrand+FINDER").Select For Each cell In Range("F22:F138") cell.Activate If cell > 0 Then ActiveCell.FormulaR1C1 = cell End If Next cell Mais sans succès. Je ne sais donc pas comment faire. A l'aide.... Merci