Explication VBA : Facturation automatique Gestion Devis
🧾 Macro Excel : Exporter un devis en PDF automatiquement devis_imprimer Sub devis_imprimer() If ActiveSheet Is Devis_gestion Then Devis_gestion.Select Dim wb As Workbook, feuille As Worksheet Dim plage As String, nomDocument As String, dossierAdresse As String Dim iVis As XlSheetVisibility Set wb = ThisWorkbook Set feuille = Devis_gestion 'sans wb.quand j'ulisse le code au lieu du nom vsible de la feuille dossierAdresse = Parameters.Range("K9").Value & "\" nomDocument = feuille.Range("J16").Value & "_" & Devis_gestion2.Range("E10").Value ''''''''''''''vérifier que le dossier existe avant d'enregistrer '''***'''' If Dir(dossierAdresse, vbDirectory) = "" Then MkDir dossierAdresse End If '''''''...