Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

macroexcel x selezionare ultima data e testo specifico

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

macroexcel x selezionare ultima data e testo specifico

Postdi macio66 » 01/04/17 11:16

Buongiorno
Immaginefree image hosting

volevo sapere se è possibile, tramite macro, inserire un nominativo (per esempio tramite InputBox) presente nella colonna "A" del foglio1 e da questo trovare l'ultima data presente nella colonna "B" e se nella colonna "C" è presente il testo "mancante", riportando i dati nel foglio2 nella prima riga disponibile.
Nell'immagine che ho allegato come esempio, se cerco il nome "A" la data dovrebbe essere "01-apr" e il testo "mancante" per il nome "a" è presente, quindi riportarlo nel foglio2
Grazie
macio66
Utente Senior
 
Post: 134
Iscritto il: 13/06/13 14:59

Sponsor
 

Re: macroexcel x selezionare ultima data e testo specifico

Postdi patel » 01/04/17 16:03

nella riga 20 è presente il nome a, la data del 01-apr ma mon il testo "mancante"
patel
Utente Senior
 
Post: 309
Iscritto il: 24/04/12 16:03

Re: macroexcel x selezionare ultima data e testo specifico

Postdi macio66 » 01/04/17 16:37

ciao patel
Il mio problema è proprio quello.
Infatti ho la necessità di trovare per il nominativo la riga con l'ultima data (per il nome a, la riga 20), dove devo prelevare altri dati in altre colonne, oltre alla data , ma nello stesso tempo, mi serve sapere se nella tabella per il nome a è presente il testo "mancante" e inserirlo nella riga nel foglio2
macio66
Utente Senior
 
Post: 134
Iscritto il: 13/06/13 14:59

Re: macroexcel x selezionare ultima data e testo specifico

Postdi ricky53 » 02/04/17 00:18

Ciao,
riepilogo quanto ho capito:
dopo aver selezionato un nominativo dall'InputBox,
scorrere la colonna "A" e trovare l'ultima riga in cui è presente questo nominativo
controllare se la colonna "C2 contiene la dicitura "mancante" e se è così
allora
copiare nome e data delle colonne "A" e "B" in un altro foglio accodandoli ai dati esistenti ... su riga e colonna di destinazione non fornite.

IMPORTANTE: non hai detto in quali celle, del foglio 2, si devono copiare i dati!
Dice il vecchio saggio provare e riprovare è l'unica strada per imparare

Più chiara è la vostra spiegazione
Più immediata sarà la nostra soluzione


. . . . . . . . . .
S.O. W7; Office 2003-10-13-16
Avatar utente
ricky53
Utente Senior
 
Post: 4526
Iscritto il: 11/04/09 19:29
Località: Italia

Re: macroexcel x selezionare ultima data e testo specifico

Postdi macio66 » 02/04/17 07:03

Ciao Rocky
Si è corretto (la colonna C è tutta da verificare).
Per quanto riguarda le colonne del foglio2, sono le stesse del foglio1
macio66
Utente Senior
 
Post: 134
Iscritto il: 13/06/13 14:59

Re: macroexcel x selezionare ultima data e testo specifico

Postdi Anthony47 » 02/04/17 11:39

Io pero' non ho capito su che cosa, di tutto quello che hai detto, stai chiedendo aiuto...
Con queste istruzioni dovresti trovare rispettivamente:
-La riga ultima in cui compare un Nome; la Data di col B (invece del numero riga)
-La riga ultima in cui un Nome e' anche "mancante"; la Data (invece del numero riga)

Codice: Seleziona tutto
nome = "b"             '<<< Il nominativo da sondare
RigaNome = Evaluate("max(if((A1:A10000=""" & nome & """),row(B1:B10000),""""))")

DataNome = Evaluate("max(if((A1:A10000=""" & nome & """),B1:B10000,""""))")

RigaMiss = Evaluate("max(if((A1:A10000=""" & nome & """)*(C1:C10000=""mancante""),row(B1:B10000),""""))")

DataMiss = Evaluate("max(if((A1:A10000=""" & nome & """)*(C1:C10000=""mancante""),B1:B1000,""""))")

Vedi se qualcosa ti aiuta

Ciao
Avatar utente
Anthony47
Moderatore
 
Post: 17795
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: macroexcel x selezionare ultima data e testo specifico

Postdi macio66 » 02/04/17 15:15

Ciao Anthony
provo a spiegarmi meglio.
Per quanto riguarda trovare l'ultima data riferita ad un nome, pensavo di risolverla ordinando prima la tabella per data (ordine decrescente) e poi tramite un cerca verticale mi posiziono sulla prima riga in cui il nome compare nella colonna A e poi, tramite " ActiveCell.Offset(0, 1).Select", copio la data. Il mio problema e capire se per quel nome, anche in date precedenti ce stato un mancato prelievo e se ce stato, copiare o la scritta mancante o scrivere un "si" nella riga che compilo nel foglio2.
Spero sia più chiaro quello che volevo.
Comunque ora provo se quello che hai postato mi può servire.
Grazie
macio66
Utente Senior
 
Post: 134
Iscritto il: 13/06/13 14:59

Re: macroexcel x selezionare ultima data e testo specifico

Postdi macio66 » 02/04/17 16:26

Ciao Anthony
Grazie quello che hai postato è perfetto.
Ti chiedo ancora una cosa, se oltre alla data più recente, volessi copiare il numero di prelievo effettuato, come devo modificare il "DataNome" (mi sembra più funzionale che usare "ActiveCell.Offset(0, 1).Select", per spostarmi di colonna).
Grazie ancora
macio66
Utente Senior
 
Post: 134
Iscritto il: 13/06/13 14:59


Torna a Applicazioni Office Windows


Topic correlati a "macroexcel x selezionare ultima data e testo specifico":


Chi c’è in linea

Visitano il forum: Nessuno e 38 ospiti