Ir ao conteúdo
  • Comunicados

    • Gabriel Torres

      Seja um moderador do Clube do Hardware!   12-02-2016

      Prezados membros do Clube do Hardware, Está aberto o processo de seleção de novos moderadores para diversos setores ou áreas do Clube do Hardware. Os requisitos são:   Pelo menos 500 posts e um ano de cadastro; Boa frequência de participação; Ser respeitoso, cordial e educado com os demais membros; Ter bom nível de português; Ter razoável conhecimento da área em que pretende atuar; Saber trabalhar em equipe (com os moderadores, coordenadores e administradores).   Os interessados deverão enviar uma mensagem privada para o usuário @Equipe Clube do Hardware com o título "Candidato a moderador". A mensagem deverá conter respostas às perguntas abaixo:   Qual o seu nome completo? Qual sua data de nascimento? Qual sua formação/profissão? Já atuou como moderador em algo outro fórum, se sim, qual? De forma sucinta, explique o porquê de querer ser moderador do fórum e conte-nos um pouco sobre você.   OBS: Não se trata de função remunerada. Todos que fazem parte do staff são voluntários.

Pesquisar na Comunidade

Mostrando resultados para as tags ''Visual Basic''.



Mais opções de pesquisa

  • Pesquisar por Tags

    Digite tags separadas por vírgulas
  • Pesquisar por Autor

Tipo de Conteúdo


Categorias

  • Armazenamento
  • Áudio
  • Energia
  • Entrada
  • Feiras e Eventos
  • Gabinetes
  • Memória
  • Museu
  • Placas-mãe
  • Portáteis
  • Processadores
  • Programas
  • Rádio CdH
  • Redes
  • Refrigeração
  • Smartphones
  • Tablets
  • Vídeo
  • Outros

Categorias

  • Blog

Categorias

  • Armazenamento
  • Áudio
  • Câmeras
  • Computadores
  • Consoles
  • Eletrônicos
  • Energia
  • Entrada
  • Gabinetes
  • Impressão
  • Jogos
  • Memória
  • Placas-mãe
  • Portáteis
  • Processadores
  • Programas
  • Redes
  • Refrigeração
  • Smartphones
  • Tablets
  • Vídeo
  • Outros

Categorias

  • Livros disponíveis
  • Livros esgotados

Categorias

  • Cursos

Fóruns

  • Mensagens do Clube do Hardware
    • Regras gerais
    • Boletins do Clube do Hardware
    • Notícias da administração
  • Hardware
    • Recomendações de computadores
    • Placas de vídeo
    • Placas-mãe e chipsets
    • Processadores
    • Problemas de gargalo e desempenho
    • Memórias
    • Armazenamento
    • Refrigeração e superaquecimento
    • Fontes e energia
    • Gabinetes e casemods
    • Placas de som e áudio on-board
    • Periféricos
    • Mac
    • Overclock
    • Hardware - outros
  • Computação móvel
    • Notebooks
    • Tablets
    • Smartphones e apps
  • Redes e Internet
    • Redes e Internet
    • Hospedagem de sites e registro de domínios
  • Segurança da informação
    • Remoção de malware
    • Dúvidas sobre invasões e infecções
    • Programas de proteção
  • Programação e desenvolvimento
    • Java
    • C/C#/C++
    • Pascal/Delphi
    • .NET
    • Bancos de dados
    • Programação web
    • Programação - iniciantes
    • Programação de microcontroladores
    • Programação - outros
  • Software
    • Jogos
    • Pacotes de escritório
    • Computação distribuída (Folding@Home, Bitcoin etc.)
    • Virtualização
    • Design, animação e tratamento de imagens
    • Edição de áudio e vídeo
    • Programas
  • Sistemas Operacionais
    • Recomendação de sistemas operacionais
    • Windows
    • GNU/Linux, BSD, Unix-like e software livre
    • Mac OS
  • Eletrônicos
    • Equipamentos de som, home theaters e gravadores de mesa
    • Televisores e projetores
    • Câmeras e filmadoras
    • Players portáteis
    • Consoles (videogames)
    • GPS
    • Telefonia fixa
    • Eletrônica
    • Retrocomputação
  • Outros
    • Recomendações de serviços e lojas
    • Preços e promoções
    • Notícias
    • Bolsa de empregos, certificações e mercado de trabalho
    • "Causos"
    • Encontros de usuários
    • Feira do Rolo
  • Clube do Hardware
    • Comentários, elogios, críticas, sugestões e questões sobre o Clube do Hardware
    • Comentários de artigos
    • Fórum para testes de funcionalidades

