Limite caractÈre variable

Bonjour,

J'ai un soucis sur la longueur de mon chemin d'accès excel.

Je récupère le chemin avec la macro et crée ensuite un lien hypertexte. Le problème est que mon lien ne contient pas tout les caractères...

Dim oOL As Object
Dim oOLMsg As Object
Dim oOLRecip As Object
Dim Chemin As String

    Expediteur = Sheets("AMY").Range("G3").Value
    MailCc = Sheets("INFO").Range("C11").Value
    Objet = nomAffaire & nomEsp & nomChantier & nomFichier & nomEsp & nomEtage
    Chemin = Workbooks(ActiveWorkbook.Name).FullName

    Set oOL = CreateObject("Outlook.Application")
    Set oOLMsg = oOL.CreateItem(0)

    With oOLMsg

        .To = ""
        .CC = MailCc
        .Subject = "Verification DoubleCheck - " & Objet
        .Importance = 1
 Texte = "<FONT face='Arial' size=3>Salut, "
 Texte2 = "<br><br><FONT face='Arial' size=3>ci-joint ma verification DoubleCheck !"
 Texte3 = "<br><br>" & "<A href=" & "'" & Chemin & "'" & ">Cliquez ici</A>"
 Texte4 = "<br><br><FONT face='Arial' size=3>" & Expediteur

        .HTMLBody = Texte
        .HTMLBody = .HTMLBody & Texte2
        .HTMLBody = .HTMLBody & Texte3
        .HTMLBody = .HTMLBody & Texte4
        .Display
    End With

    Set oOLMsg = Nothing
    Set oOLRecip = Nothing
    Set oOL = Nothing

Des idées....?

Merci

Bonjour,

Que contient "Chemin" ?

Il y a peut-être des espaces, des caractères bizarres ?

bonjour,

edit : bonjour oxydum

quel est le problème ?

que contient chemin et que contient texte3 ?

Chemin : "\\srv_vmw\Blabla\Dossiers\Dossiers 2019\515151515 Entreprise dbsfdsdf dfdsfd Extension dfgdfg dsffdsfdsfdsde bureaux\fgdfgdfg fgfgfg \fgdfgf\Bât dfdf\03_ R+1_K\TEST 19007953_Extention de Bureaux..." (Chemin = chemin d'accès du fichier excel)

Le Chemin n'est pas complet à cause de la limite de caractère du lien hypertexte dans le mail...

Texte 3 est le lien hypertexte du Chemin.

NOTA : J'ai modifié le chemin pour des raisons de confidentialités.

Ok, est-ce que tu as une information au survol du lien qui montre que c'est tronqué ?

Oui le lien hypertexte ne marche pas dans le mail et si je copie colle je vois que le lien n'est pas complet...

Bonjour,

j'ai essayé avec un lien > 1000 caractères, je n'ai pas de troncature. cela me semble donc lié spécifiquement au nom de ton fichier.

Est-ce que tu peux essayer de simplifier ton chemin par exemple en créant un dossier TEST à la racine de C:\

Peut-être est-ce un problème d'encodage des espaces dans les dossiers...

J'ai fait un test, dans ma cellule E10 j'ai :

"\\srv_vmw\bbbbbb\Dossiers\Dossiers 2019\19007953 Entreprise petit Paris Extension d'un immeuble de bureaux\Plans lololol\olo\Bât KIG\03_ KKK_K\TEST 19007953_Extention de Bureaux _R+1_K_DoubleCheck.xlsm"

Lien hypertexte du mail :

"\\srv_vmw\bbbbbb\Dossiers\Dossiers 2019\19007953 Entreprise petit Paris Extension d"

En revanche si je dis ca dans ma macro du mail :

 Texte3 = "<br><br><FONT face='Arial' size=3>" & Chemin

J'obtiens mon chemin complet mais pas en lien hypertexte...

Je sais pas quoi faire...

bonjour,

le problème vient du caractère ' dans ton nom de fichier, tu dois le doubler

essaie ceci (non testé)

Texte3 = "<br><br>" & "<A href=" & "'" & replace(Chemin,"'","''") & "'" & ">Cliquez ici</A>"

Rien, exactement le même résultat...

rebonjour,

j'ai testé ceci et cela semble fonctionner

 texte3 ="<br><br>" & "<A href=""" & Chemin & """>Cliquez ici</A>"

PARFAIT!! MERCI!