ciao a tutti,
in una macro devo inserire una ricerca di un nome in un'area, quando usavo le vecchie macro 4.0 i comandi erano i seguenti:
=ERRORE(FALSO) ' per non darmi errore se non trovava il nome
=SE(FORMULA.TROVA(U8)=VERO) ' entra se trova il nome scritto nella cella U8
=SELEZIONA("RC")
=SELEZIONA("R[-1]C")
=ATTIVA.FINESTRA("Dati.xlsm")
=CARTELLA.DI.LAVORO.SELEZIONA("P0")
=SELEZIONA("R7C21:R400C24")
=MODIFICA.COPIA()
=ATTIVA.FINESTRA("Archivio.xlsm")
=CARTELLA.DI.LAVORO.SELEZIONA("SCH")
=SELEZIONA("RC")
=MODIFICA.INCOLLA() ' incolla i dati aggiornati sostituendo quelli precedenti già presenti in archivio
=MACRO.ESEGUI(N71) ' passa alla Riga 71 dopo l'aggiornamento salto le istruzioni che farebbe se non avesse trovato il nome
=FINE.SE()
' se non ha trovato il nome parte da qui e lo inserisce
=ATTIVA.FINESTRA("Dati.xlsm")
=CARTELLA.DI.LAVORO.SELEZIONA("P0")
=SELEZIONA("R3C21:R400C25")
=MODIFICA.COPIA()
=ATTIVA.FINESTRA("Archivio.xlsm")
=CARTELLA.DI.LAVORO.SELEZIONA("SCH")
=SELEZIONA("R5C6")
=INSERISCI(1) ' inserisce in archivio i dati nuovi
Riga 71 da dove riparte la macro dopo l'aggiornamento fatto entrando nel ciclo SE... FINE SE
...
...
con il codice VBA non riesco a venirne a capo, qualcuno mi può aiutare?
Grazie
Roberto