Kleber Bispo

@Henrique - RJ é um SSD

@Henrique - RJ @Henrique - RJ Henrique, é um bom notebook com Ryzen 7, placa de vídeo dedicada e memória. Por isso fiquei surpreso de ele ficar extremamente lento utilizando o Linux.

Okay, boa tarde! Instalei o Linux em dual boot com windows por suas vezes e distros diferentes (mint e Ubuntu), mas em ambas as tentativas, o Linux ficou extremamente lento e não reconhecia o wi-fi. Alguém já passou por esse problema. Eu fiz a instalação bdo Linux ao lado da instalação do windows. obrigado.

Sua macro é mais inteligente. Vou utilizar. Na verdade, essa tabela que estou transformando em txt está preenchida com fórmulas. Vi que o erro acontece quando existe #Ref ou #Valor em alguma célula. Vou ter que tratar isso. Obrigado.

Dá uma olhada nesse link da hashtag treinamentos, fazem um cadastro de clientes sem o VBA. https://www.hashtagtreinamentos.com/cadastro-de-clientes-no-excel?gclid=CjwKCAiA3KefBhByEiwAi2LDHHgheBscP2PLTy3GKO7G7FhHhwRvzi1kJ1rAOWcZr4Ft-svvY2RwdBoC_zMQAvD_BwE

Olá, boa noite! Tenho uma macro que exporta os dados de uma determinada planilha para um arquivo de texto. Funciona que é uma beleza! Mas ao utilizar está macro em uma planilha com muitas colunas ocorre erro. Notei que acima de 25 colunas gera um erro em tempo de execução 13: tipos incompatíveis. É possível contornar? Essa planilha tem mais de 40 colunas... Sub gerar_txt() Dim linha As Integer linha = 2 Open Application.ThisWorkbook.Path & "\" & "NomeDoArquivo" & ".txt" For Output As 1 Do Until plan1.Cells(linha, 1) = "" v1 = plan1.Cells(linha, 1).Value v2 = plan1.Cells(linha, 2).Value v3 = plan1.Cells(linha, 3).Value v4 = plan1.Cells(linha, 4).Value v5 = plan1.Cells(linha, 5).Value v6 = plan1.Cells(linha, 6).Value v7 = plan1.Cells(linha, 7).Value v8 = plan1.Cells(linha, 8).Value v9 = plan1.Cells(linha, 9).Value v10 = plan1.Cells(linha, 10).Value v11 = plan1.Cells(linha, 11).Value v12 = plan1.Cells(linha, 12).Value v13 = plan1.Cells(linha, 13).Value v14 = plan1.Cells(linha, 14).Value v15 = plan1.Cells(linha, 15).Value v16 = plan1.Cells(linha, 16).Value v17 = plan1.Cells(linha, 17).Value v18 = plan1.Cells(linha, 18).Value v19 = plan1.Cells(linha, 19).Value v20 = plan1.Cells(linha, 20).Value v21 = plan1.Cells(linha, 21).Value v22 = plan1.Cells(linha, 22).Value v23 = plan1.Cells(linha, 23).Value v24 = plan1.Cells(linha, 24).Value v25 = plan1.Cells(linha, 25).Value v26 = plan1.Cells(linha, 26).Value v27 = plan1.Cells(linha, 27).Value v28 = plan1.Cells(linha, 28).Value v29 = plan1.Cells(linha, 29).Value v30 = plan1.Cells(linha, 30).Value v31 = plan1.Cells(linha, 31).Value v32 = plan1.Cells(linha, 32).Value v33 = plan1.Cells(linha, 33).Value v34 = plan1.Cells(linha, 34).Value v35 = plan1.Cells(linha, 35).Value v36 = plan1.Cells(linha, 36).Value v37 = plan1.Cells(linha, 37).Value v38 = plan1.Cells(linha, 38).Value v39 = plan1.Cells(linha, 39).Value v40 = plan1.Cells(linha, 40).Value v41 = plan1.Cells(linha, 41).Value v42 = plan1.Cells(linha, 42).Value v43 = plan1.Cells(linha, 43).Value v44 = plan1.Cells(linha, 44).Value v45 = plan1.Cells(linha, 45).Value Print #1, v1 & "|" & v2 & "|" & v3 & "|" & v4 & "|" & v5 & "|" & v6 & "|" & v7 & "|" & v8 & "|" & v9 & "|" & v10 & "|" & v11 & "|" _ & v12 & "|" & v13 & "|" & v14 & "|" & v15 & "|" & v16 & "|" & v17 & "|" & v18 & "|" & v19 & "|" & v20 & "|" & v21 _ & v22 & "|" & v23 & "|" & v24 & "|" & v25 & "|" & v26 & "|" & v27 & "|" & v28 & "|" & v29 & "|" & v30 & "|" & v31 _ & v32 & "|" & v33 & "|" & v34 & "|" & v35 & "|" & v36 & "|" & v37 & "|" & v38 & "|" & v39 & "|" & v40 & "|" & v41 _ & v42 & "|" & v43 & "|" & v44 & "|" & v45 linha = linha + 1 Loop Close 1 MsgBox "Processo concluído!" End Sub

