Funzione trova



  • Funzione trova
    di Michele (utente non iscritto) data: 15/10/2012 09:14:47

    Buongiorno a tutti,
    qualcuno mi può aiutare a trovare una soluzione su un quesito trova testo in Excel 2003.
    Vorrei inserire nella barra degli strumenti uno spazio vuoto dove all'interno vorrei digitare del teso composto da numeri e lettere
    da trovare nel foglio di lavoro nel quale stò lavorando.
    E' piu o meno la stessa cosa del trova ma se possibile senza la finestra di collegamento,
    praticamente vorrei digitare il testo direttamente direttamente in uno spazio vuoto dedicato all'interno della barra degli strumenti.
    Grazie
    Michele



  • di Vecchio Frac data: 15/10/2012 10:08:00

    Vuoi una casella di testo in una barra strumenti personalizzata.
    Temo che non si possa fare.
    Tempo fa volevo fare anch'io qualcosa di simile ma poi mi ero arenato perché non trovavo una soluzione.
    Ben felice che qualcuno mi smentisse ^_^





  • di Michele (utente non iscritto) data: 15/10/2012 10:54:48

    Si potrebbe fare : trova il nome del scenario è che non sò come si scrive nella macro
    Cells.Find ("Nome del scenario")
    If Not (c Is Nothing) Then
    'la cella esiste ed è stata trovata, viene attivata
    c.Select



  • di Vecchio Frac data: 15/10/2012 11:36:40

    Il problema non è trovare il testo all'interno del foglio, quello lo so fare ^_^
    Il problema è che non si può avere una casella di testo dentro una barra strumenti personalizzata, come hai chiesto tu, che funzioni come una casella di ricerca (magari!).





  • di Michele (utente non iscritto) data: 15/10/2012 11:41:09

    OK,
    ma non posso fare una macro che cerchi il nome del scenario?



  • di Vecchio Frac data: 15/10/2012 11:54:52

    Certo che puoi.
    E la puoi associare a un pulsante da premere, posto all'interno della barra personalizzata.
    Ma questa è allora una richiesta diversa da quella iniziale ^_^





  • di Michele (utente non iscritto) data: 15/10/2012 12:38:44

    E come si fà che non ci riesco !



  • di Vecchio Frac data: 15/10/2012 13:37:12

    Ma come no?
    L'hai già scritta prima! :D

    set c = Activesheet.Cells.Find ("testo da cercare")
    If Not (c Is Nothing) Then
    'la cella esiste ed è stata trovata, viene attivata
    c.Select
    End If