Bonjour à tous,
Je suis un archi débutant sur VBA, je m'y suis mis seulement à cause de mon dernier boulot. J'aurais besoin de votre aide car je cherche à compter les cellules vides de la colonne I de mon tableau jusqu'à la dernière ligne de ce dernier, sans succès. Voici le code que j'ai déjà tapé :
Ce code est probablement du grand n'importe quoi mais je n'arrive pas à grand chose sur VBA pour l'instant.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18 Sub CpteCellulesVides() Dim i As Integer Dim dernligne As Integer dernligne = Range("I" & Rows.Count).End(xlUp).Row WorksheetFunction.CountBlank (Range("i:I")) For i = 2 To dernligne If IsEmpty Cells(i, 9).Value Then i = i + 1 End If Next Cells(13;25).Value = WorksheetFunction.CountBlank(Range("i:I")) End Sub
Qui plus est If IsEmpty Cells ne semble pas être une formule correcte...
Le logiciel me renvoie "objet requis" sans aller plus loin.
D'avance merci à vous.
Partager