Dúvida: Como criar número de série sequencial no Excel

[locunha]

Boa tarde amigos,

Gostaria de uma rápida ajuda.

Criei uma espécie de modelo de formulário de controle de despesas no Excel para distribuir aos meus funcionários, e gostaria de imprimí-las com um número de série sequencial crescente(0001, 0002, 0003, etc...), de uma forma que mesmo fechando o arquivo, ao abrí-lo novamente o numero de série continue de onde parou.

Uso o Excel 2010.

Alguém poderia me dar uma luz de como fazer isso?

Desde já agradeço!!!!

Um abraço,

Luiz

[Obadia]

Boa tarde amigos,

Gostaria de uma rápida ajuda.

Criei uma espécie de modelo de formulário de controle de despesas no Excel para distribuir aos meus funcionários, e gostaria de imprimí-las com um número de série sequencial crescente(0001, 0002, 0003, etc...), de uma forma que mesmo fechando o arquivo, ao abrí-lo novamente o numero de série continue de onde parou.

Uso o Excel 2010.

Alguém poderia me dar uma luz de como fazer isso?

Desde já agradeço!!!!

Um abraço,

Luiz

Caro amigo Locunha,

Vá até Ferramentas> Opções> Listas e add uma lista. Depois na planilha é só colocar o primeiro e arrastar.

Agora se você só quer colocar os zeros na frente, também tem uma outra forma:

Formatar as células e em Número > Categoria selecione a opção personalizado. Se você quer sempre 3 zeros na frente, coloque 00000 (3 primeiro são os zeros e os outros dois dígitos são os números.

Abs

[Patropi]

Boa tarde locunha.

Dá para fazer com Macro.

Se você tivesse postado a planilha ficaria mais fácil, pois não sei qual o teu conhecimento em VBA.

Copie e cole este código num módulo e coloque um botão na planilha:

Sub Imprime()
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
        IgnorePrintAreas:=False
Range("D1").Value = Range("D1").Value + 1
End Sub

Troque a célula "D1" que aparece no cóodigo, pela célula que você quer que apareça a numeração na tua planilha.

Dê retorno.

Um abraço.

[ctosatti]

Boa tarde !!!

Prezados, quase funcionou, mas queria alterar o campo Copies para 200 e já sair na impressão de 1 à 200.

Tem como fazer isso ?!

Obrigado,

Cel

Boa tarde locunha.

Dá para fazer com Macro.

Se você tivesse postado a planilha ficaria mais fácil, pois não sei qual o teu conhecimento em VBA.

Copie e cole este código num módulo e coloque um botão na planilha:

Sub Imprime()
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
        IgnorePrintAreas:=False
Range("D1").Value = Range("D1").Value + 1
End Sub

Troque a célula "D1" que aparece no cóodigo, pela célula que você quer que apareça a numeração na tua planilha.

Dê retorno.

Um abraço.

[Leandro B. Martins]

Boa tarde,

 

O código acima funcionou legal, mas eu gostaria que o mesmo fizesse automaticamente no momento que o usuário entra na planilha~, não sendo necessário o usuário ter que executar a macro, isso é possível?

 

Desde já agradeço a ajuda.

 

at,

 

Leandro

[Patropi]

Boa tarde Leandro

 

Seja bem-vindo ao fórum!

 

Baixe a planilha e veja se é isto que você deseja:

 

22_05_14_Atualiza Numerador ao abrir planilha-Patropi.zip

 

Dê retorno;

 

[]s

 

 

[Leandro B. Martins]

Boa tarde,

 

Muito obrigado pelo breve retorno, atividade concluida com sucesso.

 

um grande abraço

 

Leandro