Discussion :

[franck.automaticien]

Bonjour a tous,

Je fais un peu de VBA,
j'ai trouvé une solution afin de tester la colonne "C"
par exemple est de trouver le caractere NULL
et sa renvoi dans la variable CelVide

existe t'il une autre solution pour srupter les cellules?
sans passer par une conversion en String, mais en passant par une boucle For

Merci d'avance
++

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
 
Dim i
Dim CelVide
Str colC
For i = 0 To 500
 
    colC = "C" + CStr(i)
 
    If Range(colC).Value = "" Then
    CelVide = i
    GoTo fin
    End If
 
Next i
fin:

[Daranc]

salut
un truc dans ce genre?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
for i=1 to 500
if cells(i,3).value="" then
range("b1")=i
next

daranc

[Michel_M]

Bonjour Keops, Daranc

un autre truc dans un autre genre (sans utiliser de boucle toujours lente):

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

celvide=Columns(3).Find("", Range("C65536")).Row

A+
Michel_M