vitorbscosta 0 Posted March 7, 2019 Report Share Posted March 7, 2019 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 Link to post Share on other sites
Gnrtuga 21 Posted March 12, 2019 Report Share Posted March 12, 2019 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.. Link to post Share on other sites
vitorbscosta 0 Posted March 12, 2019 Author Report Share Posted March 12, 2019 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 Link to post Share on other sites
Gnrtuga 21 Posted March 13, 2019 Report Share Posted March 13, 2019 (edited) 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 Férias! Estou por aqui: http://maps.google.p...001549&t=h&z=20 (a bulir claro está!) Nunca mais é verão outra vez.. Link to post Share on other sites
vitorbscosta 0 Posted March 23, 2019 Author Report Share Posted March 23, 2019 Havera alguma maneira de eu mostrar o documento em privado para voce me conseguir ajudar com o codigo especifico? Muito obrigado Link to post Share on other sites
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now