Pagina precedente | 1 | Pagina successiva
Vota | Stampa | Notifica email    
Autore

No filtro no Tabella Pivot

Ultimo Aggiornamento: 09/02/2017 13:45
Post: 87
Registrato il: 06/02/2008
Utente Junior
excel 2010
OFFLINE
06/02/2017 21:58

Buonasera a tutti, problema con convalida dati, nell'allegato trovate l'esempio con la descrizione del problema.

Volevo evitare di usare il filtro o la Tabella Pivot.

Secondo voi si può fare?

Ciao 8scatti [SM=x423028]
(Vers. Excel 2007/2010)
Post: 2.713
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Veteran
Excel 365
OFFLINE
06/02/2017 22:47

Ciao Francesco

Se non vuoi usare filtri o pivot (che non so se siano applicabili al tuo caso) non vedrei altra soluzione che il VBA.

È per te una soluzione percorribile?

Alfredo
Post: 325
Registrato il: 24/06/2015
Città: CATANIA
Età: 80
Utente Senior
Excel2019
OFFLINE
06/02/2017 23:10

Ciao
Voglio sperare che (come ha detto alfrimpa - ciao Alfredo) qualcosa di VBA la mastichi
Ti allego il file ma le due macro sono le seguenti
Option Explicit

Sub Cerca()
Dim prov As String, comn As String, loca As String, valu As String
Dim a As Long, i As Long, ur As Long
prov = Cells(2, 2).Value
comn = Cells(2, 3).Value
loca = Cells(2, 4).Value
valu = Cells(2, 5).Value

a = 6
ur = Sheets("ELENCO").Cells(Rows.Count, 1).End(xlUp).Row
With Sheets("ELENCO")
    For i = 2 To ur
        If .Cells(i, 1) = prov And .Cells(i, 2) = comn And _
            .Cells(i, 3) = loca And .Cells(i, 4) = valu Then
           
            .Range("A" & i & ":F" & i).Copy
            Range("A" & a).PasteSpecial
            a = a + 1
        End If
    Next i
End With
Cells(5, 7).Select
End Sub

Sub Cancella()
Dim ur As Long
ur = Sheets("RICERCA").Cells(Rows.Count, 1).End(xlUp).Row + 1
Range("A6:F" & ur).ClearContents
End Sub



Clicca sui pulsanti blu.

Ciao,
Mario

PS nel caso il file non si vedesse copia le due macro e mettile in un Modulo standard e associale a due pulsanti.
Post: 87
Registrato il: 06/02/2008
Utente Junior
excel 2010
OFFLINE
07/02/2017 08:00

Buongiorno, per quanto riguarda il VB sono zero, spero di saltarci fuori. Provato la soluzione direi che funziona, però quando seleziono una provincia, nella seconda condizione mi deve far vedere solo i comuni di quella provincia, idem per le altre condizioni, manca come ultima cosa la possibilità di accorciare gli elenchi eliminando i doppioni lasciando uno sola voce per ogni elemento.

Grazie di cuore per l'aiuto e per la solerte risposta al mio problema.
[SM=x423017] [SM=x423028] [SM=x423028] [SM=x423028]
[Modificato da 8scatti 07/02/2017 08:40]
(Vers. Excel 2007/2010)
Post: 326
Registrato il: 24/06/2015
Città: CATANIA
Età: 80
Utente Senior
Excel2019
OFFLINE
07/02/2017 08:53

Ciao
se, come dici, "sei digiuno di VBA allora è meglio usare le Pivot.

Ciao,
Mario
Post: 88
Registrato il: 06/02/2008
Utente Junior
excel 2010
OFFLINE
07/02/2017 11:21

Mario buongiorno, ti ringrazio per la soluzione in VB inviatami, anche se non utilizzo il VB, avendo una soluzione posso sempre cercare di capirci qualcosa. La mia era solo una richiesta per semplificare il tutto nella ricerca di un dato da un elenco con più condizioni, senza utilizzare il Filtro e la Tabella Pivot, quindi ben vengano altre soluzioni compreso il VB.

Ciao ciao [SM=x423024] [SM=x423024]
(Vers. Excel 2007/2010)
Post: 327
Registrato il: 24/06/2015
Città: CATANIA
Età: 80
Utente Senior
Excel2019
OFFLINE
07/02/2017 23:07

Ciao
mi sono buscata un'influenza (febbre alta, tosse, naso-rubinetto) ed ho potuto dedicarci poco tempo.
Se vuoi imparare ecco un'ottima palestra che tocca tanti aspetti del Visual Basic for Application.

