Código para fatura

[vitorbscosta 0]

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

[Gnrtuga 21]

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

[vitorbscosta 0]

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

[Gnrtuga 21]

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!

Edited March 13, 2019 by Gnrtuga
Erro

[vitorbscosta 0]

Havera alguma maneira de eu mostrar o documento em privado para voce me conseguir ajudar com o codigo especifico? 

 

Muito obrigado