XL 2016 Sauvgarder un fichier sur Mac

isabelle29

XLDnaute Nouveau
Bonjour à tous,
S'il vous plait comment je vais faire pour faire fonctionner ce code sur mac
VB:
Sub e()
Dim ch As String
ch = Range("a1")
Workbooks.Add
ActiveWorkbook.SaveAs ch

End Sub
 

job75

XLDnaute Barbatruc
Bonjour isabelle29,

Sur Mac le séparateur dans le chemin n'est pas l'antislash \ , de plus il vaut mieux préciser le format du fichier :
VB:
Sub e()
Dim ch As String
ch = Replace(Range("a1"), "\", Application.PathSeparator)
Workbooks.Add
ActiveWorkbook.SaveAs ch, xlOpenXMLWorkbook 'extension .xlsx
End Sub
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas