Controlli ActiveX "scomparsi"

[dipdip]

Buongiorno a tutti!

Dopo aver lavorato per tutto il pomeriggio su un file Excel in cui ho inserito 17 controlli ActiveX e creato le relative PrivateSub, ho salvato e chiuso il file scoprendo che alla sua riapertura, i controlli erano scomparsi mentre le PrivateSub sono ancora presenti.

Credo che da qualche parte esistano ancora e siano solamente "invisibili", perché se inserisco un nuovo controllo questo prende il numero 18.

Qualcuno ha già sperimentato qualcosa di simile con Excel 2013 o sa per favore come aiutarmi a recuperarli?

Ringrazio sin d'ora tutti coloro che potranno aiutarmi.

Ciao!

Fabio

[Anthony47]

Se hai ancora il codice significa che hai anche i nomi; allora dal vba premi Contr-g per aprire la "Finestra Immeediata"; poi per ogni controllo imposta su True la proprieta' Visible.
Ad esempio digita:

Codice: Seleziona tutto

activesheet.commandbutton21.visible=true


Ciao

[dipdip]

Ciao Anthony,

grazie innanzitutto per la risposta, ho provato a fare quanto mi hai spiegato ma non succede nulla, non so se sono io che ho fatto qualche errore. Quando premo CTRL + G nel VBA appare una finestra IMMEDIATA vuota, ho incollato la stringa

activesheet.optionbutton1.visible=true

ma poi non succede nulla, ne salvando il file e neppure riaprendolo.

Ho anche provato a creare una macro auto_open con la stessa stringa ma pure in questo caso nessun effetto.

Se ci fosse un modo di inviarti il file potrei eventualmente girartelo per maggior chiarezza... Purtroppo non sono esperto di VBA, ogni aiuto sarebbe davvero importante.

Grazie mille!

Fabio

[ricky53]

Ciao,
per allegare un file leggi QUI

[dipdip]

Grazie Ricky, ecco qui il link:

http://www.filedropper.com/nuovacodifica

provato e funzionante.

Fabio

[wallace&gromit]

trovati!
guarda alla riga 1048576!

[dipdip]

Ciao Wallace, grazie mille!!!

Ma che ****** ci facevano lì sotto??? Questo avvalora sempre più la mia tesi che Office 2013 è un programma "zoppo" ...

Ringrazio comunque anche Anthony e Ricky che si sono dati da fare per aiutarmi, grazie davvero a tutti.

Se posso azzardare, vorrei porre un quesito ulteriore: sto cercando di far si che il testo che si trova nelle 3 caselle ActiveX venga trasferito ad una cella ma ho trovato solamente il passaggio contrario, cioè da cella a casella.

Qualcuno sa come sia fattibile?

Grazie, ciao!

Fabio

[wallace&gromit]

nella proprietà del controllo (clic destro in modalità progettazione del menu sviluppo) trovi una riga "LinkedCell", devi inserire il riferimento alla cella, poi funziona nelle due direzioni.

[dipdip]

Ottimo, quello che cercavo, grazie ancora Wallace.

Buona serata!

Fabio

[Anthony47]

La prossima volta parti col comando

Codice: Seleziona tutto

?activesheet.combobox21.topleftcell.address


Restituisce la cella dove l' oggetto giace.

Ciao a tutti.

[dipdip]

Grazie Anthony, ne farò tesoro.

'Notte!

Fabio