Ho dovuto cambiare qualcosa nel tuo schema (specie nel foglio PASSAGGI che ho utilizzato come base per province, comuni di ciascuna provincia, e poi le condizioni 3, 4 e 5 (sensibilmente ridotte).

Vedi cosa te ne sembra all'utilizzo. Quindi passa a studiare il codice. Alla fine farai lavori più importanti di questo.

Ora vado a letto con una buona Aspirina ed altre pasticche che il medico dice sono necessarie (ha anche aggiunto "vista l'età". Ma come si permette! Un giovanotto come me! Appena mi riprendo ...)

Ciao,
Mario

PS Dimenticavo: puoi aggiungere tutti i comuni che vuoi, Excel legge la riga dove arriva quella provincia ed elenca tutto.
Post: 89
Registrato il: 06/02/2008
Utente Junior
excel 2010
OFFLINE
08/02/2017 00:09

Mario buongiorno, mi dispiace per l'influenza ma per guarire devi solo stare a riposo, se puoi evita qualsiasi medicina, domani guarderò le tue modifiche, grazie ancora per il tempo che mi dedichi. Ti auguro una pronta guarigione.

Buona notte [SM=x423066] [SM=x423066] [SM=x423066]
(Vers. Excel 2007/2010)
Post: 90
Registrato il: 06/02/2008
Utente Junior
excel 2010
OFFLINE
08/02/2017 20:26

Mario buonasera, spero tu stia meglio, le medicine hanno fatto effetto??? Spero di si.

Controllato la versione nuova, ci sono alcune cose che non vanno:

1) Quando clicco sul pulsante cancella, cancella solo il risultato ottenuto, mentre rimangono le condizioni, dovrebbero essere cancellate tutte e due.

2) Ti invio alcune foto delle ricerche, in una vedrei che il risultato non è corretto

3) Dopo alcune ricerche vengono cancellate le intestazioni.

4) Cliccando su Cerca e Cancella dopo alcune prove , esce errore di run-time 13'

5) Se era fattibile [SM=x423023] quando effettuo la ricerca selezionando anche solo il primo campo la visualizzazione di quella scelta.

esempio: se scelgo Milano farmi vedere solo tutti i locali Milano
se scelgo Milano - Abbiategrasso solo tutti i locali di Abbiategrasso.
Idem per le altre selezioni.

Ora ci vuole una bella spremuta di arance con tanta vitamina C !!!

Ciao ciao [SM=x423028]

(Vers. Excel 2007/2010)
Post: 328
Registrato il: 24/06/2015
Città: CATANIA
Età: 80
Utente Senior
Excel2019
OFFLINE
09/02/2017 08:38

Ciao
Grazie per gli auguri di pronta guarigione. Le medicine hanno (quasi) fatto il loro dovere ma gli antibiotici ti buttano giù. Ora sto molto meglio.

Veniano al nostro problema. Il lavoro precedente direi di cestinarlo per due motivi: 1° perchè la febbre mi ha fatto commettere degli errori che tu hai evidenziato; 2° perchè la tua richiesta attuale è alquanto diversa dalla iniziale.

Ti allego il file in cui succede questo:
- ogni volta che selezioni una cella delle condizioni, tutte le altre a destra vengono cancellate e la ricerca effettuata sulla base dei dati presenti (foss'anche solo il primo, cioè la provincia);
- per cancellare tutto basta cancellare il dato della Provincia.

Vedi se così è meglio.

Ciao,
Mario
Post: 91
Registrato il: 06/02/2008
Utente Junior
excel 2010
OFFLINE
09/02/2017 13:45

Mario buon pomeriggio, felice di sentirti meglio, dopo la giornata di ieri dove non eri messo bene, ma si vede che l'aria Siciliana di giova ad un recupero veloce.
Provato il nuovo progetto mi sembra che vada bene, ora dovrò andare nella sezione sviluppo per capire come adattarlo al mio che si trova in fogli, celle e righe diverse, spero di non fare confusione.
Ti ringrazio ancora per l'aiutato, avendolo effettuato in giornate dove l'influenza certo, non ti aiutava.

Alla prossima.

Ciao ciao [SM=x423063]
(Vers. Excel 2007/2010)
Vota:
Amministra Discussione: | Chiudi | Sposta | Cancella | Modifica | Notifica email Pagina precedente | 1 | Pagina successiva
Nuova Discussione
 | 
Rispondi
Cerca nel forum
Tag discussione
Discussioni Simili   [vedi tutte]
Filtro Tabella PIVOT (3 messaggi, agg.: 30/05/2019 13:46)
Filtro Tabella PIVOT (3 messaggi, agg.: 14/06/2019 14:49)
Feed | Forum | Bacheca | Album | Utenti | Cerca | Login | Registrati | Amministra
Tutti gli orari sono GMT+01:00. Adesso sono le 09:08. Versione: Stampabile | Mobile | Regolamento | Privacy
FreeForumZone [v.6.1] - Copyright © 2000-2024 FFZ srl - www.freeforumzone.com