Prezados boa noite,
Preciso comparar o valor de uma determinada posição da matriz com células para encontrar em qual linha se contra o valor da matriz. Pedindo para escrever o valor dentro da posição da matriz em qualquer célula para averiguar se o valor realmente se encontra entre as células onde estou procurando, o valor escrito é exatamente igual ao valor que se encontra entre o conjunto de células.
O erro que aparece é o seguinte: Erro em tempo de execução "1004": Erro de definição de aplicativo ou definição de objeto
Gostaria da ajuda de vocês para contornar este erro, abaixo segue o código onde aponta o erro:
Obs:
Se trocar o sinal de = para <> na condição do loop, funciona correto, identificando que é diferente. Porém preciso que identifique o que é igual.
Dim i As Integer Dim vet(7, 1) As Variant Dim k As Long '... '... For i = 0 To 7 Do k = k + 1 Loop Until Sheets("B. Cell Validation").Cells(k, 25 + i) = vet(i, 0) 'A DEPURAÇÃO APONTA O ERRO NESTA LINHA vet(i, 1) = k k = 0 Next i '...
teteuvec,
Bom dia!
Muito difícil de resolver dessa forma. Apenas com trechos do código. Anexe seu arquivo aui no fórum de forma compactada com .ZIP.
Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)
Atenciosamente
Wagner Morel