Jump to content

Search the Community

Showing results for tags 'vba'.

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Forums

  • Comunidade
    • Sugestões, Críticas ou Dúvidas relativas ao P@P
    • Acerca do P@P
  • Comunidade a Trabalhar
    • Apresentação de Projectos de Programação
    • Downloads
    • Revista PROGRAMAR
  • Desenvolvimento Geral
    • C
    • C++
    • Java
    • Pascal
    • Python
    • Bases de Dados
    • Dispositivos Móveis
    • Outras Linguagens
  • Desenvolvimento Orientado para Web
    • PHP
    • HTML
    • CSS
    • Javascript
    • Outras Linguagens de WebDevelopment
    • Desenvolvimento Web
  • Desenvolvimento .NET
    • C#
    • Visual Basic .NET
    • ASP.NET
    • WPF & SilverLight
  • Software e Sistemas Operativos
    • Software de Produtividade
    • Sistemas Operativos
    • Apresentação de Software
  • Informática
    • Interfaces Visuais
    • Computação Gráfica
    • Algoritmia e Lógica
    • Segurança e Redes
    • Hardware
    • Electrónica e Automação Industrial
    • Matemática
    • Software de Contabilidade e Finanças
    • Dúvidas e Discussão de Programação
  • Outras Áreas
    • Notícias de Tecnologia
    • Dúvidas Gerais
    • Discussão Geral
    • Eventos
    • Anúncios de Emprego
    • Tutoriais
    • Snippets / Armazém de Código
  • Arquivo Morto
    • Projectos Descontinuados
    • System Empires

Blogs

  • Blog dos Moderadores
  • Eventos
  • Notícias de Tecnologia
  • Blog do Staff
  • Revista PROGRAMAR
  • Projectos
  • Wiki

Categories

  • Revista PROGRAMAR
  • Tutoriais
  • Textos Académicos
  • Exercícios Académicos
    • Exercícios c/ Solução
    • Exercícios s/ Solução
  • Bibliotecas e Aplicações
  • Outros

Find results in...

Find results that contain...


Date Created

  • Start

    End


Last Updated

  • Start

    End


