VBA (Excel) nb ligne ajoutée ou retranchée
Résolu
Dmouha
-
Mike-31 Messages postés 18405 Date d'inscription Statut Contributeur Dernière intervention -
Mike-31 Messages postés 18405 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
Est il possible en VBA(excel) de savoir si une ligne a été ajoutée ou retranchée à partir d'une certaines cellule sélectionné?
Est il possible en VBA(excel) de savoir si une ligne a été ajoutée ou retranchée à partir d'une certaines cellule sélectionné?
A voir également:
- VBA (Excel) nb ligne ajoutée ou retranchée
- Aller à la ligne excel - Guide
- Si ou excel - Guide
- Liste déroulante excel - Guide
- Partager photos en ligne - Guide
- Word et excel gratuit - Guide
3 réponses
Salut,
Avec un petit bout de code VBA si tu as quelques notions, tu peux créer un compter dans une colonne.
Commence par nommer la dernière cellule d'une plage exemple la cellule A1000 que tu nommes ex.titi
dans un module Visual Basic colle ce code que tu associes à un bouton, il te comptera le nombre de ligne entre la cellule A1 et la cellule nommée. L'historique sera affiché colonne B
Il est également possible de compléter cet historique avec les dates et heures des contrôles
Sub compt()
[A1:titi].Select
With Selection
nblig = .Rows.Count
End With
Range("B65536").End(xlUp).Offset(1, 0) = nblig
MsgBox "le nombre de lignes vides est de " & nblig
End Sub
Avec un petit bout de code VBA si tu as quelques notions, tu peux créer un compter dans une colonne.
Commence par nommer la dernière cellule d'une plage exemple la cellule A1000 que tu nommes ex.titi
dans un module Visual Basic colle ce code que tu associes à un bouton, il te comptera le nombre de ligne entre la cellule A1 et la cellule nommée. L'historique sera affiché colonne B
Il est également possible de compléter cet historique avec les dates et heures des contrôles
Sub compt()
[A1:titi].Select
With Selection
nblig = .Rows.Count
End With
Range("B65536").End(xlUp).Offset(1, 0) = nblig
MsgBox "le nombre de lignes vides est de " & nblig
End Sub
kikkoCCm
Messages postés
71
Date d'inscription
Statut
Membre
Dernière intervention
4
l'échec nous fait avancer...