Não atualiza em tempo real, pelo meno do jeito que tente, e tentei de muitas maneiras.
quando, altero os valores da planilha a combo-box não acompanha.
os valores só são alterados quando fecha e abre o userform
Não sei se estou fazendo certo....
Private Sub Para_2_enter()
Dim cole As Byte
cole = 0: Limit
Do Until Cells(SetPosL, SetPosC + cole) = "auxa" Or cole = 20
If Cells(SetPosL, SetPosC + cole) <> "" Then
Para_2.AddItem Cells(SetPosL, SetPosC + cole).Value
End If
cole = cole + 1
Loop
End Sub
Private Sub Para_2_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Para_2.Clear
End Sub
é até um comportamento estranho,
pq com DropButtonClick sem Clear os valores se repetem a cada click
(entendo que a lista é adicionada de novos valores a cada click)
DropButtonClick com Clear os valores aparecem mas não dá para selecionar
( Se a limpeza é feita antes da lista ser carregada novamente pq não dá para selecionar?)
e com com Clear 1 vez sim e outra não fica normal atualizado e sem repetição
(pq quando acontece o Clear fica normal??, e quando não acontece não se repete???)
Desculpe ainda não sei das maneira possíveis de se fazer as coisas no vba, sei que tem coisa que tem lugar certo para colocar, estou colocado dentro da seção da userform em formulários.
A maneira que fiz dá certo, mas está ficando difícil controlar tantas variáveis publicas em que minhas macros se baseiam,
tive que deixar um modulo somente para as variáveis
Somente é impossíveis até que alguém faça
A logica está presa na irracionalidade humana, e morta nos que se consideram donos da verdade.
"ALGUM MODERADOR ME EXPULSE DO FÓRUM POR FAVOR"
Postado : 17/04/2014 1:39 am