Newsgroup: it.comp.lang.visual-basic
Titolo: Percorso su barra in excel/word

nascosto...
Penso che un'alternativa possa essere creare sul modello normale una label
posizionabile ad esempio sulla barra degli strumenti in cui una macro
autoavviante vada a scrivere percorso completo e nomefile: e` possibile
fare una cosa del genere con VBA?
--
Ciao,
      Peppo
 
ICQ    : UIN 5709387

 fare una cosa del genere con VBA?
Private Sub Workbook_Open()
  Application.Caption = "Pippo"
End Sub
Ciao.
Maurizio

End Sub
Ti ringrazio moltissimo per la risposta, ma non ho dimestichezza con queste
cose: come si fa a farsi restituire il nome del file che si sta aprendo
completo di percorso? (come mai CutDir mi restituisce sempre la directory
dei documenti?)
Sicuramente poi avro` bisogno di un altra dritta: si puo` e come si fa a
fare in modo che il modello aperto di default sia un proprio file salvato
ovviamente come modello?


 ovviamente come modello?
Posso rispondere adesso o devo aspettare tue notizie? (2)
Ciao.
Maurizio
(1) E' una battuta.
(2) Questo invece e' uno scherzo. Pero', perdonami, non ho ben capito cosa
vuoi fare. Vuoi creare un tuo nuovo modello, personalizzato in base alle tue
esigenze?
M.

esigenze?
Un modello l'avrei anche creato, nel senso che ho salvato il file con
dentro il modulino come MioModello.xlt e posso aprirlo aprendo un nuovo
file. Vorrei pero` capire se posso sostituire il modello standard, Cartelx
per intenderci. Poi magari mi pento ma vorrei che quando apro excel carichi
il mio modello di default.
Naturalmente non so come ringraziarti per il thread e per il tempo che ti
faccio perdere con le mie banalita`: spero solo stiano servendo anche ad
altri.


 Office97)
Gia', scusa. Avrei dovuto immaginarlo che... ci cascavi. Non ti preoccupare:
e' capitato a tutti, tranne a quelli che sono nati "imparati", beati loro.
"Workbook_Activate", come dovrebbe far sospettare il modo in cui e' scritta,
e' una procedura-evento, in questo caso l'evento "Activate" dell'oggetto
"Workbook".
Analogamente a quanto faresti con, per esempio, un pulsante di nome
"MioPulsante" al quale volessi far eseguire qualcosa allo scatenarsi
dell'evento "Click" andando a scrivere il tuo codice nella procedura-evento
"MioPulsante_Click", cosi', per gli eventi "Activate" e "Deactivate", devi
cercare nel progetto VBA l'oggetto "ThisWorkbook", aprirne il modulo del
codice, quindi sfogliare la casella a scorrimento degli oggetti, quella dove
vedi scritto "(generale)", e selezionare l'unico oggetto presente:
"Workbook", appunto. Nella casella a scorrimento delle "Routine", alla
destra di quella "Oggetti", dove prima c'era scritto "(dichiarazioni)"
comparira' l'elenco degli eventi predefiniti dell'oggetto selezionato. Fra
questi troverai i citati "Activate" e "Deactivate". Spero di essere stato
comprensibile.
Per ora mi limito a questo.
Per l'altro argomento potresti aprire un thread separato, magari in un solo
ng.
Ciao.
Maurizio

 cercare nel progetto VBA l'oggetto "ThisWorkbook", aprirne il modulo del
Colgo occasione per fare una domanda inerente l'argomento.
Proprio in Workbook_Activate, ieri in ufficio ho cercato di
personalizzare i menu' di un mio amico. La stranezza č che la
routine funziona bene da sola (l'ho provata prima con il nome
"Prova") ma quando l'ho spostata all'interno di Workbook_Activate,
non parte. Ancora piů strano: isolo di nuovo la routine, ora
CreateMenu, e da Workbook_Activate la chiamo e... tutto funziona.
Mah... Stranezze del genere ne ho viste tante nelle proc evento
ma in questo caso non riesco a darmi una spiegazione.
Qualcuno sa cosa succede? Grazie
Alessandro

vedi scritto "(generale)", e selezionare l'unico oggetto presente:
perfetto ora funziona, grazie.
Non sapevo neanche che fosse possibile inserire codice in ThisWorkbook, ho
sempre inserito il codice aprendo dei moduli o specificatamente in un
foglio. 


 foglio.
;)
Ciao.
Maurizio
P.S.: Non sono pratico di "faccine", spero sia quella giusta per indicare un
sorriso di simpatia, un po' sornione, leggermente cinico, con una vena amara
per il tempo (mio) passato davanti al monitor, e un leggero sarcasmo tipo
"ne devi mangiare di panini, untorello" migato e reso meno spocchioso dal
brillio degli occhi dietro le spesse lenti.

 CreateMenu, e da Workbook_Activate la chiamo e... tutto funziona.
[...]
Come e' andata a finire?
--
Ciao.
Maurizio

 Come e' andata a finire?
Ho desistito nella ricerca di una spiegazione e mi sono dedicato
alle routine di servizio. Forse un giorno ci tornerò su.
Alessandro