Compter nombre de ligne avec bordure dans une colonne

Résolu
Tozinho64 Messages postés 43 Date d'inscription   Statut Membre Dernière intervention   -  
Tozinho64 Messages postés 43 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
J'ai des cellules avec bordures dans la colonne A (de A11 à A30 par exemple).
Je voudrais connaitre en vba, comment compter le nombre de ligne avec bordure et donc avoir le résultat dans une variable type nb=20 ou nb est le nombre de ligne.

Merci pour votre aide

2 réponses

  1.
    cs_Le Pivert Messages postés 8437 Statut Contributeur 730
     
    Bonjour,

    tu peux t'inspirer de cela:

    https://forums.commentcamarche.net/forum/affich-32216941-recuperer-la-zone-encadree-de-bordure-vba-excel#top

    0
    1. Tozinho64 Messages postés 43 Date d'inscription   Statut Membre Dernière intervention  
       
      Je viens de trouver ceci et cela fonctionne :
      Sub compteurbordure()
      Dim Cell As Range
      Dim Compteur As Integer


      For Each Cell In Range("A1:A1000")
      If Not Cell.Borders(xlEdgeBottom).LineStyle = xlNone Then
      Compteur = Compteur + 1
      End If
      Next Cell


      nb = Compteur - 1
      End Sub


      Merci et bonne journée
      0
  2. Tozinho64 Messages postés 43 Date d'inscription   Statut Membre Dernière intervention  
     
    Ouch,
    merci pour ce retour mais pas trop compliqué ?
    0