Combobox Activex non si aggiorna automaticamente

Question

Buon giorno,

Ho un file con una Combobox Activex.

Come Listfillrange della Combobox ho assegnato un etichetta Dati denominata "NOMI".

Sotto Formule>Gestioni Nomi ho assegnato all'etichetta NOMI la seguente formula:

=SCARTO(DATABASE!$JJ$6;;;301-CONTA.SE(DATABASE!$JJ$6:$JJ$305;"");)

Ho così creato un elenco di nomi dinamico che si modifica in funzione dei dati che inserisco nella colonna JJ del DATABASE.

Purtroppo la Combobox ActiveX a cui è associata l'etichetta NOMI non si aggiorna dopo che ho modificato i nomi nella colonna JJ del DATABASE.

Mi tocca salvare, uscire dal file e rientrare; solo così trovo la Combobox con l'elenco dei nomi aggiornati.

Esiste un modo per Bypassare il problema?

Esiste un codice VBA che mi modifica il contenuto della ListFillRange della Combobox ActiveX o che ne aggiorna il contenuto?

Answer 1

Ciao Alessandro,

Ho provato a fare come dai lei suggerito ma non posso farlo perchè nell'elenco dove vengono prelevati i nomi non ci sono dati, ma formule che non posso convertire in dati assoluti.

Per me non risulta un problema che l'elenco contenga formule e non vedo la necessità di convertire alcun riferimento.

A titolo di esempio, ho aggiornato il mio file di prova Alessandro20211024.xlsm

===

Regards,

Norman

Answer 2

Ho provato a fare come dai lei suggerito ma non posso farlo perchè nell'elenco dove vengono prelevati i nomi non ci sono dati, ma formule che non posso convertire in dati assoluti.

Answer 3

https://www.dropbox.com/s/w3y641wz5f9tbgz/PROVA.xlsx?dl=0 A questo link potete vedere un file di prova che ho creato che grossomodo fa quello che fa il file vero con i dati sensibili che sto usando.

Answer 4

Ciao Alessandro,

In attesa della tua risposta prova qualcosa del genere:

• Seleziona uno dei nomi nel tuo attuale elenco di nomi
• Ctrl+T per convertire l'elenco in una tabella Excel dinamica
• Crea un nuovo nome, ad esempio NOMI
• Assegna il nuovo nome alla tabella:

   [![Immagine](https://learn-attachment.microsoft.com/api/attachments/16297ed1-981b-4a61-96d5-ef73f1c09055?platform=QnA
  

• Fai clic sulla linguetta del foglio in cui si trova la ComboBox
• Incolla il seguente codice:

'========>>

Option Explicit

'-------->>

Private Sub ComboBox1_DropButtonClick()

Me.ComboBox1.List = Application.Transpose(ThisWorkbook.Names("Nomi").RefersToRange) 

End Sub

'<<========

In questo modo, al variare delle dimensioni della tabella, l'intervallo assegnato al nome Nomi si espande o si contrae e il ComboBox si adatterà sempre automaticamente e il ComboBox rifletterà sempre l'elenco corrente dei nomi.

Potresti scaricare il mio file di prova Alessandro20211024.xlsm

===

Regards,

Norman

Answer 5

Ciao Alessandro,

Ho un file con una Combobox Activex.

Come Listfillrange della Combobox ho assegnato un etichetta Dati denominata "NOMI".

Sotto Formule>Gestioni Nomi ho assegnato all'etichetta NOMI la seguente formula:

=SCARTO(DATABASE!$JJ$6;;;301-CONTA.SE(DATABASE!$JJ$6:$JJ$305;"");)

Ho così creato un elenco di nomi dinamico che si modifica in funzione dei dati che inserisco nella colonna JJ del DATABASE.

Purtroppo la Combobox ActiveX a cui è associata l'etichetta NOMI non si aggiorna dopo che ho modificato i nomi nella colonna JJ del DATABASE.

Mi tocca salvare, uscire dal file e rientrare; solo così trovo la Combobox con l'elenco dei nomi aggiornati.

Esiste un modo per Bypassare il problema?

Esiste un codice VBA che mi modifica il contenuto della ListFillRange della Combobox ActiveX o che ne aggiorna il contenuto?

Ci sono diverse possibili soluzioni al tuo problema ma sarebbe utile se potessi caricare un file di esempio, senza dati sensibili, per dimostrare la tua difficoltà immediata.

Per caricare il file su Microsoft OneDrive, vedi:

   Condividere file e cartelle di OneDrive

Per caricare il file su DropBox, vedi:

Come faccio a condividere file e cartelle in Dropbox?

===

Regards,

Norman