Search the Community
Showing results for tags 'excel'.
-
Dificuldade com a Estrutura For Each e If em uma macro Excel
Ariane posted a topic in Visual Basic for Applications (VBA)
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 -
Boa tarde! desde ja peço desculpas se não estou no tópico certo mas eu penso que seja este! Eu tenho uma duvida que é a seguinte: Eu gostaria de fazer uma tabela mestra que vai buscar automaticamente os dados a outras tabelas noutros separadores... Por Exemplo Tabela mestra (que me va buscar dados atraves da data a outras tabelas) Tabela Escola (com os afazeres da escola) Tabela Viaturas (com os afazeres das viaturas) Tabela Casa (com os afazeres da Casa) e assim sucessivamente ou seja eu so ia preenchendo as tabelas secundarias e automaticamente a tabela mestra era actua
-
Como formatar número numa célula ativa?
Gleyson posted a topic in Visual Basic for Applications (VBA)
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 -
excel Criar formulário - pesquisa e introdução de dados
apara@sapo.pt posted a topic in Microsoft Office
Bom dia Preciso de ajuda pois nao sei como criar um formulario... Ja criei a base do formulario numa folha do excel (botao abrir formulario EM CIMA) mas agora nao sei como fazer para introduzir os dados que estão na folha... Obectivo: o formulario dar para introduzir dados e gravar na folha do excel existente e chamar os dados pelo campo "CODIGO" - 1 campo da folha do excel Assim teria 2 formas de introduzir os dados, ou na folha do excel ou pelo formulario. Gostava que o formulario tivesse setas para: Seguinte - Anterior - Desproteger - Pesquisar (pelo "codigo" do -
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
-
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á
-
Comando para abrir documento do word
Paulo zuf posted a topic in Visual Basic for Applications (VBA)
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 -
Tópico em destaque: Lista de Formulas de Excel em Inglês e Português
jpaulino posted a blog entry in Blog dos Moderadores
Esta lista não está completa e podem contribuir para melhorar/completar. Inglês Português Descrição ABS ABS Retorna o valor absoluto de um número ACOS ACOS Retorna o arco cosseno de um número ACOSH ACOSH Retorna o cosseno hiperbólico inverso de um número ADDRESS ENDEREÇO Retorna uma referência como texto para uma única célula em uma planilha AND E Retorna VERDADEIRO se todos os argumentos f -
excel Distribuição de recursos humanos por recursos físicos
marciosoares posted a topic in Microsoft Office
Boas a todos. venho pedir a ajuda da comunidade para tentar criar uma folha excel onde possa fazer a distribuição de recursos. Entre outras coisas dedico-me a contratar pessoal para serviços de catering, e como devem imaginar, nos meses de verão os serviços são mais que muitos. já tentei mas sempre sem sucesso criar uma folha excel para esse fim, mas como sou muito noob nisso nunca consegui. Faço todo o trabalho á unha em papel. O que eu pretendia era algo do género: uma folha onde eu pudesse colocar o nome e contacto dos homens que contrato, (recursos humanos), os locais por onde os distri -
VBA Excel Aceder Ficheiros DBF
FernandoPereira posted a topic in Visual Basic for Applications (VBA)
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? -
Comparar valores em tabela e trocar
Afonso Mira posted a topic in Visual Basic for Applications (VBA)
Boa tarde, Tenho uma tabela onde existem peças,com prazos de entrega diferentes. Cada peça necessita de matéria prima para ser feita. Tenho uma macro que me diz quais têm matéria e quais não têm. O problema é que ao preencher as células existem peças com prazo mais pequeno de entrega onde me diz que não tenho matéria prima, e mais a frente tenho peças com mais validade onde já acusa ter matéria prima. O que eu pretendia fazer era: Ele verificava onde não tinha e iria substituir, mas retirando matéria as peças com prazo maior. Alguém me consegue -
Ola pessoal boa tarde, sou novo ainda no VBA. Bom, eu queria um código para que quando aparecer o valor aleatório na célula x, ele gere valores impares até o valor daquela célula X. Por exemplo. Valor da célula X= 304 (valor aleatório) Gerar uma coluna inteira, do A1=5 ATE A289= 300. com os valores espaçados a cada 8 linhas entre eles. Ou seja: A1= 5 pula 8 linhas A9=10 e etc... Comecei com algo, porem quando eu digito valores aleatórios pares ele gera valores até o final da coluna. Vou agradeçer
-
Incompatibilidade na abertura do Excel em computadores diferentes
ECJ69SSS posted a topic in Visual Basic .NET
Boa Tarde, Tenho um script que até então funcionava muito bem em todos os computadores. Mas, aparentemente após alguma actualização do W10 (pelo menos no meu computador), começou a apresentar problemas na configuração e comparação de datas. As datas estão configuradas desta forma ==> objSheet(obj_x).Range("B09:B39").NumberFormat = "yyyy/mm/dd" Quando abre o Excel para todas as maquinas é apresentada a data na célula desta forma ==> 2019-09-01 E até ai tudo as mil maravilhas. O problema é que em um dos computadores, quando abre o Excel a data apresenta -
Boa tarde tenho o seguinte problema: Tenho 2 tabelas: Tabela1 com datas; Tabela2 com datas e valores; Tenho o (SOMA.SE Data da Tabela2;Data Tabela1;VALORES) numa celula da tabela 1; Em VBA tenho o seguinte código: Folha4.Range("C7").Value = WorksheetFunction.SumIf(("R:R"), "B7", ("U:U")) Mas dá-me um erro que não percebo qual seja. Alguém me consegue ajudar?
-
Tranferência De Dados entre Livros
Afonso Mira posted a topic in Visual Basic for Applications (VBA)
Boa tarde tenho o seguinte esquema: Folha Excel com Dados ----- Excel com Macro ----- Folha Excel recebe Dados Precisava de passar os dados da 1º folha para a 2º quando abro o Excel que contêm a macro. Alguém me poderia dar uma ideia do código que vou precisar? Obrigado! Abraços, Afonso Mira. -
Verificar se a célula contem ou não string
Afonso Mira posted a topic in Visual Basic for Applications (VBA)
Boas Estou com algumas dificuldades em fazer um código para ver se a célula contem ou não uma string alguém me poderia ajudar. Obrigado, Afonso Mira -
Boa tarde, Quero usar vários critérios numa formula, mas a formula não está a funcionar. Já tentei com & com , com mais ( ou menos ) e não funciona. Al´guém pode ajudar? a ideia é a formula calcular o aeging de uma coluna de datas mas em vez de aplicar uma formula de cada vez, quero ter tudo numa só. criteriaFormula, isoladas: 0-30 DaysIF(AND($D$1-D3<30),"0-30 Days" 31-60 DaysIF(AND($D$1-D3>31),AND($D$1-D3<60),"31-60 Days") 61-90 DaysIF(AND($D$1-D3>61),AND($D$1-D3<90),"61-90 Days") +90 DaysIF(AND($D$1-D3>90),"+ 90 Days" Junta
-
Boa Tarde, Alguém pode-me ajudar e indicar como é que no excel, numa célula posso através de uma fórmula tirar a hora que está junto à data? Ex: 09/29/11 11:13:41 Quero tirar a data: 11:13:41, sei que há uma fórmula para tal mas não estou a conseguir lá chegar. Obrigada a quem me possa ajudar.
-
Boa noite Utilizo uma excel que funciona corretamente. Mas agora quero fazer a mesma coisa que faço no Excel mas numa aplicação Android (memento database) que tem um campo que permite introduzir código Javascript. Já tentei, mas não estou a conseguir por causa das funções ^2 e EXP() que não são iguais em JS. A 1ª formula em Excel: =SE($G$6>0;0,8+0,1894393 * EXP(-0,012778*G6*1440)+0,2989558* EXP(-0,1932605*G6*1440);0) A 2ª formula em Excel: =SE(E($E$6>0;$G$6>0);(1/(29,54 + 5,000663 * ($I$6*0,88) - 0,007546 * ($I$6*0,88)^2)*1609,344/1440);"-") sendo que em
-
Boa noite, Já nao aparecia por cá a algum tempo XD Preciso de ajuda, pois lembrei de fazer algo mas nao sei como fazer. Analisemos o seguinte caso dentro do mesmo livro excel: Folha1 Coluna A ----- Coluna B Maria ----- 5 Manuel ---- 8 Joaquim ----- 10 Folha2 Coluna A ----- Coluna B Manuel ---- ? Joaquim ----- ? Francisco ------ ? O que eu quero é o seguinte, se o nome da colunaA da folha1 estiver na folha2 ele copia o valor da coluna B da folh
-
Exportar pdf em Excel 2016 - Data com problemas
david.inacio posted a topic in Visual Basic for Applications (VBA)
Boa noite. Tenho um ficheiro que criei no excel 2010 e que gera um pdf a partir do nome original do ficheiro, adicionando a data obtida a partir da céluda A2, como prefixo. Este ficheiro sempre correu bem até actualizar o pc para o excel2016. Deixou de gerar o pdf e dá sempre erro no VBA for Applications, na função cujo código passo a apresentar: Worksheets("Envio Cliente").Activate Dim data2 As String pdfName = ActiveSheet.Name data2 = ActiveSheet.Range("A2").Value pdfName = "_Mapa de Contagem" MsgBox data2 ChDir ActiveWorkbook.Path & "\" fileSaveName = da -
Boa noite, Estou usando parte do codigo abaixo para enviar e-mails de forma automatica pelo excel, mas quero que o inicial do range que no memento é A6 seja mutavel de acordo com o valor especifico de uma celula, Set IntervaloMailing = WrkS.Range("A6:A7") Por exemplo: Se a celula que eu vou usar como referencia estiver com o valor A5 Esta parte codigo ficaria: Set IntervaloMailing = WrkS.Range("A5:A7") ou seja o primeiro valor do range precisa mudar de acordo com o valor que for digitavel na minha celular de referencia que neste caso poderia ser a primeira c
-
bom dia. Necessitava de uma pequena ajuda, se possível claro. Sou técnico de Automação e manutenção industrial, gostaria de saber existe alguma folha de calculo para realizar a gestão de manutenção em equipamentos. Neste momento tenho um documento em Word, onde realizo o registo das Ordem de Serviço (maquina, código, tipo de anomalia, intervenção realizada, material usado, tempo disponibilizado na resolução avaria..), e posteriormente numa folha de calculo em excel faço o registo e atualizo o stok das peças usadas (código, designação peça, nome maquina, quantidade, valor, locali
-
Executar uma macro quando o valor de uma célula se altera
sagostinho posted a topic in Visual Basic for Applications (VBA)
Oi pessoal estou com um problema que não consigo resolver pois os meus conhecimentos de vba ainda são muitos poucos tenho este código que me executa uma macro sempre que uma célula altera mas o problema aqui é que eu tenho de digitar o 1 na célula caso contrário não executa a macro. Private Sub Worksheet_Change(ByVal Target As Range) Application.EnableEvents = False If Not Intersect(Target, Range("A1")) Is Nothing Then Select Case Target Case 1 Call macro1 Case Else End Select End If A -
Problema no código para extrair do DGV para Excel.
Sportsman18 posted a topic in Visual Basic Clássico
Boas, este é o meu primeiro tópico neste fórum. Então é o seguinte, numa fase final do processo do correr do meu programa, tenho uma datagridview com dados e quando carrego no botão , passa os dados da DGV para o excel. O código que uso é este: If DataGridView1.Rows.Count > 0 Then Dim wapp As Microsoft.Office.Interop.Excel.Application Dim wsheet As Microsoft.Office.Interop.Excel.Worksheet Dim wbook As Microsoft.Office.Interop.Excel.Workbook wapp = New Microsoft.Office.Interop.Excel.Application wapp.Visible = True
