Discussion :

[tkwleboss]

Bonjour,
J'ai un problème lors d'une insertion du logo de la planète qui se trouve dans les caractères spéciaux de windows.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
objSelection.Font.Size = "13.5"
objSelection.Font.Name= "Webdings"
objSelection.InsertSymbol Font:= "Webdings", CharacterNumber:=-3844, Unicode:= True

j'ai une erreur dans la ligne (objSelection.Insert...) caractère 32 donc juste après Font.

Quelqu'un a une idée?

Merci d'avance.

[ProgElecT]

Il me semble que tu n'entres pas les parametres dans le bon ordre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

objSelection.InsertSymbol CharacterNumber:=-3844, Font:= "Webdings", Unicode:= True

Une question, comme sa en passant , tu codes bien en VBScript ?
Car sa ressemble à du VBA-Excel

[tkwleboss]

Bonjour,
Merci de ta réponse.
Non j'ai toujours la même erreur.
En fait c'est un script vbs accompagné d'un netlogon pour générer des signatures outlooks en se référant à AD.
tout marche sauf cet insertion de symbole, j'aimerai insérer le symbole du globe terrestre pour que les employés pense à l'enivrement avant d'imprimer le mail.
As-tu une autre idée?
merci d'avance.

[ced600]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

objSelection.InsertSymbol CharacterNumber:=-3844, Font:= "Webdings", Unicode:= True

Cette ligne tu l'as pris où ? d'un code VBA ou de tes connaissances ?
Parce que comme le dit ProgElecT, cela ressemble à du VBA-Excel et donc ce n'est pas sur que l'interpréteur VBS accepte cette syntaxe.

[tkwleboss]

effectivement je l'ai pris d'un VBA word.
et en effet la syntaxe est différente
je crois que la syntaxe est comme suit:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

objSelection.InsertSymbol FontName= "Webdings", CharNumber:=252, Unicode= True

Merci quand même de votre aide.

[ced600]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

CharNumber:=252,

Erreur de frappe ?
Si le := ne marche pas pour FontName et Unicode, alors non plus pour CharNumber.

Je ne pense pas que cela marche ainsi:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

objSelection.InsertSymbol FontName= "Webdings", CharNumber=252, Unicode= True

Pour le VBS, les appelle de méthodes ou de fonctions avec passage de paramètres c'est plus du genre:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

objSelection.InsertSymbol "Webdings", 252, True

Peut être que ceci pourrait marcher:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

objSelection.InsertSymbol "FontName=Webdings", "CharNumber=252", "Unicode=True"

Je ne connais pas la réponse, mais je sais que des questions dans ton genre on déjà été résolu sur ce forum.
Fait une recherche, tu trouveras certainement des postes parlant de conversion de syntaxe VBA excel, word vers VBS.

Regarde aussi sur MSDN en cherchant la méthode InsertSymbol de l'objet que tu utilises, tu auras peut être un exemple de syntaxe VBS.