Propriedade TextBox.RunningSum (Access)

Use a propriedade RunningSum para calcular totais de registro por registro ou grupo por grupo em um relatório. Byte de leitura/gravação.

Sintaxe

expressão. RunningSum

Expressão Uma variável que representa um objeto TextBox .

Comentários

A propriedade RunningSum Especifica se uma caixa de texto em um relatório exibe uma soma acumulada e permite que você defina o intervalo através da qual os valores são acumulados. Por exemplo, você pode agrupar dados por mês e mostrar a soma das vendas de cada mês no rodapé de grupo. Você pode mostrar a soma em execução de vendas acumuladas ao longo de todo o relatório (vendas para janeiro no rodapé de janeiro, vendas para janeiro mais fevereiro no rodapé de fevereiro e assim por diante) adicionando uma caixa de texto ao rodapé que mostra a soma das vendas e definindo sua propriedade RunningSum como Over All.

A propriedade RunningSum utiliza as configurações a seguir.

Configuração Visual Basic Descrição
Não 0 (Padrão) A caixa de texto exibe os dados do campo subjacente para o registro atual.
Por Grupo 1 A caixa de texto exibe uma soma parcial de valores no mesmo nível de grupo. O valor é acumulado até que uma outra seção de nível de grupo seja encontrada.
Total 2 A caixa de texto exibe uma soma parcial de valores no mesmo nível de grupo. O valor é acumulado até o fim do relatório.

Observação

[!OBSERVAçãO] A propriedade RunningSum só se aplica a uma caixa de texto em um relatório.

Posicione a caixa de texto na seção detalhe para calcular um total de registro por outro. Por exemplo, para numerar os registros que aparecem em uma seção de detalhes de um relatório, defina a propriedade ControlSource para o texto caixa "= 1" e defina a propriedade RunningSum como por grupo.

Posicione a caixa de texto em um cabeçalho ou em um rodapé de grupo para calcular o total de cada grupo.

É possível ter até 10 níveis de grupo aninhados em um relatório.

Exemplo

O exemplo a seguir define a propriedade RunningSum para uma caixa de texto chamada SalesTotal como 2 (Over All):

Reports!rptSales!SalesTotal.RunningSum = 2

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.