@lonan A dica funciona sim, jovem. Seu código que não está certo. Você está fazendo a conexão e a consulta com o pyodbc. Depois você cria a variável dados que recebe o método read_sql do pandas e passa apenas o caminho do banco de dados e não passa a string de conexão. O erro que o python informou mostra isso: TypeError Traceback (most recent call last) Input In [878], in <cell line: 1>() ----> 1 dados = pd.read_sql(r'C:\Users\romilson\Desktop\SDC AcademY 2022\Dados\Estados.accdb') 2 print(dados.read()) TypeError: read_sql() missing 1 required positional argument: 'con' fiz dois testes e funcionaram. Atualiza a variável "caminho_do_arquivo" e o nome da tabela na consulta SQL: Consulta só com pyodbc: import pyodbc driver = "DRIVER={Microsoft Access Driver (*.mdb, *.accdb)}" caminho_do_arquivo = "DBQ=.\\conexao_python_access.accdb" string_de_conexao = driver + ";" + caminho_do_arquivo consulta = ("SELECT * FROM Data") conexao = pyodbc.connect(string_de_conexao) cursor = conexao.cursor() cursor.execute(consulta) linhas = cursor.fetchall() for linha in linhas: print(linha) conexao.close() Consulta com pyodbc e pandas: import pyodbc import pandas as pd driver = "DRIVER={Microsoft Access Driver (*.mdb, *.accdb)}" caminho_do_arquivo = "DBQ=.\\conexao_python_access.accdb" string_de_conexao = driver + ";" + caminho_do_arquivo consulta = ("SELECT * FROM Data") conexao = pyodbc.connect(string_de_conexao) df = pd.read_sql(consulta, conexao) print(df) conexao.close() Testa e depois chama se precisar de mais alguma ajuda!

@Pedro Herrmann você conseguiu fazer? Você seleciona dominio remetente = empresa e depois seleciona a ação mover para a pasta empresa.

Olá, bom dia! Quando abrimos uma arquivo Excel pressionando a tecla shift, inibimos o disparo de uma macro do evento open. É possível fazer este comando em vba? Abrir uma pasta de trabalho, inibindo a execução de macros auto-open.

@AfonsoMira Não deu certo. É estranho esse erro. Em todo caso, agradeço muito a atenção!

Olá, tudo certo? Fiz uma macro no Access que gera um Recordset e salva os dados em arquivos Excel diferentes. Quando a macro roda a primeira vez não ocorre erro, mas ao rodar pela segunda vez, ocorre um erro em tempo de execução e diz que a varíavel não está definida. O que poderia ser? projeto access.zip

@Swalls Olha, no excel online a linguagem de programação utilizada é o Typescript. Agora inclusive, é possível criar pequenos apps no excel online e importar para o excel desktop.

Olá, gostaria de automatizar um processo de criação de relatório no Access, daí pendei em gravar uma macho, assim como no Excel, mas não encontrei o gravador. Essa funcionalidade não está disponível no Access?

Olá, tenho no ubuntu a versão 3.8 do python, mas instalei a versão 3.10.2 para estudar as novas funcionalidades. O problema é que não consigo instalar o pip para esse "novo python". Tudo que tentei, acabou instalando o pip para a versão default do python. Como é possível instalar o pip no python 3.10.2? Att.

@Basole Deu certo. Funcionou! Desculpe me alongar, mas o que exatemente acontece nesse comando: Set fs = CreateObject("Scripting.FileSystemObject") ? E no caso as variáveis tem que ser declaradas com o tipo "object"? Obrigado!