Mettre la dernière ligne d'un tableau en gras

Résolu
Bourrique66 Messages postés 166 Statut Membre -  
Bourrique66 Messages postés 166 Statut Membre -

J’aimerais mettre en gras la dernière ligne d’un tableau Excel structuré, sur votre forum j’ai trouvé sur internet une ligne de code . Celui-ci fonctionne parfaitement mais il faudrait en même temps remettre l’avant-dernière ligne en écriture normale sinon au bout d’un moment tout mon tableau sera en gras, je mets le code que j’ai trouvé sur internet.

Range("A65536").End(xlUp).EntireRow.Font.Bold = True

Je ne sais pas si ma demande et réalisable par avance merci

6 réponses

  1. via55 Messages postés 14395 Date d'inscription   Statut Membre Dernière intervention   2 759
     

    Re

    C'est peut être moi qui me suis mal exprimé, il faut sélectionner les colonnes entières et baser la formule de MFC sur le 2eme ligne

    exemple : https://www.cjoint.com/c/LHxnV46y6Yu

    Cdlmnt

    Via


    2
  2. via55 Messages postés 14395 Date d'inscription   Statut Membre Dernière intervention   2 759
     

    Bonsoir

    Pas besoin de passer par du VBA

    Par hypothèse les cellules en dessous de la dernière ligne de ton tableau sont vides

    Donc il est possible de mettre en gras la dernière ligne par mise en forme conditionnelle

    si le tableau commence en A1 après avoir sélectionné les colonnes du tableau Mise en forme conditionnelle - Nouvelle règle - Appliquer une formule et entrer la formule =A2="" avant de choisir police en gras

    Cdlmnt

    Via


    1
  3. Le Pingou Messages postés 12285 Date d'inscription   Statut Contributeur Dernière intervention   1 480
     

    Bonjour,

    Juste au passage, essayer ceci:

    Sub DerniereLigneGras()
    deli = Cells(Columns(1).Cells.Count, 1).End(xlUp).Row
    Rows("" & deli - 1 & ":" & deli - 1).Font.Bold = False
    Rows("" & deli & ":" & deli).Font.Bold = True
    End Sub
    

    1
  4. Bourrique66 Messages postés 166 Statut Membre 2
     

    Bonjour via

     Désolé pour ma réponse tardive. Je viens de tester votre solution pour mettre en gras la dernière ligne d'un tableau et rien ne se passe. je sélectionne tout mon tableau puis MFC nouvelle règle et je colle votre solution puis format gras je valide .A l'aide d'un formulaire j'ajoute une nouvelle ligne et celle-ci reste normale peut-être que je fais pas se qui faut. 

    0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. Le Pingou Messages postés 12285 Date d'inscription   Statut Contributeur Dernière intervention   1 480
     

    Merci via55 superbe solution.


    0
  7. Bourrique66 Messages postés 166 Statut Membre 2
     

    Bonjour Le Pingou;

    Merci pour votre réponse qui correspond parfaitement à mes attentes, j’ai mis votre code dans Initialize et tout fonctionne. Encore merci de votre aide

    0