Buon giorno a tutti.
Eccomi ancora qui con un nuovo quesito.
Avrei bisogno di scrivere una macro che legga i dati contenuti in una colonna esempio "D" partendo da riga 1
legga il primo valore che trova, lo memorizzi nella variabile e lo copi nelle celle sottostanti.
Quando il valore cambia, memorizzi il nuovo valore e continui a copiare
Tutto questo sino ad una determinata riga, esempio riga 200.
Ho cercato e trovato quanto segue ma non riesco a capire come adattarlo alle mie esigenze.
Sub copia()
c = 3 ' colonna inizio scrittura
r1 = 1 ' riga inizio scrittura
r = 1 ' riga inizio dati e controllo fine dati
v = Cells(r, 1)
Do Until Cells(r, 1) = ""
If Cells(r, 1) = v Then ' se il valore è uguale
Cells(r1, c) = Cells(r, 2) ' scrive in colonna
Else ' altrimenti
v = Cells(r, 1) ' prende il nuovo valore
Cells(r1, c) = Cells(r, 2) ' scrive
End If
r1 = r1 + 1 ' incrementa riga scrittura
r = r + 1 ' incrementa riga lettura
Loop
End Sub
Grazie anticipato a tutti.......