Logo Hardware.com.br

Suítes de escritório

Sala destinada para questões, dúvidas e dicas envolvendo pacotes ou suítes de escritório destinados ao Windows: instalação, configuração, desempenho, implementações, suítes Office, Open Office, Libre Office etc.

1

Ajuda com código VBA

Olá!

Estou aprendendo VBA e estou com dificuldade para fazer um código, alguém poderia me ajudar?

Na minha planilha tem a sheet "Plan1", quero criar uma condição para separar as linhas por meio de um código VBA, toda vez que o que estiver na coluna J for diferente da linha anterior, quero que crie um espaçamento de uma linha em branco, considerando que a primeira linha é o cabeçaho e quero que permaneça para todas as divisões.

Como a planilha está:

        
Anexo do post


Como eu quero que fique:     

   Anexo do post
0

Erro de código: Atualizar dados específicos de um consulta do Excel (Refresh All) via Python, sem abrir a planilha.

Boa tarde.

Podem me ajudar com a ponto abaixo ?

Preciso atualizar uma consulta especifica dentro da tabela do Excel, tenho uma base com 2 consultas, preciso atualizar a primeira, quando concluir a atualização da primeira, realizo a atualização da segunda consulta, semelhante a um passo a passo. Após realizar a segunda atualização, realizo a atualização de uma tabela dinâmica. A idéia é fazer isso sem abrir a planilha, ao final dos procedimentos deverá ocorrer o salvamento da planilha. Utilizei o código abaixo, mas a planilha apenas salvou, não realizou o procedimento. Tentei o código abaixo:

Código funcional:


from multiprocessing import connection
import win32com.client

