Visual Basic 6 - doppio ciclo for next

Ciao a tutti, sto cercando di far funzionare il codice sottoriportato ma con risultati pessimi.


Private Sub Conferma_Click()
Sheets("Foglio Stampa".Select
For N = 1 To 157 Step 3
For NN = 44 To 96 Step 1
If Userform2.Controls("TextBox" & N).Text <> "" Then
ActiveSheet.Shapes("Text Box " & NN).Value = Userform2.Controls("TextBox" & N)
Else
ActiveSheet.Shapes("Text Box 154".Value = "zero"
End If
Next NN
Next N
End Sub



Avete qualche dritta da darmi ?

Ciao , con uno sguardo veloce al codice , mi sembra che sia corretto ( al livello sintattico ).
Che tipo di "risultati" ottieni ? Perché dici che il codice non funziona ?