PDA

View Full Version : [VB E Excel] Passaggio argomento durante un coll. ipertestuale


Teo@Unix
11-01-2010, 10:05
Allora la cosa forse è un pò complessa, non ho idea se si può fare...

Mi è stato richiesto se esiste un modo in Excel 2007, che alla selezione di un collegamento ipertestuale, possa essere passata una stringa di testo (quella nella cella in questione) al documento di destinazione dove, questa, va a fungere da filtro per una tabella pivot.... prima di mettermi a sfogliare i manuali di VB.... vi chiedo se secondo voi si può fare.

Grazie.

Teo@Unix
12-01-2010, 20:25
up....

Teo@Unix
19-01-2010, 17:22
.... qualcuno sa aiutarmi? ... è possibile istruire un filtro in questo modo?

zuper
19-01-2010, 19:25
sorry, per forza coll ipertestuale?

nn andrebbe bene una combo box?

:sofico:

Sub DropDown2_Change()

With ActiveSheet.Shapes(Application.Caller)
Select Case .ControlFormat.ListIndex
Case 1
ActiveSheet.Range("$A$1:$A$4").AutoFilter Field:=1, Criteria1:="ciao"
Case 2
ActiveSheet.Range("$A$1:$A$4").AutoFilter Field:=1, Criteria1:="due"
End Select
End With
End Sub

e all'interno dei vari case apri il foglio che ti serve e filtri :D:D

Teo@Unix
20-01-2010, 08:38
grazie.

ok, si penso vada bene comunque, riesci ad allegarmi un esempio stupido? Purtroppo non ho molto tempo per guardarmi come funziona VB...
Presumo si debba mettere anche una funzione su Load() nella'altra cartella o foglio do c'è la pivot da filtrare..
riesci a farmi due forgli excel dove ci butti dentro l'esempio? te ne sarei grato....

zuper
20-01-2010, 19:48
nello zip ci sono 2 files

nel combo.xls c'è il file appunto con la combobox

vanno solo "uno" e "due"

quando selezioni uno di quei due la macro che ci sta sotto apre l'altro foglio e seleziona il filtro...

è una cosa assolutamente basilare...però per darti un'idea di come funziona va bene :)

PS: unzippa tutto nella c:\temp oppure nella macro setta il path completo

zuper
20-01-2010, 19:56
mentre postavo mi sono chiesto perchè complicarmi la vita con la combo box :D:D

e pensavo che basta creare tante piccole macro da assegnare a dei bottoni :)

crei un bottone e gli assegni questa macro

Sub uno()
Workbooks.Open ("c:\temp\open.xls")
ActiveSheet.Range("$A$1:$A$4").AutoFilter Field:=1, Criteria1:="uno"
End Sub

(si parla sempre del foglio allegato :))

si ok è uno sbatti creare tutte le macro e tutti i bottoni....però se proprio ti serve :)

Teo@Unix
20-01-2010, 20:12
grazie mille della dritta zuper!
entrambi i modi dovrebbero andar bene! ... che richieste che mi fanno gli utenti! ....;)

zuper
20-01-2010, 20:19
grazie mille della dritta zuper!
entrambi i modi dovrebbero andar bene! ... che richieste che mi fanno gli utenti! ....;)

ehehehehe dopo anni e anni di tale lavoro ho imparato a soddisfarli :D:D

passagli la TUA soluzione come l'unica applicabile e quindi la migliore per loro....e accettano quasi di tutto :P:P