Discussion :

[MolikDLuffy]

Bonjour,

Je ne comprends pas pourquoi le message "Erreur de compilation : Next sans for" apparaît :

Ci-dessous mon code :

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
19
20
21
22
23
Sub Mise_en_forme()
 
ActiveSheet.Select
 
Dim nombre_ligne_tableau As Long
Dim centre_value As Range
Dim ligne As Long
 
 
nombre_ligne_tableau = InputBox("Quel estl le nombre de ligne du tableau extrait ?", vbQuestion)
centre_value = Range("A2").Value
 
 
For ligne = 3 To nombre_ligne_tableau Step 1
 
    If Cells(ligne, 1).Value = "" Then
        Cells(ligne, 1).Value = centre_value
    Else
        centre_value = Cells(ligne, 1).Value
 
Next ligne
 
End Sub

Merci de votre aide.

[MarcelG]

Salut,

Next sans for

est un message générique.
Il signifie qu'un bloc n'est pas fermé.

Ton code est bien indenté.
Il est donc aisé de voir lequel.

[MolikDLuffy]

A oui je crois que c'est le bloc If qui n'est pas fermé... J'oublie toujours.

Merci