Buona sera a tutti
Come da titolo mi servirebbe una funzione che ad ogni riempimento di una cella (sempre la stessa) sul foglio 2 mi crei un elenco.
Questo e l'inizio, MA NON SO DOVE SBAGLIO
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Cells(17, 5)) Is Nothing Then
Application.EnableEvents = False
uR = Sheets(2).Cells(Rows.Count, 1).End(xlUp).Row + 1
Sheets(2).Cells(uR, 1) = Cells(17, 5)
Application.EnableEvents = True
End If
End Sub
grazie mille in anticipo
[Modificato da Sylwester 12/04/2020 23:00]