Ir para conteúdo
Fórum Script Brasil

ThalesS

Membros
  • Total de itens

    3
  • Registro em

  • Última visita

Sobre ThalesS

ThalesS's Achievements

0

Reputação

  1. ThalesS

    ActiveX problemas

    tenho um arquivo do excel 2007 mas só tenho acesso ao excel 2003, preciso de uma das alternativas: - converter o arquivo pra 2003 sem perdas de informações ( e sem usar programas baixaveis) - conseguir habilitar o Active X no excel 2003, que acredito que já permitira rodar meu arquivo devidamente, alguém pode ajudar?
  2. Então, eu fiz uma macro que permite buscar um endereço eu atribuo ele a uma variável chamada Text. Então eu gravei uma macro que faz importação de tabela, com as configurações do jeito que quero, então vem o problema, o endereço que essa macro tem que usar pra buscar a tabela, é o endereço que esta na variável, e não ta dando certo, sendo que quando eu compilo o programa, até o momento em que vai começar o Active, eu verifico, e ali em Text o programa confirma que há um valor na variável.o Problema é dentro da busca ali do Active mesmo.A mensagem de erro que da quando eu tento compilar o Active é : "invalid procedure call or argument" O que faço pra funcionar?? Sub Macro3() Text = TextBox1.Value ActiveWorkbook.Worksheets.Add With ActiveSheet.QueryTables.Add(Connection:= _ "TEXT;Text.Value", _ Destination:=Range("A1")) .Name = "Table" .FieldNames = True .RowNumbers = False .FillAdjacentFormulas = False .PreserveFormatting = True .RefreshOnFileOpen = False .RefreshStyle = xlInsertDeleteCells .SavePassword = False .SaveData = True .AdjustColumnWidth = True .RefreshPeriod = 0 .TextFilePromptOnRefresh = False .TextFilePlatform = 850 .TextFileStartRow = 7 .TextFileParseType = xlDelimited .TextFileTextQualifier = xlTextQualifierDoubleQuote .TextFileConsecutiveDelimiter = True .TextFileTabDelimiter = False .TextFileSemicolonDelimiter = False .TextFileCommaDelimiter = False .TextFileSpaceDelimiter = True .TextFileColumnDataTypes = Array(2, 2, 2, 2, 2, 2, 2, 2, 2, 2) .TextFileTrailingMinusNumbers = True .Refresh BackgroundQuery:=False End With End Sub
  3. ThalesS

    Abrir Diretorio

    Boa Tarde, Sou inciante em VBA, e preciso muito de ajuda Eu tenho uma planilha que ocasionalmente vai importar alguns valores de um bloco de notas, eu importei do Desktop e organizei em forma de tabela e coloquei na célula A75 o problema é que da muito trabalho fazer isso toda vez, então preciso fazer um botão que abra uma pagina de busca pra procurar o arquivo ( ou seja, quero que seja aberto, não fechado a um lugar ou arquivo). e então apos clicar no botão ele faz essa macro de importação de tabelo e a coloca no devido lugar. Preciso que seja assim o funcionamento, alguém pode me auxiliar? Obrigado
×
×
  • Criar Novo...