Un peu d'aide SVP

[Rija_Ramorasata]

Bonjour Forum!
Problème de codification, si quelqu’un pourrait m’aider, je voudrais obtenir le nom du CLT pour archivage. Ci joint le code que j’ai utilisé dans Visual Basic module 2
Merci d’avance pour votre aide
Cordialement!
facture - Copie.xlsm (38,5 Ko)

[Mimimathy]

Bonjour,

Teste cette macro

Sub ARCHIVER()
'Déclaration des variables
Dim NomDossier As String
Dim CheminDossier As String
Dim Clt

Clt = Sheets("Facture").Range("F4")
'Nom de dossier
CheminDossier = "C:\Users\PC\Documents\Archive_factures\"
 If NomDossier = "  " Then Exit Sub
'Enregistrement au format PDF
       ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
       CheminDossier & "facture_" & Range("E11").Value & "-" & Clt & ".pdf", Quality:= _
        xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=True, _
        From:=1, To:=1, OpenAfterPublish:=False
End Sub

[Rija_Ramorasata]

Mimimathy merciiii! ça a marché, ça m’a échappé de mettre le code Clt = Sheets…
En tant que débutant, j’évolue de plus en plus dans le VBA.
Ce forum est vraiment génial et super.
Un petit cadeau pour vous Mimimathy, « Capital de Madagascar »