Filter by number of...

  1. Origem: Aplicações que permitem usar VBA
  2. pedro_mexico

    Erro conexão Base dados

    boa tarde forum, á uns tempos tomei o gosto por criar um formulário excel vba , com ajuda da net, la consegui criar um ficheiro com formulário excel vba, mas agora queria me aventurar no ficheiro mas com Base dados Access. ja vi vários filmes, procurei na net e ate ja fiz download de alguns ficheiros com base de dados para tentar adaptar os códigos ao meu formulário, mas estou com erros que me estão a dar dores de cabeça passo a explicar: tinha uma conexão ao banco de dados simples, mas os vários ficheiros que fazia download vinham com outro código para conexão, por isso como nã
  3. thiago costa de jesus

    progressão geometrica

    Exercício Escreva um algoritmo que leia um valor inicial A e uma razão R e imprima uma sequência em P.G. contendo n termos
  4. Sou estudante de Programação e nunca tinha usado VBA e tenho de entregar um trabalho, mas nunca tive formação nesta linguagem, e estou a ter problemas no programa na parte de Pesquisar registros com filtros, já tentei ao máximo fazer seguindo tutoriais na internet, vídeo aulas e fórum mas está sempre a dar erro e não consigo resolver. Fico muito agradecido se alguém me conseguir ajudar. Link do Programa: https://drive.google.com/file/d/1qBprlBRX8eg8wRoK2_Yy_UZ3pfisrzWj/view?usp=sharing
  5. Bom dia. Estou a desenvolver um programa em Visual Basic 2019 com ligação a uma base de dados MySQL. Em fase de testes a base de dados é local e no código uso a seguinte linha: Public con As New MySqlConnection("server=localhost; userid=root; password=; database=vasco_gil; port=;") Na altura de entregar ao cliente, foi-me pedido para que os dados do servidor não podem ser introduzidos no código (por motivos de segurança), mas sim através de uma opção no ecrâ principal com uma área para definir os parâmetros de servidor, utilizador e password. Alguém pode ajudar-me com uma
  6. Boa tarde, Gostaria de ajuda a obrigar que um utilizador quando preenche uma determinada célula tem que obrigatoriamente preencher outra. Exemplo: Se o utilizador disser que está inscrito tem que obrigatoriamente preencher a célula que corresponde à data de inscrição. Obrigado. Cumps
  7. Olá tenho uma tarefa, de macro em Excel, para resolver que me ocupa a cabeça já há vários dias... Já fiz e refiz , até achei um código nesta plataforma que me auxiliou muito. Porém, estou com um problema em uma estrutura de repetição nesse código. Vou deixar aqui o exercício, bem como a minha tentativa , na esperança que alguém me possa direcionar no caminho, sinto que estou perto mas alguma coisa falha.. //Exercício Fazer uma macro que possa garantir o preenchimento automático de um dado específico na planilha. Esse dado, que será preenchido automaticamente, depende de ou
  8. Olá, programadores em Excel VBA. Minha dúvida é como formatar uma célula ativa, sem que seja necessário escolher um período inteiro. A fórmula abaixo mostra isso, mas eu não quero um período inteiro fixo [A1:A10]. Eu preciso apenas que esse comando seja feito somente na célula ativa, independente onde a seleção esteja. Esse é o comando que preciso mudar: For Each cell In [A1:A10] If cell > "" Then numero = Str(cell.Value) cell.Activate ActiveCell.FormulaR1C1 = numero Else End If Next E aí? Tem como tirar a seleção [A1:A10] e trocar por algo do
  9. Boas pessoal, alguém sabe de uma aplicação para Word que permita escrever números por extenso?
  10. Conforme a tabela abaixo, preciso Filtrar em ordem alfabética AZ a Coluna DATA. Mas o TxtBoxData sempre lança nas células datas em formato de texto e assim fica impossível o Excel filtrar a partir da data mais recente até a mais antiga. Não adianta formatar "dd/mm/yyyy" por que depois que são lançadas pelo TxtBoxData se transformam em texto (nunca em número). Como resolver esse problema? DATA 02/01/2001 05/04/2000 22/02/2002 22/08/1892 12/12/1500
  11. Olá, programadores em VBA Excel! Minha necessidade existe quando preciso realizar uma somatória automática e flexível. Vejam que na TABELA 01 os valores são lançados aleatoriamente, mas na TABELA 02 ficam separados grupos por SETOR e somados automaticamente. Mas este é um modelo que eu não consegui fazer. Alguém pode me ajudar? TABELA 01 TAEBLA 02 NOME SETOR VENDA -------> NOME SETOR VENDA José Vendas 100,00 José Ve
  12. Olá, programadores em VBA Excel! Minha necessidade existe quando preciso realizar uma somatória automática e flexível. Vejam que na TABELA 01 os valores são lançados aleatoriamente, mas na TABELA 02 ficam separados por SETOR e somados automaticamente. Mas este é um modelo que eu não consegui fazer. Alguém pode me ajudar? TABELA 01 TAEBLA 02 NOME SETOR VENDA -------> NOME SETOR VENDA José Vendas 100,00 José Vendas
  13. Boa tarde. Sou recente no fórum e inexperiente no que diz respeito à programação utilizando VBA. Estou a criar uma "userform" que me permita inserir numa folha de Excel um determinado número de dados. A minha dúvida é: Criei dois "optionbutton" para a seguinte situação: Formato de uma placa: 0 quadrada ou 0 redonda O que eu pretendia era (caso seja possível) se eu seleccionar a opção quadrada, aparecer na userform duas labels e respetivas textbox para introduzir valores de largura e comprimento, caso seleccione redonda aparecer uma label e respetiva textbox para introdução do diâmetro.
  14. Boas pessoal, eu sou novo nestas andanças e precisava da vossa ajuda. Precisava de uma macro que me fizesse o copiar e o colar de uma zona defenida, copiar os valores do modulo 1 até ao modulo 2 e assim sucessivamente até ao modulo 6. eu ja consegui fazer uma macro que me consegue copiar e colar, so que ja defeni essa zona, se houver colocação de mais uma linha altera me tudo. A 1 modulo 1 2 1564 3 235 4 3468 5 modulo 2 6 567 7 809 cumprimentos Fabio Sá
  15. Sou autodidata e curiosa por natureza, estou criando uma planilha de controle de estoque e movimentação porém toda com formulário, pois minha intenção é que a planilha fique invisível no final. Ela já está praticamente pronta, porém está acontecendo um problema que estou quebrando a cabeça, mas não consigo identificar o porque dele. Quando eu preencho o rowsource da ListBox de pesquisa de produtos. E vou rodar o Formulário Inicial de Estoque e Movimentação, ao clicar em Movimentar Estoque, acontece um erro de tempo de execução '-2147467259 (800004005)': Erro não especificado. Ao clicar
  16. Olá, num file excel, estou a criar uma macro para abrir um file word. Porém, o file word é um relatório que utiliza dados do excel e tem uma macro que é executada no início e que vai gerar um relatório por aluno. Quando executo o file word, a macro gera os relatórios, mas quando o inicio a partir do excel, ele não importa os dados para gerar os relatórios. O código que estou a utilizar é este (com pesquisa aqui no fórum): Sub word() Set wordapp = CreateObject("word.Application") wordapp.documents.Open "D:\\autoaval_sem_new_new.docm" wordapp.Visible = True En
  17. Antonio Augusto Crovador

    Imprimir dados da listview

    boa tarde amigos, estou tentando imprimir mais não estou tendo exito, alguem pode ajudar-me ? Function Imprimir() If lv.ListItems.Count = 0 Then MsgBox "Não há dados para ser impresso.", vbInformation, "AVISO" Else Dim i%, LVWidth%, NewTab%, j% Dim itmX As ListItem Dim ContaLinha% LVWidth = 0 For i = 1 To lv.ColumnHeaders.Count LVWidth = LVWidth + lv.ColumnHeaders(i).Width Next NewTab = 0 'imprime o cabeçalho For i = 1 To lv.ColumnHeaders.Count NewTab = NewTab + CInt(lv.ColumnHeaders(i).Width * Printer.ScaleWidth / LVWidth) Pri
  18. Bom dia! Pessoal, preciso de ajudar nesse formato de carregamento. as linha 11, 12 e 13 preciso que seja no formato de número, porem está carregando como texto o que impede de formulas, alguém consegue ajudar? .Cells(linha, 1) = Format(Sheets(I).Cells(Lin, 1), "DD/MM/YYYY") .Cells(linha, 2) = Sheets(I).Cells(Lin, 2) .Cells(linha, 3) = Sheets(I).Cells(Lin, 3) .Cells(linha, 4) = Sheets(I).Cells(Lin, 4) .Cells(linha, 5) = Sheets(I).Cells(Lin, 5) .Cells(linha, 6) = Sheets(I).Cells(Lin, 6) .Cells(linha, 7) = Sheets(I).Cells(Lin, 7) .Cells(linha, 8) = Sheets(I).Cells(Lin, 8) .Cells(lin
  19. Boa tarde, Tenho 1 tabela em access na qual tem 2 campos, num tem o ID e no outro nomes ID Nomes 1 Ana 2 Maria 1 Silvia 2 Cristina Queria que ficasse assim ID Nomes 1 Ana, Silvia 2 Maria, Cristina Alguém pode-me ajudar arranjar q solução. Podem dar-me informação de quais campos deveriam constar? Public Function ConcatRelated(strField As String, _ strTable As String, _ Optional strWhere As String, _ Optional strOrder
  20. Olá! Pretendo que ao colar um valor na célula A2 a célula A3 assuma a data do sistema, e assim sucessivamente ao longo de todas as duas colunas. Ao tentar colocar este pequeno código numa folha de Excel: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Row >= 2 Then Cells(Target.Row, 2) = Data End If End Sub Surge-me sempre o erro de: Run-Time Error -2147417848 (80010108) Uma das soluções indicadas que descobri é o "congelar/fixar" umas linhas, mas não resultou. Obrigado desde já. (URL Imagem/erro:https://www.dropbox.com/s/nsklvq
  21. No Excel faço uma conexão SQL em uma pasta de trabalho com outra pasta de trabalho, conforme código abaixo. Antes verifico se o arquivo existe ou se está aberto em rede. Minha pergunta é: como e onde utilizo as propriedades ConnectionTimeout e CommandTimeout? Se a conexão cair antes do tempo, como faço para verificar e onde insiro a verificação? E se preciso verificar, antes de abrir a conexão, se a mesma está em aberto, pois outras pastas de trabalho também retornam via SQL os dados da mesma pasta de trabalho de origem: fiquei na dúvida se a conexão para os dados de origem
  22. Ola, alguém me poderia ajudar estou a passar um programa de visual Basic 2019 para Visual Basic 2010 Criei uma class e coloquei la dentro um modulo e está me a dar erro no seguinte codigo: Dim bs As New BindingSource bs.DataSource = dtFATURA bs.Filter = "ID_ENTREGA =" & FATURA xlivro.Range("B5").Value = FATURA xlivro.Range("B6").Value = DATA xlivro.Range("B8").Value = CLIENTE xlivro.Range("B7").Value = MORADA For Each view As DataRowView In bs Dim row = view.Row CODIGO = row("CODIGO")
  23. Boa noite, Tenho ficheiros Excel com macros que acedem a ficheiros DBF para obter informação. Para isso utilizo o OLEDB do Visual Fox Pro. Mas não funciona nas versões 64 bits. E ainda não arranjei solução. Alguém sabe como posso, a partir de um Excel, ligar a ficheiros DBF em 64 bits?
  24. Caros Colegas, Desde já parabéns pelo vosso excelente forum. Preciso de uma ajuda de excel se for possível sff. - Tenho um Excel que tem uma Lista de Nomes + 12 Células com Números, do lado direito tem mais uma tabela com os números que saem por semana. https://ibb.co/7gvn5Nv 1º A Ideia aqui, era, sempre que eu introduzisse na tabela direita determinados números, a tabela do lado esquerdo vai ficando colorida se em cada linha tiver o número correspondente. 2º Numa coluna ao lado dos 12 Número chamada "Contagem", ter a contagem das células que estão a cor, ou seja, se
  25. fala galera sou novo aqui , nao entendo muito sobre o VBA no exel mas estou com um problema nao cosigo fazer o msgbox da minha planilha disparar quando um valor de uma celula é maior do que a outra parametros Sub alerta() If Range("T3").Value >= Range("N3").Value Then MsgBox "mensagem de teste", vbExclamation, "ALERTA" Else End If End Sub mas ela nao executa, e nem menos dispara quando o valor da celula T3 é maior ou igual ao valor da celula N3 me ajudem por gentileza, nao consegui resolver esse problema
×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.