Erreur de macro sur tablette windows10

Bonjour à tous,

J'ai un petit problème avec le fichier excel avec lequel mon épouse fait ses factures.
Cela fait 5 ans qu'elle l'utilise sans problème pour son activité.

Elle a récemment acheté une tablette ASUS transformer t100h avec windows 10 pour des raisons de mobilité (avec office 2007).

Maleureusement, le fichier "Facutre.xlsm" affiche "Argument ou appel de procédure incorrect".

Arpès quelques tests je n'arrive toujours pas à voir où est le problème.

- Sur son ancien portable (HP pavillon, windows Vista, office 2007) : Aucun problème.
- Sur mon portable (ASUS, windows 10, office 2007) : Aucun problème

J'espère que l'un d'entre vous pourra m'aider. ;)


C'est un fichier avec une seule macro:

Feuil1 : "FACTURE" la facture avec un bouton "Enregistrer" lié à une macro
Feuil2 : "PATIENT" la liste des patients
Feuil3 : "DONNEES différentes cellules avec des infos concaténées dans la case "C8" pour déterminer le nom du fichier.pdf à enregistrer qui est utilisé dans la macro.

"=CONCATENER(A8;Facture!B16;"_";C3;A9)"

Ce qui donne :

A8 =               "D:/dossier/factures/"
Facture!B16 =      "2016_01"
                   "_"
C3 =               "NOMduPATIENT"
A9 =               ".pdf"

--> "D:/dossier/factures/2016_01_NOMduPATIENT.pdf"

(remarque : j'ai bien entendu changé la valeur de "A8" lorsque je change d'ordinateur.)

Voici la macro dont le résultat est une jolie facture en pdf :

Sub enregistrerFacturesPDF()
'
Dim nom As Variant
 
nom = Sheets("Données").Range("C8").Value

'
    Sheets("Facture").Select
    Sheets("Facture").Copy
    
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        nom, Quality:=xlQualityStandard, _
        IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
        True
        
    Application.DisplayAlerts = False
    ActiveWindow.Close
    Application.DisplayAlerts = True
End Sub

Un grand merci pour votre aide !