"Unselect" não funciona na ListBox
Enviado: 24 Abr 2017 às 09:41
Boa tarde
Mais uma vez pedindo ajuda com um código em VBA.
Tenho uma planilha que para um determinado empreendimento tenho que fazer a afetação de meios.
Para tal tenho uma UserForm "FTEForm" aonde classifico cada empreendimento e no final fruto dessa classificação tenho uma afetação de DF e FO.
A FTEform é esta:

Assim depois de escolher o empreendimento e escolher a "Tipificação" vou escolher uma "Afetações Primárias" e depois os respetivos "Fatores de Correções - Ki's", e aqui é que começa o meu problema, que passo a explicar:
1) Eu só posso escolher os Ki's depois de ter escolhido em primeiro lugar as "Afetações Primárias";
2) Quando eu escolho em primeiro lugar os Ki's aparece-me uma mensagem a dizer "É necessário definir primeiro as afetações primárias" e faço o unselect (Select(i)= False) na respetiva Listbox;
3) O problema é que ele faz o unselect mas o item na listBox continua "selecionado" ou seja continua azul; Como faço para que o item deixe de ficar azul?
4) Não sei porque razão a mensagem que refiro em cima aparece sempre duas vezes, ou seja a subrotina é chamada duas vezes. Como resolvo este problema?
Obrigado
Jorge Cabral
NOTA: Eu sei que poderia resolver este problema de outra maneira nomeadamente colocando todas as ListBox como "Enable=False" e só as ir libertando depois de preencher as anteriores, mas de momento não pretendo implementar essa solução até porque precisava de resolver este problema para outra situação que tenho.
Também aqui: http://www.tomasvasquez.com.br/forum/vi ... =20&t=5361 e http://www.planilhando.com.br/forum/vie ... 78#p123078
Mais uma vez pedindo ajuda com um código em VBA.
Tenho uma planilha que para um determinado empreendimento tenho que fazer a afetação de meios.
Para tal tenho uma UserForm "FTEForm" aonde classifico cada empreendimento e no final fruto dessa classificação tenho uma afetação de DF e FO.
A FTEform é esta:
Assim depois de escolher o empreendimento e escolher a "Tipificação" vou escolher uma "Afetações Primárias" e depois os respetivos "Fatores de Correções - Ki's", e aqui é que começa o meu problema, que passo a explicar:
1) Eu só posso escolher os Ki's depois de ter escolhido em primeiro lugar as "Afetações Primárias";
2) Quando eu escolho em primeiro lugar os Ki's aparece-me uma mensagem a dizer "É necessário definir primeiro as afetações primárias" e faço o unselect (Select(i)= False) na respetiva Listbox;
3) O problema é que ele faz o unselect mas o item na listBox continua "selecionado" ou seja continua azul; Como faço para que o item deixe de ficar azul?
4) Não sei porque razão a mensagem que refiro em cima aparece sempre duas vezes, ou seja a subrotina é chamada duas vezes. Como resolvo este problema?
Obrigado
Jorge Cabral
NOTA: Eu sei que poderia resolver este problema de outra maneira nomeadamente colocando todas as ListBox como "Enable=False" e só as ir libertando depois de preencher as anteriores, mas de momento não pretendo implementar essa solução até porque precisava de resolver este problema para outra situação que tenho.
Também aqui: http://www.tomasvasquez.com.br/forum/vi ... =20&t=5361 e http://www.planilhando.com.br/forum/vie ... 78#p123078