Cruzamento de equações

Visual Basic for Aplication e macros no Excel.
Regras do fórum
Sua dúvida foi respondida? Marque como RESOLVIDO em seus tópicos, usando o botão com marca verde. Imagem

Cruzamento de equações

Mensagempor Oficina1 » Sáb Nov 10, 2018 2:50 pm

Pretendo fazer um cruzamento de equações com incognitas x, y e z. Essas incognitas estao acompanhadas de numeros,
como está nas colunas de A a E. O cruzamento acontece como mostrado na figura.

tab.JPG


Na planilha de exemplo anexada, os dados só vão ate linha 6, mas na pratica haverão muito mais dados.


As regras sao 1) não cruzar um elemento com ele mesmo, por exemplo A com A, e 2) fazer um cruzamento de elementos uma unica vez.
Pode aparecer valores de somas repetidos, mas deverao ser excluidos. A area em vermelho da figura são os cruzamentos a serem evitados:o
que já foi cruzado antes ou que seria cruzamento com o mesmo elemento.

Para a linha 2 temos: A:01x B:30y C:35x D:37y E:40z

Os elementos da coluna G são os mesmos que estao na linha de I a L. O cruzamento acontece se a soma das partes numericas
for maior ou igual a 40. O resultado desse cruzamento é: (soma das partes numericas) & (com as incognitas). Para a linha 2 deve ser:
31xy
36xx
38xy

Feito esse cruzamento inicial, depois faço uma combinação desses conjuntos: se a soma das partes numericas de dois conjuntos
for maior ou igual a 70, o resultado será: (soma das partes numericas) & (grupos de incognitas dos conjuntos). Para a linha 2 deve ser:
67xyxx
69xyxy

Esse é o resultado final que preciso alcançar, mas o resultado está sendo: 0000
O cruzamento inicial é facil, mas não sei como continuar. Acho que teria que fazer um segundo grupo de loops só para a combinação dos conjuntos. A planilha está anexada. Obrigado

Cruzamento.zip
Você não está autorizado a ver ou baixar esse anexo.
Oficina1
Membro
Membro
 
Mensagens: 9
Registrado em: Dom Abr 01, 2018 4:50 am
Has thanked: 3 times
Have thanks: 0 time

{ SO_SELECT }

Voltar para VBA & Macros

Quem está online

Usuários navegando neste fórum: Google Adsense [Bot] e 4 visitantes