Inserir dados de abas variaveis em uma listbox


#1

Olá.
Meu nome é Angelo, sou novo aqui no fórum.
Tenho uma dúvida sobre listbox.

Tenho algumas userforms na minha planilha, e em uma delas eu faço um cadastro de clientes e produtos relacionados a esse cliente, assim q eu faço o cadastro é criado automaticamente uma nova aba com o nome do cliente (copiado de um padrao), e inserido os produtos na aba do cliente específico.
Na outra userform, eu tenho um combobox, onde eu seleciono um dos clientes já cadastrados, clico no botão ao lado, e abaixo tenho duas listbox, onde deveriam aparecer os dados da aba criada para o cliente selecionado.
Ou seja, a planilha do listbox é variável.

Já tentei de diversas formas criar uma variável
Z = combobox1
Listbox1.rowsource = sheets(z).range("c5:d200)

O correto seria listbox1.rowsource = “plan1!(c5:d200)”
O problema é que o plan1 tem q ser variável

Alguém teria alguma solução?
Desde já obrigado


#2

Boa tarde Angelo.
Crie tabelas e carregue a tabela, já que a tabela não vai o nome da planilha, ela é global.
if suacondição = 1 then
LISTBOX1.ROWSOURCE = “TABELA1”
LISTBOX1.COLUMNCOUNT = 5
elseif suacondição = 2 then
LISTBOX1.ROWSOURCE = “TABELA2”
LISTBOX1.COLUMNCOUNT = 3
endif

Espero ter ajudado, mas qualquer duvida, poste aqui.
abs


#3

Tente assim:

Sub exemplo()
Dim Z As Worksheet
Set Z = Sheets(Me.Combobox1.Value)
Listbox1.rowsource =Z.range("C5:D200")
....continua
End sub