Elenco dipendente da una cella

Hai un problema con Excel?

Nuova discussione

Elenchi dipendenti
di Olino (utente non iscritto) data: 06/05/2009
Salve a tutti, ho un quesito da sottoporre:come faccio a creare su una stessa riga, ma su una seconda colonna, un elenco che dipende da quello che ho inserito nella prima colonna?
sono giorni che provo ogni tipo di funzione ma non ne riesco a venire a capo... qualcuno può aiutarmi?
di Ricky53 data: 06/05/2009
Ciao, prova con dati, convalida, elenco e qui inserisci un nome elenco o l'intervallo delle celle della colonna che ti interessa.
ciao da ricky53
di Olino (utente non iscritto) data: 06/05/2009
Innanzitutto grazie della risposta... ma forse mi sono spiegato male o quantomeno non ho spiegato bene quello che devo fare...
ho bisogno di fare in modo di avere un elenco diverso,in una determinata cella, a seconda di quello che c'è nella cella precedente...es. di abbigliamento. ho un elenco delle stagioni e un elenco dei modelli. naturalmnente alcuni modelli fanno riferimento a una stagione e altri ad un'altra. sulla prima colonna seleziono la stagione da un elenco a discesa. sulla seconda però vorrei avere un elenco a discesa che dipende da cosa ho inserito nella prima.
si può fare?
grazie in anticipo!

di Alabtros (utente non iscritto) data: 06/05/2009
Allora, se mastichi un po di vba possiamo risolvere il problemino.
nella colonna j1 ho inserito un elenco e gli ho dato il nome elenco.
nella colonna k1:m1 ho inserito dei dati, che tu andrai ha stostituire con le voci che ti interessano, che corrispondono alle voci dei capi inverno
nella colonna k2:m2 ho inserito dei dati, che tu andrai ha stostituire con le voci che ti interessano, che corrispondono alle voci dei capi estate
nella colonna k3:m3 ho inserito dei dati, che tu andrai ha stostituire con le voci che ti interessano, che corrispondono alle voci dei capi autunno.
nella cella a1 ho innserito tramite il comando canvalida, una casella ha discesa con i dati che vengono prelevati da elenco.
in c1 troverai la casella ha discesa delle voci dei vari capi.
in un modulo incolla le sub che ti posto.
nel foglio1 incolla l'evento worksheet_change(byval target as range) .
naturalmente il tutto funziona , solo che lo devi adattare alle tue esegenze.
in allegato ti posto il file
fai sapere
albatros

Sub inverno()

'

' Macro registrata il 11/09/2006 da albatros
'

'
   Range("c1").Select
    With Selection.Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="=uno"
        .IgnoreBlank = True
        .InCellDropdown = True
        .InputTitle = "Emocromo"
        .ErrorTitle = "Albatros Informa"
        .InputMessage = "Seleziona la voce da Elenco"
        .ErrorMessage = " Valore non Ammesso Seleziona da Elenco"
        .ShowInput = True
        .ShowError = True
    End With

End Sub
Sub estate()

'

' Macro registrata il 11/09/2006 da albatros
'

'
   Range("c1").Select
    With Selection.Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="=due"
        .IgnoreBlank = True
        .InCellDropdown = True
        .InputTitle = "Emocromo"
        .ErrorTitle = "Albatros Informa"
        .InputMessage = "Seleziona la voce da Elenco"
        .ErrorMessage = " Valore non Ammesso Seleziona da Elenco"
        .ShowInput = True
        .ShowError = True
    End With

End Sub

Sub autunno()

'

' Macro registrata il 11/09/2006 da albatros
'

'
   Range("c1").Select
    With Selection.Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="=tre"
        .IgnoreBlank = True
        .InCellDropdown = True
        .InputTitle = "Emocromo"
        .ErrorTitle = "Albatros Informa"
        .InputMessage = "Seleziona la voce da Elenco"
        .ErrorMessage = " Valore non Ammesso Seleziona da Elenco"
        .ShowInput = True
        .ShowError = True
    End With

End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
valore = Cells(1, 1)
Select Case valore
Case "inverno"
Call inverno
Case "estate"
Call estate
Case "autunno"
Call autunno
End Select
End Sub

di Albatros (utente non iscritto) data: 06/05/2009
Oppps... scusate il nick è albatros errore di scrittura
ciao
albatros
di Franco_44 (utente non iscritto) data: 06/05/2009
Ciao
prova a vedere l'allegato se ti può essere utile
fai sapere
di Ricky53 data: 06/05/2009
Ciao,
ti allego un file con la convalida: è più facile farla che spiegarla.
il file allegato utilizza due celle con la convalida:
1. la prima cella sulle stagioni
2. la seconda cella sui vestiti

tutte e due le celle utilizzano “nomi elenco” come detto nel mio precedente intervento.
nel file trovi le spiegazioni.

ciao da ricky53
di Ricky53 data: 06/05/2009
Ciao franco,
a pochi secondi uno dall'altro abbiamo dato una soluzione con lo stesso metodo: che sintonia.
a presto.

ciao d ricky53
di Olino (utente non iscritto) data: 07/05/2009
Grazie ragazzi! provo subito... spero di riuscirci... se ho altri problemi vi posso contattare ancora vero? grazie ancora!
di Ricky53 data: 07/05/2009
Ciao,
certamente si.
ci trovi pronti per intervenire in tuo soccorso ma dai che non ne avrai bisogno.

ciao da ricky53
di Ricky53 data: 10/05/2009
Ne sei venuto fuori?

ciao da ricky53
di Olino (utente non iscritto) data: 10/05/2009
Problema risolto grazie! i file che mi avete allegato sono stati molto utili!
adesso sono alle prese con un altro problemino e mi sono già permesso di chiedere nuovamente consiglio...
grazie ancora!
di Ricky53 data: 11/05/2009
Ciao,
bene.
passiamo alla prossima tua necessità.
ciao da ricky53

Vuoi Approfondire?