Contenu récent par velpa

non erreur d’exécution 75 o_O

dans la librairie tout est décoché sauf les 5 premiers

ça serais pas a cause du format de la cellule F11 qui est une date "12/11/2019" qui ferais blocage a l'enregistrement PDF ?

:eek: Merci pour ton aide tu m'a fait avancé quand même

Re erreur d'exécution 9

Je sèche... J'ai tenté différentes choses mais j'arrive au même résultat voir pire. j'ai cru que comme le sous dossier existait maintenant, puisque qu'il a été généré, ça faisait doublon donc ça bloque. Après avoir recréé un devis j'ai tenté a nouveau et la : J'ai changé de chemin de...

J'ai vérifier si le dossier est protégé mais non MkDir Chemin & sousdossier

Corrigé. Il m'a bien créé le sous dossier mais erreur d'acces chemin\fichier J'ai envi de pleurer !!

Correction faite maintenant c'est la ligne If Dir(Chemin, vbDirectory) <> "" Then qui bug. J'ai un probleme de chemin puisque comme un idiot j'ai changé de PC donc chemin différent, mais ça bloque quand même. Nom ou numéro de fichier incorrect

Le debogage me met la ligne With Worksheets("Feuil4") en surbrillance

Oups "Erreur d’exécution 9 L'indice n’appartient pas a la sélection "

En fait j'aimerais que le fichier PDF soit sauvegardé dans un sous dossier nommé avec le contenu de la cellule E4 (qui fait elle même référence a une autre) et que le fichier est le nom E4 + le contenu de la cellule F11 (qui est la date du devis).

Oups c'est pas faux ! Maintenant c'est le With Worksheets qui pose problème visiblement. Il faut mettre le nom de la feuille 4 ou feuil4 direct ?

j'ai une erreur de compilation variable non défini :confused:

Je rame... Apparemment j'ai plusieurs erreurs dans le code. Il faut un Dim pour le sous dossier ? Et la feuille 4 en question s'appelle Devis1, je dois mettre feuil4 ou Devis1 ? Voila ou j'en suis : Private Sub CommandButton41_Click() Dim fichier As String Dim Chemin As String With...