È soltanto un Pokémon con le armi o è un qualcosa di più? Vieni a parlarne su Award & Oscar!
 
Pagina precedente | 1 | Pagina successiva
Vota | Stampa | Notifica email    
Autore

Menu a tendina sotto condizione

Ultimo Aggiornamento: 01/11/2015 15:13
Post: 1
Registrato il: 31/10/2015
Città: CATANIA
Età: 30
Utente Junior
2010
OFFLINE
31/10/2015 23:03

Ragazzi vi spiego il mio problema. Vorrei che nel foglio FATTURA venga visualizzato, nel menu a tendina del "Fatt n.", solo i numeri delle fatture presenti nel foglio dell'azienda selezionata.
Esempio:
alla voce spett.le scelgo Azienda1 -> nell'elenco Fatt. n. voglio siano presenti solo le fatture nel foglio FATTURE Azienda1.

Grazie in anticipo per l'aiuto.
[Modificato da Angelo.Puglisi 31/10/2015 23:12]
Post: 46
Registrato il: 10/10/2013
Città: VICENZA
Età: 69
Utente Junior
365
OFFLINE
01/11/2015 01:13

ciao

la cosa più semplice è

Private Sub Worksheet_Change(ByVal Target As Range)


If Range("G9") = "Azienda 1" Then

Range("D9").Select
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="='FATTURE Azienda1'!$B$5:$B$29"
End With
ElseIf Range("G9") = "Azienda 2" Then
Range("D9").Select
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="='FATTURE Azienda2'!$B$5:$B$29"
End With
End If

End Sub

da mettere sul foglio Fatture

e così via per ogni cliente ( un elseif )
ma immagino ci sia qualcosa di meno laborioso da scrivere [SM=g27827]
Post: 182
Registrato il: 02/08/2015
Utente Junior
Excel 2013
OFFLINE
01/11/2015 13:05

Ciao a tutti,
@Angelo.Puglisi
credo che ti basti cambiare la formula nel campo "origine" del "convalida dati" per la cella "D9" del foglio "FATTURA".

La formula da usare è questa:

=INDIRETTO("'FATTURE "&SOSTITUISCI(FATTURA!$G$9;" ";"")&"'!$B$5:$B$"&5+CONTA.VALORI(INDIRETTO("'FATTURE "&SOSTITUISCI(FATTURA!$G$9;" ";"")&"'!$B$5:$B$104")))

Ti lascio il tuo file con la formula già inserita...


"Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."
Post: 1
Registrato il: 31/10/2015
Città: CATANIA
Età: 30
Utente Junior
2010
OFFLINE
01/11/2015 15:12

Re:
cromagno, 01/11/2015 13:05:

Ciao a tutti,
@Angelo.Puglisi
credo che ti basti cambiare la formula nel campo "origine" del "convalida dati" per la cella "D9" del foglio "FATTURA".

La formula da usare è questa:

=INDIRETTO("'FATTURE "&SOSTITUISCI(FATTURA!$G$9;" ";"")&"'!$B$5:$B$"&5+CONTA.VALORI(INDIRETTO("'FATTURE "&SOSTITUISCI(FATTURA!$G$9;" ";"")&"'!$B$5:$B$104")))

Ti lascio il tuo file con la formula già inserita...



Grazie mille, proprio quello di cui avevo bisogno mi sei stato davvero di grande aiuto.


Post: 2
Registrato il: 31/10/2015
Città: CATANIA
Età: 30
Utente Junior
2010
OFFLINE
01/11/2015 15:13

Re:
federico460, 01/11/2015 01:13:

ciao

la cosa più semplice è

Private Sub Worksheet_Change(ByVal Target As Range)


If Range("G9") = "Azienda 1" Then

Range("D9").Select
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="='FATTURE Azienda1'!$B$5:$B$29"
End With
ElseIf Range("G9") = "Azienda 2" Then
Range("D9").Select
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="='FATTURE Azienda2'!$B$5:$B$29"
End With
End If

End Sub

da mettere sul foglio Fatture

e così via per ogni cliente ( un elseif )
ma immagino ci sia qualcosa di meno laborioso da scrivere [SM=g27827]



La soluzione proposta sotto è di più facile applicazione, ma grazie anche a te per l'aiuto e la disponibilità.
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]
Feed | Forum | Bacheca | Album | Utenti | Cerca | Login | Registrati | Amministra
Tutti gli orari sono GMT+01:00. Adesso sono le 00:09. Versione: Stampabile | Mobile | Regolamento | Privacy
FreeForumZone [v.6.1] - Copyright © 2000-2024 FFZ srl - www.freeforumzone.com