Buona giornata, Alfredo;
grazie della tua attenzione, ma, ad onor del vero nel Codice VBA che ho proposto c'è un refuso.
Non chiedermi il perchè, forse un improvvido Copia/Incolla, ma la Condizione:
If Fg2.Cells(y, 1) = Cells(y, 1) Then
nel codice con il quale ho condotto i miei test in realtà è:
If Fg2.Cells(y, 1) = Cells(x, 1) Then
Il Codice che ho allegato non crea problemi relativamente all'esempio proposo da @marym.87 ma in determinate circosanze potrebbe creare disservizio.
Tanto è dovuto per opportuna chiarezza.
A disposizione.
Giuseppe
Windows XP - Excel 2000
Windows 10 - Excel 2013