Ecco qui il codice:

Sub CellaSuccessiva()
'
' CellaSuccessiva Macro
' Macro registrata il 20/12/2008 da *
Dim iRow As Integer
iRow = 4
For iRow = 5 To 25
If Cells(iRow, 2).Value = "" Then
Cells(iRow, 2).Value = Cells(4, 2).Value
Exit For
End If
Next iRow

End Sub




Mi raccomando, non abbandonatemi mi serve ancora aiuto...mi servirebbe sapere come si indica la colonna, adesso vorrei fare un'altra macro tenendo fissa iRow, ad esempio Cells(2, x) al posto della x come devo scrivere?