Você pode usar as funções DMin e DMax para determinar os valores mínimos e máximos em um conjunto de registros especificado (um domínio ). Use as funções DMin e DMax em um módulo VBA (Visual Basic for Applications), um macro, uma expressão de consulta ou um controle calculado.
Por exemplo, você pode usar as funções DMin e DMax em controles calculados em um relatório para exibir os menores e maiores valores de pedido para um cliente específico. Ou você pode usar a função DMin em uma expressão de consulta para exibir todos os pedidos com um desconto maior que o desconto mínimo possível.
Sintaxe
DMin ( expr , domínio [, critérios] )
DMax ( expr , domínio [, critérios] )
As funções DMin e DMax têm esses argumentos:
|
Argumento |
Descrição |
|
expr |
Obrigatório. Uma expressão que identifica o campo para o qual você deseja encontrar o valor mínimo ou máximo. Pode ser um expressão de cadeia de caracteres identificar um campo em uma tabela ou consulta, ou pode ser uma expressão que executa um cálculo sobre dados nesse campo. Em expr, você pode incluir o nome de um campo em uma tabela, um controle em um formulário, uma constante ou uma função. Se expr incluir uma função, ela poderá ser interna ou definida pelo usuário, mas não outra função de agregação de domínio ou de agregação de SQL. |
|
domínio |
Obrigatório. Uma expressão de cadeia de caracteres que identifica o conjunto de registros que constitui o domínio. Pode ser um nome de tabela ou um nome de consulta para uma consulta que não requer um parâmetro. |
|
critérios |
Opcional. Uma expressão de cadeia de caracteres usada para restringir o intervalo de dados no qual a função DMin ou DMax é executada. Por exemplo, os critérios geralmente são equivalentes à cláusula WHERE em uma expressão SQL, sem a palavra WHERE. Se os critérios forem omitidos, as funções DMin e DMax avaliarão expr em relação a todo o domínio. Qualquer campo incluído nos critérios também deve ser um campo no domínio, caso contrário, as funções DMin e DMax retornam um Null. |
Comentários
As funções DMin e DMax retornam os valores mínimos e máximos que atendem aos critérios. Se o expr identificar dados numéricos, as funções DMin e DMax retornarão valores numéricos. Se expr identificar dados de cadeia de caracteres, eles retornarão a cadeia de caracteres que é primeira ou última em ordem alfabética.
As funções DMin e DMax ignoram valores nulos no campo referenciado por expr. No entanto, se nenhum registro atender aos critérios ou se o domínio não contiver registros, as funções DMin e DMax retornarão um Null.
Se você usa a função DMin ou DMax em uma macro, módulo, expressão de consulta ou controle calculado, você deve construir o argumento de critério cuidadosamente para garantir que ele seja avaliado corretamente.
Você pode usar a função DMin e DMax para especificar critérios na linha Critérios de uma consulta, em uma expressão de campo calculada em uma consulta ou na linha Atualizar para de um atualizar consulta.
Observação: Você pode usar as funções DMin e DMax ou as funções Min e Max em uma expressão de campo calculada de um consulta de totais. Se você usar a função DMin ou DMax , os valores serão avaliados antes que os dados sejam agrupados. Se você usar a função Min ou Max , os dados serão agrupados antes que os valores na expressão de campo sejam avaliados.
Use a função DMin ou DMax em um controle calculado quando precisar especificar critérios para restringir o intervalo de dados no qual a função é executada. Por exemplo, para exibir o frete máximo cobrado por um pedido enviado para a Califórnia, defina a propriedade ControlSource de uma caixa de texto como a seguinte expressão:
=DMax("[Freight]", "Orders", "[ShipRegion] = 'CA'")
Se você simplesmente quiser encontrar o valor mínimo ou máximo de todos os registros no domínio, use a função Min ou Max .
Você pode usar a função DMin ou DMax em um módulo ou macro ou em um controle calculado em um formulário se o campo que você precisa exibir não estiver na fonte de registro na qual seu formulário se baseia.
dica
Embora você possa usar a função DMin ou DMax para encontrar o valor mínimo ou máximo de um campo em um tabela estrangeira, pode ser mais eficiente criar uma consulta que contenha os campos necessários de ambas as tabelas e baseie seu formulário ou relatório nessa consulta.
Observação: Alterações não salvas nos registros no domínio não são incluídas quando você usa essas funções. Se você quiser que a função DMax ou DMin seja baseada nos valores alterados, primeiro salve as alterações clicando em Salvar Registro em Registros na guia Dados , movendo o foco para outro registro ou usando o método Update .
Exemplo
Observação: Exemplos a seguir demonstram o uso dessa função em um módulo VBA (Visual Basic for Applications). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência do Desenvolvedor na lista suspensa ao lado de Pesquisar e insira um ou mais termos na caixa de pesquisa.
O exemplo a seguir retorna os valores mais baixos e mais altos do campo Freight para pedidos enviados para o Reino Unido. O domínio é uma tabela Orders. O argumento critério restringe o conjunto resultante de registros àqueles para os quais ShipCountryRegion é igual ao Reino Unido.
Dim curX As Currency
Dim curY As Currency
curX = DMin("[Freight]", "Orders", _
"[ShipCountryRegion] = 'UK'")
curY = DMax("[Freight]", "Orders", _
"[ShipCountryRegion] = 'UK'")
No exemplo seguinte, o argumento de critérios inclui o valor atual de uma caixa de texto chamada OrderDate. A caixa de texto está vinculada a um campo OrderDate em uma tabela Orders. Observe que a referência ao controle não está incluída nas aspas duplas (") que denotam as cadeias de caracteres. Isso garante que cada vez que a função DMax é chamada, Microsoft Office Access 2007 obtém o valor atual do controle.
Dim curX As Currency
curX = DMax("[Freight]", "Orders", "[OrderDate] = #" _
& Forms!Orders!OrderDate & "#")
No próximo exemplo, a expressão de critérios inclui uma variável, dteOrderDate. Observe que os sinais de número (#) são incluídos na expressão de cadeia de caracteres, para que, quando as cadeias de caracteres forem concatenadas, elas incluam a data.
Dim dteOrderDate As Date
Dim curX As Currency
dteOrderDate = #03/30/2000#
curX = DMin("[Freight]", "Orders", _
"[OrderDate] = #" & dteOrderDate & "#")
