Vetor de Strings em WhereCondition do DoCmd.OpenReport

[alex.orlando 0]

Boa tarde, Srs.

 

A dúvida é a seguinte: É possível repassar um vetor de tamanho variável, ou mesmo fixo, na WhereCondition do DoCmd.OpenReport no Access? A intenção é repassar mais de um Código a ser pesquisado pela cláusula SQL (SELECT * FROM Tabela WHERE Código IN ('Código1', 'Código2')) que será processada pelo RecordSource, no evento AoAbrir do relatório...

[KhaosDoctor 242]

O que? Explique um pouco melhor

[alex.orlando 0]

HUAHUA! Calma, sou novato e vou explicar: Gostaria de repassar, na cláusula WhereCondition do comando DoCmd.OpenReport (no Access), para abrir um relatório, ao invés de uma variável, como "Código", um vetor que contenha diversos valores, seja de tamanho variável (VetCódigos()) ou fixo (VetCódigos(0 To 4)), por exemplo. No relatório, no evento AoAbrir, determinei: Me.RecordSource = "SELECT * FROM Tabela WHERE Código IN ('" & VetCódigos(0) & "');". Indicando o índice "0", ou "1" de um vetor de tamanho fixo, funciona, mas, se não determinar o índice, não. A dúvida, enfim, é se é possível repassar mais de um valor de WhereCondition, no DoCmd.OpenReport, para abertura do relatório, como "Código1", "Código2", estando estes carregados num vetor...

[KhaosDoctor 242]

Bom ainda sim não entendi completamente mas deu pra entender algumas partes. Tente fazer um vetor de tamanho indefinido e depois para procurar um indice específico nele tente utilizar o comando UBound(Vetor, 1) assim você pode determinar o indice exato para poder procurar o registro especifico.