Ir para o conteúdo
  • Revista PROGRAMAR: Já está disponível a edição #60 da revista programar. Faz já o download aqui!

vitorbscosta

Ajuda com codigo para fatura

Mensagens Recomendadas

vitorbscosta

Boa noite,

 

Estou a começar a mexer no VBA, contudo não tenho qualquer tipo de bases. E neste momento pelo pouco que entendo, estou a precisar de criar uma macro que a sua linha de codigo faça com que ao clicar no botao criado a numeraçao seja automatica aumentado um numero ao numero que ja la estava. Sendo mais especifico, criei um documento(fatura) e precisava de fazer um botao que ao clicar limpa-se o documento escrito e aumenta-se o numero da fatura, para escrever a fatura seguinte. Deste modo, precisar de programar algo que me fizesse isso da numeraçao automatica e da gravação, o problema é que não entendo nada do assunto e tudo que procurei não me serviu de muito.

 

Obrigado pela atenção,

 

Vitor Costa

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
Gnrtuga

Boas, não percebi muito bem o que queres… Queres apagar o quê e de onde?

Explicando melhor, queres apagar o valor num formulário? Numa célula do Excel?...

A parte de criares a numeração é fácil (dependendo de onde estamos, word, excel…) em principio basta criares uma variável global e ires incrementando.

Para uma coisa mais séria, devias criar uma classe (é tipo um molde) para as faturas.

Podes ler sobre as classes aqui: https://pt.slideshare.net/w3ae/classes-em-vba

 Explica melhor o que pretendes, quanto mais informação e o código que tiveres melhor a ajuda que poderás ter.

Boa sorte


Férias! Estou por aqui: http://maps.google.p...001549&t=h&z=20 (a bulir claro está!)

Nunca mais é verão outra vez.. :)

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
vitorbscosta

Boas,

 

Para ser mais explicito, eu criei um ficheiro excel para servir de base para preenchimento de faturas. Esse documento a minha ideia era criar um sistema de numeraçao automatico, atraves de um botao(macro) e se possivel outro botao para guardar essa mesma fatura.Tudo isto que eu falei, foi ideias que fui vendo pela internet. Em termos de codigo eu ainda nao consegui desenvolver nada, porque nao tenho mesmo bases. Nunca mexi com programaçao na vida 😅. Eu vi alguns videos a explicar a situaçao e o codigo a desenvolver, mas nao consegui por aquilo funcional, portanto de momento nao tenho nada de codigo. Penso que os erros tenham ocorrido pelo facto da formataçao e das celulas nao serem iguais, mas la esta como disse nao entendo muito do assunto. 

 

Agradeço a atençao e se fosse possivel ajudar-me seria optimo.

 

Obrigado,

Vitor Costa

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
Gnrtuga

Bem se nunca mexeste em programação a  conversa é outra, pelo lado positivo é sempre boa altura para aprender.

Pessoalmente foi através do VBA que voltou o bichinho da programação (tinha tido um contacto breve no secundário), e começou precisamente por querer automatizar o trabalho repetitivo que executava, tanto no excel como no word.

Ora, vou assumir que tens a página definida com o tamanho por exemplo A4, e que a célula que tem o número da fatura é a B2

Em relação ao teu problema,  para a numeração automática  podemos fazer é algo tipo: (provavelmente não é a melhor maneira)

Colocar fora da área de impressão um botão, 

Numa célula também fora da área de impressão vais colocar o número da última fatura

o código é o seguinte:

Private Sub CommandButton1_Click()
Folha1.Cells(2, 2).Value = Folha1.Cells(2, 13).Value + 1 'nova fatura
Folha1.Cells(2, 13).Value = Folha1.Cells(2, 2).Value 'ultima fatura
End Sub

Private Sub CommandButton2_Click()
Dim caixa_dialogo As FileDialog
Set caixa_dialogo = Application.FileDialog(msoFileDialogSaveAs)
With caixa_dialogo
    .Show
    .Execute
End With
End Sub

Explicando um bocado do que está ai

Folha1 é o nome da Folha, o .Cells recebe como argumento o número da linha e o da coluna ( B2 = 2,2) e eu coloquei o valor da última fatura na célula M2 (2,13)

Não te esqueças de guardar o livro com permissões para macros.

Agora o passo seguinte é aprenderes a programar, seja vendo vídeos ou lendo. A melhor maneira para aprender é sempre a escrever código.

Deixo-te aqui uns links que me pareceram interessantes (não quer dizer que sejam os melhores) e se fizeres umas pesquisas no Google possivelmente vais encontrar alguma coisa que te agrade mais.

https://laennder.com/curso-de-vba-para-iniciantes-conceitos-basicos/

http://www.dei.isep.ipp.pt/~tmatos/APROG_CIVIL_20132014/Programming-in-VBA-v3.pdf

https://www.youtube.com/watch?v=FsT3UDnEMYI

https://www.youtube.com/playlist?list=PLrwHQFRyL4dQzDGaInMjaHcPly2T5qDpb

Boa sorte!

Editado por Gnrtuga
Erro

Férias! Estou por aqui: http://maps.google.p...001549&t=h&z=20 (a bulir claro está!)

Nunca mais é verão outra vez.. :)

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!

Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.

Entrar Agora

×

Aviso Sobre Cookies

Ao usar este site você aceita os nossos Termos de Uso e Política de Privacidade. Este site usa cookies para disponibilizar funcionalidades personalizadas. Para mais informações visite esta página.