[VB E Excel] Passaggio argomento durante un coll. ipertestuale

[Teo@Unix]

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]

up....

[Teo@Unix]

.... qualcuno sa aiutarmi? ... è possibile istruire un filtro in questo modo?

[zuper]

sorry, per forza coll ipertestuale?

nn andrebbe bene una combo box?



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

[Teo@Unix]

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]

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]

mentre postavo mi sono chiesto perchè complicarmi la vita con la combo box

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]

grazie mille della dritta zuper!
entrambi i modi dovrebbero andar bene! ... che richieste che mi fanno gli utenti! ....

[zuper]

Originariamente inviato da Teo@Unix

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

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