# Start an instance of Excel
xlapp = win32com.client.DispatchEx("Excel.Application&quot

# Open the workbook in said instance of Excel
wb = xlapp.Workbooks.Open(r'C:\Users\A0142868\Downloads\Base_Alimentada.xlsx')

#xlapp.CalculateUntilAsyncQueriesDone()
##xlapp.DisplayAlerts = False

Connection_name_first_query = "Tabela1"
Connection_first_query = wb.Connections(Connection_name_first_query)
Connection_first_query.OLEDBConnection.BackgroundQuery = False
Connection_first_query.Refresh()

xlapp.CalculateUntilAsyncQueriesDone()

Connection_name_second_query = "Tabela2"
Connection_second_query = wb.Connections(Connection_name_second_query)
Connection_second_query.OLEDBConnection.BackgroundQuery = False
Connection_second_query.Refresh()

xlapp.CalculateUntilAsyncQueriesDone()

table_name = "Tb1"
worksheet = wb.Worksheets("Planilha2&quot
worksheet.ListObjects(table_name).Refresh()

table_name2 = "Tb2"
worksheet = wb.Worksheets("Planilha2&quot
worksheet.ListObjects(table_name2).Refresh()

wb.Save()
wb.Close()

xlapp.Quit()

print('Concluido')




Mas resultou no erro abaixo:

Traceback (most recent call last): File "C:\Users\Eu\source\repos\PythonApplication7\PythonApplication7\PythonApplication7.py", line 14, in Connection_fist_query = wb.Connections(Connection_name_first_query) ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ File "C:\Users\Eu\AppData\Local\Temp\gen_py\3.11\00020813-0000-0000-C000-000000000046x0x1x9.py", line 6444, in <b>call</b> ret = self.<em>oleobj</em>.InvokeTypes(0, LCID, 2, (9, 0), ((12, 1),),Index ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ pywintypes.com_error: (-2147352567, 'Exceção.', (0, None, None, None, 0, -2147352565), None) Pressione qualquer tecla para continuar. . .[/font][/size][/color]

0

Como converter Excel com muitas linhas para SQL?

Preciso de ajuda, tenho algumas planilhas pesadas, cerca de 100.000 kb cada por conta do volume de linhas e todas estão no mesmo padrão. Preciso importar para meu site, quando tentei vi que havia uma limitação e fui tentando dividir manualmente essas planilhas. Encontrei que o PHPMYADMIN suporta de 5 a 10 mil linhas... mas o total de linhas de todos os arquivos é de 20 milhoes, portanto eu ficaria uma eternidade subindo no formato de planilha diretamente pelo site...
Se eu conseguisse converter tudo para mySql conseguiria importar no site facilmente... Alguem sabe me dizer se isso é possivel?
0

Gráfico Mapa

Boa tarde Pessoal,

Recentemente instalei a versão excel 2021 para poder conseguir trabalhar com o gráfico mapa, só que não estou conseguindo.
Eu coloco tiro-as as informações necessárias para o gráfico, mais quando insiro o gráfico, fica como se fosse o mapa mundi, não como o mapa das regiões do Brasil, acho que já fiz de tudo e não consigo configurar… sem contar que não estar aparecendo pra mim, a opção geografia, na barra de ferramentas na parte de “Tipos de dados” não parece pra mim tbm.. já fucei em tudo tbm não conseguir habilitar… alguém poderia por favor me ajudar? Se possível com um passo a passo ou uma explicação de como eu faço isso.

Desde já agradeço.
0

Coverter Slides do PowerPoint pra Html

Boa Tarde a todos!
Gostaria de uma ajuda, queria incluir um slide criado no PowerPoint e incluir ele em um gerador de HTML que achei pra fazer testes.
Mas não achei nada nas pesquisas Internet e nem algum site que faça essa conversão do Slide de PowerPoint pra Html.
No desde já agradeço a atenção de vocês e fico no aguardo da ajuda.

Att:. Gervazio

Esqueci por o HTML aqui:
Ps:. Usei um link só pra ilustrar o banner.



NOVO CODIGO DA POSTIMG







NOVO CODIGO DA POSTIMG


banner-loja-teste.gif






Welcome.... Click on the Banner above and visit my Test Store.
Bem vindo.... Clique no Banner acima e visite minha Loja Teste.
0

Como automatizar trabalho no Excel?

Boa tarde, preciso realizar um trabalho com planilhas em excel e sei que posso automatizá-la, mas, não sei como realizar essa automatização de maneira correta.
Meu trabalho resume-se em duplicar dados em linhas em uma tabela, vou mostrar imagem para ilustrar:
a48ab6ec-1e5d-49ab-9125-9a11612035b9?upload=true&fud_access=wJJIheezUklbAN2ppeDns8cDNpYs3nCYjgitr%2BfFBh2dqlqMuW7np3F6Utp%2FKMltnRRYFtVjOMO5tpbpW9UyRAwvLeec5emAPixgq9ta07Dgnp2aq5eJbnfd%2FU3qhn54MwV4aBiDQevCOwrrHiTwkWP6zuOf7l8JSprWLNZvlhjCFhoEQOrl9aCij9v4%2FSkkQS3Zp8qpCCz%2BJDv8tGfBDrBzp3ZPH3oMQewCVM6V5%2BX3cGZPdw%2F%2FlnAGx2100EKhtP6wHAQjGR0Ro9d2vqs43RH7uQ%2BKsqaL%2FB9ZkR17xwN7rI5%2BHyhhV3zqWrFHJNRpK2J3XcijEg%2B0jBpfi1U7pUmYR5lypKcNlevTThj80R4D38riDobZ1icHnF1NQOzS7KhC2Vnk2SyXTajj%2FpQ9VgFOAW1%2BAQVXzFlh5QMmSlk%3DNoutras palavras os dados da linha 2935 devem ser replicados na linha 2936. Assim como, os dados da linha 2937 devem ser copiados/replicados na linha 2938. Isso para todo o documento.

Como posso aperfeiçoar essa atividade sem ter de copiar e colar os dados de uma linha para outra.

**Na imagem acima estou percorrendo a tabela de baixo para cima.

Grato pela atenção
Bruno de Barros
0

Ajuda com planilha em VBA.

Olá , Pessoal gostaria muito da ajuda de vocês.

Estou montando uma planilha, nessa planilha tem a informação se o funcionário finalizar o treinamento, eu quero que apareça a data, só que a data não consigo deixar ela fixa, sempre quando eu entro no outro dia ela atualiza.

Alguém poderia me ajudar com isso? Posso deixar a planilha aqui se for o caso.
0

Erro ao abrir arquivo .xlsx com GNU-Octave

Gente, vou upar o arquivo que quero abrir em octave e gostaria de saber soluções para o meu problema, vou tentar dar todos os tipos de informações possível que consegui até agora:

1- Objetivo: Ler o arquivo .xlsx e manipular os dados em um programa

2- Problema: Não abre de jeito nenhum por estar com nome zoado "CONSUMO MENSAL DE ENERGIA ELÉTRICA POR CLASSE.xlsx" com espaços, maiúsculos e acento...

3- Mudando o nome do arquivo para um formato mais legível: "planilha.xlsx" abre TRANQUILAMENTE com a biblioteca io e com a linha "dados = xlsread('planilha.xlsx')";

4- Já tentei associar o nome do arquivo à uma variável e abrir do mesmo modo com "dados = xlsread(nome_arquivo) mas não vai

5- Usando o comando 'ls' obtive que o nome do arquivo era lido como 'CONSUMO MENSAL DE ENERGIA EL'$'\303\211''TRICA POR CLASSE.xlsx'

6- Alterando para utf-8 descobri que usando ls novamente o octave conseguia ler o 'É' normalmente, mas ainda não abria...

7- Já me certifiquei se a biblioteca io estava atualizada

8- Já me certifiquei que o arquivo está no diretório do script

9- NÃO POSSO ALTERAR O NOME DO ARQUIVO. Utilizando rename consegui abrir o arquivo e dei andamento no decorrer do projeto, porém quando fui até a professora ela disse que não queria que eu fizesse isso mesmo eu voltando o nome do arquivo no final do código novamente (e fez questão de não me dizer como fazer isso) estava empacado nisso a 3 dias e encontrei o rename como solução e acabei voltando a estaca zero, gostaria de saber como resolver o meu problema.

Vou mandar o arquivo da planilha... meio que ela é famosa, visto que são os dados de gasto energético do Brasil todo
0

Criar simples condição IF

Olá, pessoal.

Gosto muito de VBA, mas infelizmente não tenho conhecimento de elaboração de macros.

Estou precisando de duas condições IF, para incluir em duas macros separadamente. Mas, é algo bem simples. Vejamos.

a) Uma delas funcionaria assim:

Se C4 NÃO estiver selecionada, então

selecione C9

Se C4 estiver selecionada, então

não faz nada.



b) A outra seria desta forma:

Se C4 estiver descrito “nº no cabeçalho”, então

execute o código 1

Se C4 NÃO estiver descrito “nº no cabeçalho” E for diferente de vazio, então

execute o código 2


Como eu disse, são duas condições bem simples.

Desde já, agradeço pela ajuda.
0

Erro de tempo de execução 424 no Powerpoint, objeto obrigatório.

Boa noite. Estou tentando fazer um objeto de aprendizagem no powerpoint e estou precisando montar algumas coisas em VB dentro do Powerpoint ,entretanto colocando os códigos está aparecendo esse erro 424.

Segue o código.

Private Sub conferir_Click()
  If slide9.Resultado.Value = 6 Then
      slide9.acertou.Visible = True
  Else
      slide9.errou.Visible = True
  End If
End Sub
0

Ajuda Excel - números não estão sendo reconhecidos como valores

Prezados, boa tarde, tudo bem?

Estou tentando fazer com que o Excel reconheça os valores da planilha em anexo como números, porém não consigo de jeito nenhum. Já utilizei a função valor, formatei, verifiquei se a coluna está em formato de texto, criei uma dinâmica para somar os valores, mas não vai. Poderiam me ajudar por favor? 

O Excel fica realizando a contagem dos números e nunca a soma.


Obrigado!
0

Fórmula Excel com números negativos.

Prezados,
Boa Tarde!
Gostaria da ajuda de vocês para me ajudarem na criação das fórmulas da planilha em anexo. Tem tentado e não consigo.
São situações de percentual de atingimento de determinadas metas, sendo que em alguns casos a meta é negativa, porém se o realizado foi positivo significa superação da meta. Quando a meta é negativa e o resultado fou um valor superior negativo significa meta não atingida e quando a meta é negativa e o realizado é valor negativo inferior a meta terá o percentual atingido.
Acredito que pelo anexo dá pra entender.
Constar na coluna "C" a formula utilizada.
Muito obrigado!
© 1999-2024 Hardware.com.br. Todos os direitos reservados.
Imagem do Modal