Moderatori: Anthony47, Flash30005
=INDIRETTO("[Listino_Sfere.xls]"&Ref!$T$154&"!$C$2")
=CERCA.VERT(F5;INDIRETTO("[Listino_Sfere.xls]"&Ref!$T$154&"!A1:Z1000");SE(O(B57="CBCM";B57="CBCM-C";B57="CBLM";B57="CBLM-C");17;20);0)
Anthony47 ha scritto:Il file Listino_Sfere deve essere aperto.
Anthony47 ha scritto:Non ho capito quale e' la cella "IJ16. quella con la scritta in rosso per essere chiari"; se e' sul foglio Riepilogo la formula per leggere il prezzo sara'
- Codice: Seleziona tutto
=CERCA.VERT(F5;INDIRETTO("[Listino_Sfere.xls]"&Ref!$T$154&"!A1:Z1000");SE(O(B57="CBCM";B57="CBCM-C";B57="CBLM";B57="CBLM-C");17;20);0)
Anthony47 ha scritto:Nota che hai un problema in quanto nella F5 di Riepilogo io leggo "S-100/225", mentre nel file Listino_Sfere il codice e' riportato come "S - 100/225" (nota gli spazi aggiuntivi).
Ciao
=SE(Ref!$T$154="Nico.Fer";' G:\OFFERTE\ITALIANO \[ Listino_Sfere.xls]Nico.Fer'!$K$11; SE(Ref!$T$154="Caltiber";' G:\OFFERTE\ITALIANO \[ Listino_Sfere.xls]Caltiber'!$K$11;"ZZ"))
In alternativa scrivi una formula un po' piu' articolata del tipo
CODICE: SELEZIONA TUTTO
=SE(Ref!$T$154="Nico.Fer";' G:\OFFERTE\ITALIANO \[ Listino_Sfere.xls]Nico.Fer'!$K$11; SE(Ref!$T$154="Caltiber";' G:\OFFERTE\ITALIANO \[ Listino_Sfere.xls]Caltiber'!$K$11;"ZZ"))
Il problema potrebbe sorgere con molte piu' scelte di quelle che hai oggi.
=SE(Ref!$T$154="Nico.Fer";' G:\OFFERTE\ITALIANO \[ Listino_Sfere.xls]Nico.Fer'!$K$11; SE(Ref!$T$154="Caltiber";' G:\OFFERTE\ITALIANO \[ Listino_Sfere.xls]Caltiber'!$K$11;"ZZ"))
=SE(Ref!$T$154="Nico.Fer";CERCA.VERT(F5;' G:\OFFERTE\ITALIANO \[ Listino_Sfere.xls]Nico.Fer'!A1:Z1000;SE(O(B57="CBCM";B57="CBCM-C";B57="CBLM";B57="CBLM-C");17;20);0); SE(Ref!$T$154="Caltiber";CERCA.VERT(F5;' G:\OFFERTE\ITALIANO \[ Listino_Sfere.xls]Caltiber'!A1:Z1000;SE(O(B57="CBCM";B57="CBCM-C";B57="CBLM";B57="CBLM-C");17;20);0);"ZZ"))
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Workbooks("Listino_Sfere.xls").Close Savechanges:=False
End Sub
Private Sub Workbook_Open()
Workbooks.Open Filename:= _
"G:\OFFERTE\ITALIANO \Listino_Sfere.xls", ReadOnly:=True
End Sub
=SE(Ref!$T$154="Nico.Fer";CERCA.VERT(C16;' G:\OFFERTE\ITALIANO \[ Listino_Sfere.xls]Nico.Fer'!A1:Z1000;SE(O(Riepilogo!$B$57="CBCM";Riepilogo!$B$57="CBCM-C");17;20);0); SE(Ref!$T$154="Caltiber";CERCA.VERT(C16;' G:\OFFERTE\ITALIANO \[ Listino_Sfere.xls]Caltiber'!A1:Z1000;SE(O(Riepilogo!$B$57="CBCM";Riepilogo!$B$57="CBCM-C");17;20);0);"ZZ"))
=SE(Ref!T154="Nico.Fer";CERCA.VERT(QGL10.03b!C16;[Listino_Sfere.xls]Nico.Fer!A1:Z1000;SE(O(Riepilogo!$B$57="CBCM";Riepilogo!$B$57="CBCM-C");17;20);0);SE(Ref!T154="Caltiber";CERCA.VERT(QGL10.03b!C16;[Listino_Sfere.xls]Caltiber!A1:Z1000;SE(O(Riepilogo!$B$57="CBCM";Riepilogo!$B$57="CBCM-C");17;20);0);"ZZ"))
=SE(Ref!T154="Nico.Fer";CERCA.VERT(QGL10.03b!C16;[Listino_Sfere.xls]Nico.Fer!A1:Z1000;SE(O(Riepilogo!$B$57="CBCM";Riepilogo!$B$57="CBCM-C");17;20);0);SE(Ref!T154="Caltiber";CERCA.VERT(QGL10.03b!C16;[Listino_Sfere.xls]Caltiber!A1:Z1000;SE(O(Riepilogo!$B$57="CBCM";Riepilogo!$B$57="CBCM-C");17;20);0);"ZZ"))
Troppo buono.Comunque sia siamo riusciti nell'intento e questo è merito tuo
Torna a Applicazioni Office Windows
File batch per copiare file selezionato da menu contestuale Autore: valle1975 |
Forum: Programmazione Risposte: 3 |
Aumenta altezza riga in base valore cella Autore: trittico69 |
Forum: Applicazioni Office Windows Risposte: 47 |
Creare un file Excel con fogli visibili in base all'accesso Autore: JanVathek |
Forum: Applicazioni Office Windows Risposte: 28 |
Visitano il forum: Nessuno e 21 ospiti