Moderatori: Anthony47, Flash30005
Sub RiportaV()
UR = Range("A" & Rows.Count).End(xlUp).Row
For RR = 2 To UR
If Range("A" & RR) = [D5] Then
Application.EnableEvents = False
Range("B" & RR) = [E5]
Application.EnableEvents = True
Exit Sub '<<<<< commentare o eliminare questa riga se nella colonna A ci sono altri nomi uguali che vuoi compilare con lo stesso valore di E5
End If
Next RR
End Sub
Torna a Applicazioni Office Windows
Inserire dati filtrati da 2 file ad un terzo file Autore: Ricky0185 |
Forum: Applicazioni Office Windows Risposte: 14 |
Perchè l'importazione dati con Selenium non fuziona? Autore: aggittoriu |
Forum: Applicazioni Office Windows Risposte: 7 |
[EXCEL] controllo corrispondenza tra valori con un vincolo Autore: sbs |
Forum: Applicazioni Office Windows Risposte: 9 |
Visitano il forum: Nessuno e 18 ospiti