Excel VBA - Label Contar Itens da Coluna

[jcgmcs]

Aqui...

[Midori]

O operador esperado (igual) é usado para atribuir.

 

É o que acontece nas duas linhas acima do erro.

 

Isso que deve ter feito, a atribuição dos labels. Então é só substituir a anterior por essa.

[jcgmcs]

Midori já fiz isso e o erro continua....

[Midori]

Além das atribuições você deve remover a linha do erro que aparece no print.

 

Como não mostrou o código com a parte do erro fica difícil ajudar.

[jcgmcs]

Eu removi sim por 'comentário

As atribuições você ker dizer pra eu substituir onde tem Frutas e Conta é isso..?

[Midori]

A atribuição serve para armazenar um valor numa variável.

 

Suponha que você tenha a variável A e quer armazenar nela o valor 10, esta é a sintaxe,

 

A = 10

 

Isso é uma atruição e nesse caso A é o nome da variável, 10 a expressão e igual é o operador de atribuição: variável = expressão.

 

No seu código as variáveis são lblFruta e lblConta e a expressão é a linha de código que comentei. Como nesse caso a expressão é uma referência a um objeto você deve colocar a instrução Set antes da variável.

 

Então, a linha vermelha está errada por que você só colocou a expressão, faltou a variável com Set e o operador de atribuição. Não precisava comentar, era só substituir as expressões.

[jcgmcs]

Tentei assim mas ainda num deu..

Desculpe a minha iguinorância  rsrs

[Midori]

Agora está certo.

 

Esse erro é porque seu MultiPage está com outro nome ou você não adicionou nenhum.

[jcgmcs]

Midori já fiz as substituições de MultiPage2 para Page2 e erro continua..

 

[Midori]

Qual Sub aparece quando você entra no código com duplo clique no Multipage?

[jcgmcs]

Bom dia meu amigo!

Segueae anexo da Plan..

 

VBA Plnanilha Modelo - Label Contar Itens Coluna_Por Midori - MOD4 Multi-Page Frutas.xls

[Midori]

O nome do controle no seu formulário é MultiPage1 e não 2. O que aparece como MultiPage2 na janela de propriedades é o nome que você deu a uma das páginas do controle. E ainda falta atribuir lblConta da mesma forma que fez com lblFruta.

[jcgmcs]

beleza Midori, fiz as correçoes e funcionou!! Que vacilo dei aqui afff

A propósito, a ordenação da listagem via código é possível você conseguir isso ae pra mim? porque como disse, não posso fazer ordenação de outra maneira...

[jcgmcs]

Midori favor, como faço então no "Set Area" pra puxar listagem da Plan3, coluna H, a partir da linha 3 ??

[Midori]

Em 15/01/2024 às 11:42, jcgmcs disse:

A propósito, a ordenação da listagem via código é possível você conseguir isso ae pra mim? porque como disse, não posso fazer ordenação de outra maneira...

Sem planilhas auxiliares, como comentei na página anterior, pode-se armazenar os dados num array ou Collection e efetuar a ordenação antes de adicionar os labels a partir deles. Esse processo pode ser menos eficiente e você vai notar alguma lentidão se tiver muitos dados.

 

Em 15/01/2024 às 15:32, jcgmcs disse:

Midori favor, como faço então no "Set Area" pra puxar listagem da Plan3, coluna H, a partir da linha 3 ??

No código configurei o range B5:B29 da planilha ativa. Você pode referenciar a planilha pelo nome, p.ex,

 

Set Area = ThisWorkbook.Sheets("Plan3").[B5:B29]

 

Assim vai pegar o range da aba Plan3 da planilha que executa a macro.

[jcgmcs]

obrigado Midori, funcionando!

Mas o inconveniente éq todo novo item adicionado na coluna principal, tenho tbém a preocupação de atualizar a auxiliar na Plan3 e era isso q eu tbém queria eliminar. Porisso a necessidade do fazer a ordenação direto na principal.

Mas tá bom... porora esse tópico está resolvido. obrigado!!