Função Spc

  • Artigo

Usado com a instrução Imprimir # ou o método Imprimir para posicionar a saída.

Sintaxe

Spc(n)

O argumenton necessário é o número de espaços a serem inseridos antes de exibir ou imprimir a próxima expressão em uma lista.

Comentários

Se n for menor que a largura da linha de saída, a próxima posição de impressão seguirá imediatamente o número de espaços impressos. Se n for maior que a largura da linha de saída, o Spc calculará a próxima posição de impressão usando a fórmula: currentprintposition + (nLargura mod).

Por exemplo, se a posição de impressão atual for 24, a largura da linha de saída for 80 e você especificar spc(90), a próxima impressão começará na posição 34 (posição de impressão atual + o restante de 90/80). Se a diferença entre a posição de impressão atual e a largura da linha de saída for menor que n (ou nLargura mod), a função Spc pulará para o início da próxima linha e gerará espaços iguais a n - (largura - currentprintposition).

Observação

Verifique se as colunas tabulares são largas o suficiente para acomodar letras largas.

Quando você usa o método Print com uma fonte proporcionalmente espaçada, a largura dos caracteres de espaço impressos usando a função Spc é sempre uma média da largura de todos os caracteres no tamanho do ponto para a fonte escolhida. No entanto, não há correlação entre o número de caracteres impressos e o número de colunas de largura fixa que esses caracteres ocupam. Por exemplo, a letra maiúscula W ocupa mais de uma coluna de largura fixa e a letra minúscula que ocupo menos de uma coluna de largura fixa.

Exemplo

Este exemplo usa a função Spc para posicionar a saída em um arquivo e na janela Imediata.

' The Spc function can be used with the Print # statement.
Open "TESTFILE" For Output As #1    ' Open file for output.
Print #1, "10 spaces between here"; Spc(10); "and here."
Close #1    ' Close file.

A instrução a seguir faz com que o texto seja impresso na janela Imediata (usando o método Imprimir ), precedida por 30 espaços.

Debug.Print Spc(30); "Thirty spaces later..."

Confira também

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.