Categorias

  • Hardware
  • Redes
  • Eletrônica
  • Sistemas operacionais

Encontrado 57 registros

  1. Bom Dia Pessoal Estou precisando de uma ajuda com a seguinte situação. Estou procurando um valor por exemplo que não tem nessa tabela, mas está em um intervalo entre dois pontos desta tabela. Por exemplo procuro o valo 3,5432 ai eu gostaria que retornasse a próxima ocorrência registrada acima deste valor, nesta tabela, que no caso seria o 3,8. No caso o que me importa é o valor da tabela ao lado da ocorrência que no caso do 3,8 é o número 20. Hoje estou usando o seguinte código, mas certas vezes quando da um valor na variavel deltad tem muitas casas decimais ele perde a referência e me retorna um valor aleatório. Essas informações são geradas a partir de um sensor com uma amostragem a cada segundo, no final do ensaio essa função find roda e me da os valores que eu gostaria. Ult_Lin = Cells(Rows.Count, 25).End(xlUp).Row ' acha a ultima linha deltad = (Worksheets("Identifica").Cells(Ult_Lin, 25) - Worksheets("Identifica").Cells(2, 25)) * 0.632 ' calcula a variação para achar os 63,2% Set cell = Range(Cells(2, 25), Cells(Ult_Lin, 25)).Find(delta, LookIn:=xlValues) 'localiza a linha onde está o valor de 63,2% da variação linha = cell.Row coluna = cell.Column + 1 Worksheets("Identifica").Cells(23, 16) = Worksheets("Identifica").Cells(linha, coluna) Agradeço desde já a atenção de vocês Att.
  2. Bom dia, gente! Tenho um forms em VBA que serve para salvar documentos: O usuário seleciona o arquivo que ele deseja salvar na pasta padrão através do botão "selecione um arquivo" ai o nome completo do arquivo aparece na caixa ao lado, nome completo desde o drive até a extensão (C:\*---------*.xls), por exemplo ai eu quero além de salvar as informações fornecidas na planilhas (pra pesquisas futuras), eu preciso pegar esse arquivo e salvar um copia numa pasta padrão que é, por exemplo: D:\Nova pasta\"categoria escolhida no forms" dos modos que achei, por exemplo filecopy eu só consegui copiar escrevendo o nome completo do arquivo e do destino... mas não me atende visto que não to encontrando uma maneria de colocar o nome do arquivo de forma escrita pra sintaxe do filecopy funcionar.. Além disso vou precisar pegar o destino novo completo pra salvar na planilha também alguém tem uma solução
  3. Boa tarde! Gostaria de saber se tem como fazer uma programação em VBA que, dado um arquivo (word, powerpoint ou excel), este é salvo em PDF. Tenho que fazer uma planilha de excel, que servirá como banco de dados. Nela tenho um forms pra cadastrar os arquivos, com nome, data e autor. Só que eu gostaria que todos os arquivos disponibilizados fossem em PDF, assim preciso que o usuário informe o nome do arquivo, o local e o proprio VBA abra o arquivo, salve em PDF e disponibilize em uma outra pasta padrão. é possivel fazer com VBA ou todos os arquivos têm que ser salvos manualmente em PDF?
  4. Boa noite pessoal! Estou com o seguinte problema, preciso criar um "robo" que leia os dados de uma determinada célula no excel e digite esses dados em um outro software (software próprio da empresa em que trabalho), porém ele tem de "digitar" exatamente os dados que foran lidos dessa célula nesse SW, tendo em vista que esse programa da empresa não aceita que dados sejam colados nele. Já tenho algo em vba em que consigo posicionar o mouse exatamente no lugar que preciso nesse software e enviar um clique para que os dados sejam inseridos no software, o problema fica por conta de "digitar" os dados lidos na planilha em excel dentro dele (respeitando também os espaços), existe alguma forma de fazer isso? Muito obrigado, desde já agradeço!
  5. Boa tarde amigos, Preciso de ajuda para colocar codigo vba no meu formulario para alterar os dados de ordem de serviço criei um botao para alterar mas tentei alguns codigos e nao tive exito... desde ja agradeço quem poder ajudar-me.. segue anexo...o form é ordem de serviço botao alterar VBA ATUAL.rar
  6. Boa tarde, Dears! Estou com um pequeno problema com uma programação básica ... e conto com ajuda de vocês! desejo criar um botão para executar os seguintes passos. Para minha células ativas (selecionadas) , assim que apertar o botão desejo que seja incluída + informações na célula. Por exemplo minha range a1 tem o valor de " 008 " assim que eu executar minha macro quero que o valor atual permaneça e seja incluída OK e pintar a célula de amarelo ao final range a1 ficaria = " 008 OK " , com o fundo amarelo.. aguardo, atenciosamente, Lucas Henrique!
  7. Boa tarde, Estou com o seguinte problema, tenho uma planilha que funciona por meio de um menu interativo em VBA, já que todos os meus dados estão em apenas uma aba, meu problema é que no momento que faço uma pesquisa que resulta em cerca de 20 linhas da minha base ainda fico com a barra de rolagem representando as 1000 linhas que tenho em todo a base. Gostaria de saber se é possível que a barra de rolagem funcione de forma dinâmica a quantidade de dados apresentados. Att, Victor Benato
  8. Boa tarde Pessoal, estou com dois exercícios de uma lista grande da faculdade que não consigo resolver de jeito nenhum...Ao meu ver são fáceis porém não conheço os comandos necessários ou então não estou interpretando bem Rs... segue os dois abaixo a) O texto abaixo foi retirado da LEI Nº 13.296, DE 23 DE DEZEMBRO DE 2008, que diz sobre a alíquota do IPVA no estado de SP: Artigo 9º - A alíquota do imposto, aplicada sobre a base de cálculo atribuída ao veículo, será de: I - 1,5% (um inteiro e cinqüenta centésimos por cento) para veículos de carga, tipo caminhão; II - 2% (dois por cento) para: a) ônibus e microônibus; caminhonetes cabine simples; c) motocicletas, ciclomotores, motonetas, triciclos e quadriciclos; d) máquinas de terraplenagem, empilhadeiras, guindastes, locomotivas, tratores e similares; III - 3% (três por cento) para veículos que utilizarem motor especificado para funcionar, exclusivamente, com os seguintes combustíveis: álcool, gás natural veicular ou eletricidade, ainda que combinados entre si; IV - 4% (quatro por cento) para qualquer veículo automotor não incluído nos incisos I a III deste artigo. Outra informação importante nesta Lei é que no estado de SP os veículos que foram fabricados a mais de 20 anos são isentos de IPVA. Diante dessas informações, faça o algoritmo que colete a base de cálculo atribuída ao veículo, qual a classificação (valor inteiro de 1 a 4 referente as quatro classificações acima mencionadas) e qual a idade de fabricação do veículo em anos, após isso, informe como saída o valor a ser pago do IPVA no estado de SP ou “isento”. 2- No despachante Universitário, os clientes sempre esquecem ou confundem o mês de pagamento do IPVA de seu veículo, porque o pagamento varia de acordo com o último dígito da placa. Com isso, para ajudar os clientes faça o algoritmo que colete os 4 dígitos da placa de um veículo (não poderá separar os dígitos) e informe em qual mês vencerá o IPVA de acordo com a tabela abaixo: Final 1 Janeiro Final 6 Junho Final 2 Fevereiro Final 7 Julho Final 3 Março Final 8 Agosto Final 4 Abril Final 9 Setembro Final 5 Maio Final 0 Outubro Se puderem resolver pra mim ou então me dar umas dicas agradeço Muito Obrigado!!
  9. olá.. tenho uma duvida tenho um rpg livro jogo (aventuras fantasticas) eu gostaria de trasformar ele em virtual com funcionalidades,deichando todo ele interativo sem nessecidade de dados e lapis.... quem poder me ajudar obrigado pela atenção.....
  10. Olà, Por gentileza alguem sabe como consigo abrir em loop varios workbooks que contem na chave os mesmos nomes? Por exemplo eu conheço duas variaveis do nome, var1 = (traceability_00-04-A3-D2-9E-83) este é o nome da maquina. var2= (2018-02-28) este é a data. Problema: - O nome até a data (traceability_00-04-A3-D2-9E-83_2018-02-28) é sempre o mesmo. O final nao é conhecido porque é un registro que faz a maquina a cada ciclo de operaçao e registra o horario naquele momento, - A minha macro funziona mas abre apenas o ultimo arquivo salvo e nao sei como chamar os outros com o mesmo nome!!! Nomes workbooks dentro do percorso: traceability_00-04-A3-D2-9E-83_2018-02-28T11-53-07-070.data traceability_00-04-A3-D2-9E-83_2018-02-28T11-54-36-458.data traceability_00-04-A3-D2-9E-83_2018-02-28T11-55-32-271.data ecc. Sub Controle_maquina() Dim strPath: strPath = "Z:\PRODUZIONE\Ufficio Programmazione\reports\" Dim sFile sFile = Dir(strPath & "*traceability_00-04-A3-D2-9E-83_2018-02-28*.data*") If sFile <> "" Then Workbooks.Open Filename:=strPath & sFile Else: MsgBox "Arquivo não encontrado !" End If End Sub Obrigado Gianotto
  11. Srs. bom dia, Estamos com uma dificuldade na usina pra fazer apontamentos de serviços executados dos profissionais em campo, dentro da base temos computadores de bancada que eles mesmo se aponta com a ordem de serviço, já no campo eles fazem através de diária que demora para chegar aos digitadores, quando chega esta em atraso, contem erros, volta pra esse mecânico de novo, trazendo muitos transtornos, emitimos relatório diário de como esta a eficiência do apontamento, por colaborador, gostaria de saber se há uma maneira de criarmos uma planilha Excel, com programação em vba, que o mecânico digite essa diária na planilha, no fim do dia ele ter uma opção de envio, e nesse envio conter informações que possamos importar para o sistema, ou mesmo que não venha para importar, mas que venha para ficar fácil a digitação dessa ficha no sistema. e ela fique simples para esse profissional não ter dificuldades para preencher ela, acredito que esta tem que ter o padrão da tela de digitação do sistema, segue anexo a planilha de acompanhamento, a ficha de diária que o profissional preenche e o print da tela que o digitador preenche quando pega as ficha na mão. Me ajudem.... Apontamentos.rar
  12. Srs. bom dia, consegui criar os códigos para a preventiva que estou desenvolvendo o formulário, porém ainda estou com dificuldades para dar os comandos e fazer funcionar, ruim demais não ter conhecimento pleno no assunto, criei 3 formulários, estou apanhando para decidir como será feito... Preventivas VBA.rar Se puderem me ajudar, preciso cadastrar os equipamentos nessa planilha, importar os dados do meu sistema interno que me traz a ultima vez que executou a preventiva, a vida atual, a vida que executou, o período que passou de fazer, ou seja, o desvio que era pra ser feita. Segue anexo a planilha com o formulário feito e com códigos, os relatórios que me traz informações do sistema...estou desesperado, veem o que podem ser feito.
  13. Tenho um macro onde preciso usar as teclas de F1 até F8, cada uma digitando um texto diferente, consegui fazer uma vez, porém a tecla de atalho só funcionava dentro do programa em si. OBS: é apenas pelo F1 - F8, sem botão para ligar ou desligar.
  14. Faça um algoritmo que leia o nome e as três notas dos 10 alunos de uma turma. Armazenar os nomes em um vetor e as notas em uma matriz. O algoritmo deverá imprimir uma lista com: a) os nomes dos alunos reprovados direto (média < 3,0) ; os nomes dos alunos que vão fazer prova final (média >= 3 e média < 7,0); c) os nomes dos alunos aprovados direto (média >=7,0).
  15. Boa noite a todos!! Preciso criar uma macro que salve todos os arquivos em aberto, mas que não seja automático. Preciso criar um formulário com as opções de marcar ou não para vários arquivos em aberto e ai sim salvar (através de botão) somente aqueles arquivos que me convém. Desde já obrigado!! Gostaria que fosse deste modo..
  16. Ola a todos, estou fazendo um programa em vba no qual eu tenho uma listbox onde aparece dados que sao dados atraves de uma pesquisa por datas, ou seja eu gostaria de saber como pesquisar por datas, pois quando utilizo numeros na minha pesquisa nada aparece como resultado. Obrigado e espero que alguem tenha uma solucao pra mim.
  17. Bom dia. Caros, Queria uma ajuda em VB6. Como faço para buscar o nome da aplicação aberta e o PID dela em VB6, e finalizar somente essa sessão aberta? Obrigado!
  18. Prezados, bom dia! Estou desenvolvendo um projeto, onde tenho uma ComboBox com nome de clientes, por exemplo: CLIENTE 01 CLIENTE 02 CLIENTE 03 ------------- Eu tenho TextBoxs com informações como, e-mail do cliente, telefone, e endereço... O que eu gostaria de fazer? Gostaria de quando Selecionar o CLIENTE 01 na ComboBox, ele automaticamente preenchesse as TextBox com as informações que eu definir, ou seja... Selecionei o CLIENTE 01 e Automaticamente já preencheu os campos E-mail do Cliente, Telefone e Endereço. Precisaria de um banco pra isso? Visto que ele vai preencher as textboxs com informações diferentes... Ou tem como através de um código definir qual TIPO DE TEXTO vai entrar em cada TextBox após selecionar o Item na ComboBox?
  19. Bom dia Pessoal, Eu fiz uma macro que: Abre uma nova aba, nesta nova aba dados de outra planilha são importados através do endereço ''C:\Users\A270411\Desktop\PE Cost Estimate\Cost Estimate.csv''. Porém, esta planilha deverá ser utilizada por mais pessoas na minha empresa, sendo que meu ID é o número ''A270411''. Quando eu passar este arquivo para as outras pessoas, que possuem ID's diferentes, elas não conseguirão rodar a macro. Bom o resto da macro é basicamente rodar uma outra macro, copiar e colar. Alguém poderia me ajudar a solucionar esse problema na hora de buscar o endereço do outro arquivo excel .csv ? Obrigado Sub ImportarDados() ' ' ImportarDados Macro ' ' Sheets.Add After:=Sheets(Sheets.Count) With ActiveSheet.QueryTables.Add(Connection:= _ "TEXT;C:\Users\A270411\Desktop\PE Cost Estimate\Cost Estimate.csv", _ Destination:=Range("$A$1")) .Name = "Cost Estimate" .FieldNames = True .RowNumbers = False .FillAdjacentFormulas = False .PreserveFormatting = True .RefreshOnFileOpen = False .RefreshStyle = xlInsertDeleteCells .SavePassword = False .SaveData = True .AdjustColumnWidth = True .RefreshPeriod = 0 .TextFilePromptOnRefresh = False .TextFilePlatform = 65001 .TextFileStartRow = 1 .TextFileParseType = xlDelimited .TextFileTextQualifier = xlTextQualifierDoubleQuote .TextFileConsecutiveDelimiter = False .TextFileTabDelimiter = True .TextFileSemicolonDelimiter = True .TextFileCommaDelimiter = True .TextFileSpaceDelimiter = False .TextFileColumnDataTypes = Array(1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1) .TextFileTrailingMinusNumbers = True .Refresh BackgroundQuery:=False End With Application.Run "'PE Cost Estimate - Template.xlsm'!NumberingMindJet" Range("A2").Select Range(Selection, Selection.End(xlToRight)).Select Range(Selection, Selection.End(xlDown)).Select Selection.Copy Sheets("VM").Select Range("B9").Select ActiveSheet.Paste Application.CutCopyMode = False With Selection .HorizontalAlignment = xlGeneral .VerticalAlignment = xlBottom .WrapText = True .Orientation = 0 .AddIndent = False .IndentLevel = 0 .ShrinkToFit = False .ReadingOrder = xlContext .MergeCells = False End With Range("C1").Select Sheets("Sheet1").Select ActiveWindow.SelectedSheets.Visible = False Sheets("Sheet2").Select ActiveWindow.SelectedSheets.Visible = False Sheets("VM").Select Range("C1").Select End Sub Obrigado
  20. Oi pessoal. Estou desenvolvendo umas soluções em VBA para agilizar algumas análises e gostaria de saber se há como escrever um código para selecionar, em tempo de execução, um item especificado de uma listbox vba. A questão é aproximadamente assim: Digamos que o meu listbox contenha 100 itens. Em resposta a outro procedimento uma variável do tipo inteiro assume valores entre 0 e 99. Quero que o item de índice correspondente ao valor dessa variável seja selecionado (fique lá destacado na listbox). Eu já consegui fazer o que quero com o item referente a esse valor da variável inteira mesmo sem selecioná-lo na ListBox, mas por uma questão estética, e até mesmo intuitiva, eu queria muito destacar o item para u usuário. Valeu
  21. E ai, galera Estou com um problema que não consigo entender. Meu código fica retornando erro 1004 na linha da função workday. Simplificando, ele está assim: feriados = Sheets("Referências").range(cells(4,6),cells(900,6)) d0 = data qualquer d0=WorksheetFunction.Workday(d0,-1,feriados) Testei sem o argumento Feriados e a função funcionou. Também funcionou colocando diretamente Sheets("Referências").range(cells(4,6),cells(900,6)) ao invés de feriados. Como eu uso essa função umas 15 vezes, ficaria ruim colocar isso o tempo todo. Alguém sabe porque dá errado? Obrigado!
  22. 80 65 82 84 69 32 45 32 104 116 116 112 58 47 47 98 105 116 46 108 121 47 Estou tendo alguns problemas em decodificar esses textos pois não sei dizer qual metodo foi utilizado, por tanto não posso procurar por um tratudor na internet. Alguém poderia me dizer qual codificação é essa, ajudaria de mais. Aproveitando a viagem se souber esse também: FKHJDPRV QDSDUWH7-VDEHP
  23. Olá! Estou precisando saber como criar um combobox dependente em uma planilha VBA. Combobox1 tera acesso as planilhas anuais. Ex.: Combobox1 > Jan,Fev,Mar,Abr,Mai. e quando clicar no mês redireciona para planilha. ápos o que for Digitado nas Text dentro do USERFORM, ao clicar em salvar só ira salvar naquela determinada planilha. ex. Combobox1 = Janeiro! Txtbox = Dados! Commandbutton Salvar = Salva informações na planilha = Janeiro
  24. Pessoal boa noite queria saber quais são as melhores soluções de computação em nuvem IaaS, PaaS, SaaS adicionado 3 minutos depois Vir algumas soluções neste site aqui http://informaticadicas.tk/solucoes-de-computacao-em-nuvem-iaas-paas-saas/ mais tô meia confusa. Vocês pode me dar alguma solução de qual a melhor opção
  25. Salve galera, pus duas listbox com multipla seleção pelo activex na aba de desenvolvimento, e funcionou perfeito, mas quando abro de novo, as duas listas ficam mudando o tamanho toda hora, alguem sabe o que pode estar acontecendo?

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas publicações sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×