[Resolvido]Ordenar o agrupamento

Pessoal, boa tarde.

Fiz o agrupamento no relatório, porém só sei como ordenar todos iguais (Naquela opção "Agrupar, Classificar e total").
Porém, eu queria ordenar de forma diferente. Por exemplo, se o agrupamento for "XPTY", ordene pelo valor, se for "ABCD" ordene pelo nome.

É possível?

Olá Aline! Seja bem vinda ao Fórum!

Você pode aplicar essa classificação pelo VB!

Fiquei meio confuso quanto a

...se o agrupamento for "XPTY", ordene pelo valor, se for "ABCD" ordene pelo nome

Não sei em que momento quer aplicar essa classificação.

Mas vou lhe mostrar uma foma:
No evento ao Abrir de um relatório, se eu colocar:

Private Sub Report_Load()
Me.OrderBy = " [Cliente] DESC"
Me.OrderByOn = True
End Sub

Estarei classificando pelo campo da tabela chamado Cliente, e de forma decrescente!
Então, você pode usar esse método, no botão de abrir o relatório se for o caso... Verificar a escolha e aplica a classificação desejada!

Primeiramente, obrigada pelo retorno. Vamos lá!
Acho que não soube me expressar... Veja a imagem em anexo..




Digamos que eu agrupe o relatório por "Categoria".
Então vai aparecer assim no relatório:

Produto A
Subproduto 1
Subproduto 4
Subproduto 7

Produto B
Subproduto 2
Subproduto 5
SubProduto 8

Produto C
Subproduto 3
Subproduto 6
Subproduto 9

E eu quero ORDENAR agora as categorias e seus respectivos valores..
Por exemplo, a categoria "Produto A" quero ordenar por ordem alfabética (de A a Z).
Já a categoria "Produto B" quero ordenar por valor (do menor pro maior). E a categoria "Produto C", por exemplo, também por ordem alfabética.

Eu só consigo ordenar TUDO por ordem alfabética ou TUDO por preço.

Teria que ficar algo tipo assim:
if (Categoria == 'Produto B') {
ordenar por valor
} else{
ordenar por ordem alfabética
}

É possível?

As classificações seguem a ordem de escrita... Exemplo:

Ordenar primeiro por Categoria e em seguida por Preço:  Me.OrderBy="Categoria, Preco"

Observe que primeiro ordenarei por Categoria e somente depois e que ordenarei por Preço...

Ao que me parece você quer um tipo de classificação avançada, onde o usuário iria selecionar por onde pretendia classificar!

Na imagem é de uma tabela/consulta/form dados... Pretende ordenar em relatório ou em consulta/tabela?

O usuário não irá selecionar por onde classificar. Eu que irei dizer. Mas por ter mais de uma categoria, quero saber como classificar cada uma de uma forma.
Desse jeito que você fez acima (Me.OrderBy="Categoria, Preco"), ele vai classificar tanto por categoria quanto por preço (respeitando a ordem).
Eu quero classificar por ordem alfabética OU por preço. O que irá definir se será um ou outro é o nome da categoria (que são fixas), entende?

Por exemplo, se a categoria for "Produto A", classificar os "Subprodutos" em ordem alfabética.
Se a categoria for "Produto B", classificar somente por valor.

Na imagem, é uma tabela simples. Mas os dados do relatório real provém de uma consulta.

Aline, da forma convencional eu desconheço... acredito ate que não será possível!

Agora, da pra fazer isso abrindo um Recordeset para cada Categoria, classificando da forma como pretende... Juntando os dados em uma variavel e em seguida passando o valor para uma Caixa de Texto.

Veja na Imagem a baixo como ficou, e veja se atende ao que precisa!
Observe que na na guia detalhe, apesar de estar todos os registros, estão todos em uma Unica caixa de Texto e junto com o Valor.

FabioPaes,

Acredito que dessa forma resolva.
Mas como assim, abrir um RecordSet para cada categoria?

Desculpe, sou iniciante em Access.. Poderia me mostrar o código que você fez?

Obrigada.

Baixe aqui o Exemplo: dropbox.com/s/zuos4shpcyw4ic5/Classifica%C3%A7%C3%A3oDiferenciada.rar

Recordset é uma forma de consulta de dados através do método DAO. Veja o código da guia Grupo que entenderá direitinho!!!

Entendi e ficou muiiiito boa sua explicação.

Só uma última dúvida: No seu caso, você criou uma tabela com as classificações..

"SELECT [Nome],Valor FROM tbClassificacao WHERE Categoria = '" & Me.Categoria & "' ORDER BY [Valor]"

Mas e se for de uma consulta, que é gerada somente dentro do relatório? Sabe, na fonte de registro?
Não tenho essa consulta salva, ela está somente dentro do relatório, não sei se deu pra entender...

É possível fazer consulta tendo como base outra consulta!

Basta mudar aqui: FROM tbClassificacao Para o Nome de sua consulta! Lembrando que se Tiver espaço ou caracteres especiais deve ficar entre [nome consulta]

Atenção!

Essa operação de classificação pode ser muito prejudicial para o desempenho do seu aplicativo, pois para obter-se esse resultado é realizado varias consultas no Banco de dados em busca dos valores. Portanto recomendo que teste em rede com uma quantidade boa de dados!

Fábio, justamente isso..

Não tem nome da consulta...
Digamos, criei um relatório, vou na aba "Dados" (Propriedades) e clico para selecionar a fonte dos registros.
Daí vai abrir o construtor de consultas e as tabelas disponíveis.
Seleciono algumas, crio um join, calculo outros campos, e pronto, estão prontos os campos do meu relatório.

Mas em momento algum eu salvei essa consulta. Eu só sei que ela existe dentro do relatório.
Como vou "selecionar" ela no VBA? Não sei se deu pra entender...

Certo... Mas esses dados estao em uma tabela certo?

Então basta buscar de la...
SELECT [Nome],Valor FROM tbClassificacao WHERE Categoria =... Veja que aqui eu busco apenas os dados que quero concatenar (Nome e Valor) então va na tabela que tem esses valores e traga para o recordset.

Obrigada!!!

Aguardamos o retorno com a conclusão... e se for solucionada com o fechamento do Tópico!

Pode encerrar, obrigada!

Grato pelo retorno Aline, até a próxima se Deus Quiser!

Veja como dar o tópico como resolvido!
Veja como Fazer


Obs: Esse eu ja Encerrei ta!