Correction code VBA, Merci d'avance :)

Résolu
SOMUM Messages postés 28 Statut Membre -  
SOMUM Messages postés 28 Statut Membre -
Bonjour,

J'ai un soucis sur un code VBA, une âme charitable se lancerait ? 

Sub EnregistreSous()
Dim NOM As String
lechemin = ActiveWorkbook.Path & "C:\Users\user\Desktop\TEST_EAD\"
NOM = Range("F24")
ThisWorkbook.SaveAs lechemin & NOM & ".xls"
End Sub


Merci d'avance encore et encore :)

1 réponse

  1.
    via55 Messages postés 14393 Date d'inscription   Statut Membre Dernière intervention   2 759
     
    Bonjour

    ActiveWorkbook.Path renvoie déjà le chemin il ne faut pas le rajouter encore après !! il suffit de rajouter un \
    lechemin = ActiveWorkbook.Path & "\"

    Cdlmnt
    Via
    0
    1. SOMUM Messages postés 28 Statut Membre
       
      Ahhhhhhhhhhhhhh !!!!


      Oui. Bah merci beaucoup beaucoup !
      0

Discussions similaires

C'est quoi un BILLING ZIP CODE
bikanane -
fabul -

1 réponse
Où sont stockés les QR codes sur android ?
zatox19 -
Pierrecastor -

11 réponses