Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

API, COM et SDKs Delphi Discussion :

Modifier Font d'une cellule dans Excel


Sujet :

API, COM et SDKs Delphi

  1. #1
    Membre régulier
    Modifier Font d'une cellule dans Excel
    Bonjour,

    J'utilise Excel pour générer plusieurs rapports. Dans l'un de ceux-ci, je dois afficher des choix de réponses et mettre un symbol de case à cocher devant chacun d'eux.

    J'ai trouvé le genre de case que je veux et c'est comme dans Word, un « q » avec la police Wingdings.

    Mon problème est que j'aurais aimé avoir la case (wingdings) et le choix (verdana) dans la même cellule.

    Pour mon exemple, * représente la case:

    * Oui * Non * S/O

    Est-ce que c'est possible?

    Merci d'avance!

  2. #2
    Membre régulier
    Avec deux lignes du genre :


    Code :Sélectionner tout -Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
     
    xls.Cells[num_ligne, num_colonne].Characters(start:=1,Length:=1).Font.Name:='Wingdings' 
    xls.Cells[num_ligne, num_colonne].Characters(start:=2,Length:=20).Font.Name:='Verdana'


    peut-être . Non testé.

  3. #3
    Membre régulier
    Ça fonctionne!

    Je n'avais pas pensé d'enregistrer une macro et de vérifier le code!

    Merci bien!