Caractère spéciaux dans tableau Word

Caractère spéciaux dans tableau Word - VB/VBA/VBS - Programmation

Marsh Posté le 23-07-2009 à 15:16:20    

Bonjour à tous,
 
J'aimerais pouvoir insérer un caractère (box uncheck) dans un tableau Word, cependant je n'y arrive pas.
J'ai essayé notamment la chose suivante :
 

Code :
  1. objDoc.Tables(1).Cell(1, 1).Range.Select
  2. Selection.InsertSymbol Font:="Wingdings", CharacterNumber:=-3928, Unicode:=True


Mais ne fonctionne pas.
 
Pourriez-vous s'il-vous-plaît m'aider ?
Merci d'avance.

Reply

Marsh Posté le 23-07-2009 à 15:16:20   

Reply

Marsh Posté le 23-07-2009 à 21:04:12    

Bonjour
 
 
essais selection.insertbefore chrw(3928)
 

Reply

Marsh Posté le 24-07-2009 à 11:01:41    

Merci, ça marche !
Cependant ce n'est pas le même caractère. Comment le retrouver ?

Reply

Marsh Posté le 24-07-2009 à 13:19:50    

Bonjour,
 
1) le chiffre entre parenthèse correspond à l'unicode de ton caractère
il faut rechercher la position de ce caractère dans la police
 
2) il faut appliquer le nom de la police à ce caractère
 
Exemple:
dans police wingdings le caractère 63
tu fais selection.insertbefore chr(63)
 
si le chiffre dépasse 255, dans ce cas utilise chrw()
 
Pour connaitre la position des caractère, j'utilise Xfonter (gratuit), mais il y en a bien d'autres
 

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed