[Anónimo]

olá pessoal.
É o seguinte:
tenho uma tabela com cores, números e quantidades!
a b c d e f
amarelo 1 vermelho 1 azul 1
33 500 33 200 37 400

na linha 1 tem as cores e em seguida o número 1 só para não deixar a célula em branco!
na linha de baixo tem os números seguidos da quantidade!
ou seja, a quantidade do amarelo número 33 = 500, do vermelho número 33 = 200!
digamos que eu queira acrescentar + 300 no número 33 da cor vermelho.
preciso fazer uma procura pela cor vermelha na linha 1 e depois fazer uma procura pelo número 33 na coluna do vermelho!

como faço essas procuras uma após a outra??

obrigado…..

[jorgerod]

mcjota,

experimenta, adaptando:

Índice($c$7:$c$54;corresp(1;($b$7:$b$54=”vermelho”)*($a$7:$a$54=33);0))

em que a coluna c será onde tens as quantidades; a coluna b onde tens o nome das cores e a coluna a onde tens os números correspondentes.

em vez de utilizares “vermelho” e 33, podes utilizar, por exemplo d1, tendo, nessa célula escrito “vermelho” e d2, tendo na célula digitado o 33…

atenção: isto é um array. como tal, em modo de edição, tens que utilizar, para finalizar, as teclas ctrl + shift + enter (cse) e não somente enter.

fica bem e diz qq coisa, ok?

[Anónimo]

caro jorge, obrigado pela atenção!

consegui resolver com o seguinte código:private sub commandbutton11_click()
thisworkbook.worksheets(combobox1.value).activate
with worksheets(combobox1.value).range("b1:zz1")
set c = .find(combobox2.value)
if not c is nothing then
c.select
activecell.offset(1, 0).select
while activecell "" and activecell combobox3.text
activecell.offset(1, 0).select
wend
activecell.value = combobox3.value
activecell.offset(0, 1).value = val(activecell.offset(0, 1).value) + val(textbox3.value)
else
range("a1").select
do
if not (isempty(activecell)) then
activecell.offset(0, 1).select
end if
loop until isempty(activecell) = true
activecell.value = combobox2.value
activecell.offset(0, 1).value = "x"
activecell.offset(1, 0).value = combobox3.value
activecell.offset(1, 1).value = textbox3.text
end if
end with
end subna planilha selecionada na combobox1, ele procura na linha 1 a cor escolhida na combobox2, se achar procura na coluna selecionada o número escolhido na combobox3 e soma a quantidade com a quantidade do textbox3!

mais uma vez obrigado pela atenção….
abraço…

[Autor]

Artigos