Condividi:        

Sapere quante Listbox sono presenti nel foglio

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Sapere quante Listbox sono presenti nel foglio

Postdi templare77 » 13/08/16 00:50

Salve ragazzi,
ho sei diversi fogli. in ognuno di essi ci sono delle Listbox, il numero varia.

Vorrei sapere se tramite codice VBA, c'è la possibilità di contare per ogni foglio, il numero di Listbox presenti e poter impostare dei parametri per ognuna di esse. Io pensavo ad un doopio ciclo For each di questo tipo:

For each foglio in Application.Worksheets

For each listbox in foglio.(??????????)

qui vorrei per esempio impostare la proprietà Width per ogni listbox presente

next listbox


next foglio

Vi ringrazio!
templare77
Utente Senior
 
Post: 153
Iscritto il: 18/04/16 06:26

Sponsor
 

Re: Sapere quante Listbox sono presenti nel foglio

Postdi Anthony47 » 13/08/16 02:35

Sono listbox inseriti direttamente sul foglio o all'interno di userform? Se direttamente sul foglio, sono di tipo "Modulo" o "ActiveX"? Pensi sia possibile usare direttamente il "nome" (perche' e' rimasto quello standard, quindi contenente esplicito riferimento al tipo di controllo; es CasellaDiRiepilogo1", "ListBox1") o sono stati modificati?

Ciao
Avatar utente
Anthony47
Moderatore
 
Post: 19183
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Sapere quante Listbox sono presenti nel foglio

Postdi templare77 » 13/08/16 06:02

Ciao Anthony e come sempre Grazie per il celere interessamento!
Sono list box che ho inserito manualmente nei foglio e sono di tipo ActiveX. I nomi sono sequenziali: in ogni foglio si parte da ListBox1 fino ad arrivare a ListBox iesimo (un foglio ne può avere 5.... un altro 8 ecc)
templare77
Utente Senior
 
Post: 153
Iscritto il: 18/04/16 06:26

Re: Sapere quante Listbox sono presenti nel foglio

Postdi templare77 » 13/08/16 08:32

Ciao Anthony! A mente fresca ho girato un pò in rete ed ho trovato quello che fa al caso mio
Codice: Seleziona tutto
Dim oleObj As OLEObject
     
     For Each oleObj In Worksheets("Italia").OLEObjects
          If TypeOf oleObj.Object Is MSForms.ListBox Then
               'do stuff
                oleObj.Object.Clear
          End If
     Next oleObj


Sembra funzionare, se ho qualche problema ti disturberò ancora :D :D :D :D :D :D
templare77
Utente Senior
 
Post: 153
Iscritto il: 18/04/16 06:26


Torna a Applicazioni Office Windows


Topic correlati a "Sapere quante Listbox sono presenti nel foglio":


Chi c’è in linea

Visitano il forum: Nessuno e 64 ospiti