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 e sugestões sobre o Clube do Hardware
    • Comentários de artigos
    • Fórum para testes de funcionalidades

Categorias

  • Hardware
  • Redes
  • Eletrônica
  • Sistemas operacionais

Encontrado 12 registros

  1. Estou fazendo um recibo pelo excel, e pretendo facilitar as coisas kk, como por exemplo fazer um programa dentro do próprio excel para ser mais eficiente, pois no meu local de trabalho é muito movimentado. Queria um código que ao pesquisar o número do recibo gerasse as informações pedidas... Grato!
  2. Bom dia. Preciso de uma ajuda em um quis que montei no Visual Basic. Quero mostrar quais perguntas estão sendo mais erradas. A partir disso vou criar um gráfico. Mas minha dúvida é na construção do código para contabilizar as perguntas. Alguém pode me ajudar?
  3. Visual Basic Samsung Galaxy J1 (2016) Cabo OTG

    Boa noite possuo um celular Samsung Galaxy J1 (2016) e gostaria de saber se ele é compativel com o cabo OTG
  4. Ontem baixei o VScommunity e usei normalmente, desliguei o pc pois tive que sair e ao voltar meu visual studio ao abrir aparece uma caixa com a seguinte mensagem: "Uma exceção foi acionada pelo destino de uma chamada." E depois fecha. Já reinstalei e continua assim e não sei o que fazer
  5. Como está no título, eu gostaria de saber como passar vários comandos pelo Run em VBS Ex: tentei assim. Set Comando=Wscript.CreateObject("Wscript.Shell") Comando.Run "cmd /c set batata=doce echo %batata% pause" e assim(aqui ele 3x o prompt executado os respectivos comandos Comando.Run "cmd /c set batata=doce" Comando.Run "cmd echo %batata%" Comando.Run "cmd pause"
  6. Pessoal, à um tempo atrás fiz um programa em visual basic interligado com um banco de dados do access, só que toda vez que eu inicio o programa e tento entrar na parte do banco de dados que fiz aparece o seguinte erro da foto: " G:\Banco de Dados\BDCliente.mdb is not a valid path, make sure that the path name is spelled correctly and that you are connected to the server on which the file resides. o programa ele estava no meu pendrive, e só consigo utilizar ele se o diretório for G:, não conseguindo usar ele em outros computadores, como faço pra resolver isso? Ainda sou iniciante em VB e não manjo muita coisa Desde já obrigado
  7. Boa noite, galera. Então, estou com uma dúvida numa planilha na qual preciso fazer uma alteração no código VBA. Como mostra a foto da planilha geral anexada, tenho uma planilha onde, no lado esquerdo, tenho diversos botões de seta. Ao selecionar a célula C"X" e clicar na seta ao lado, tendo antes selecionado um ITEM do banco de dados superior, todas as informações sobre o produto vão para aquela linha a partir do seguinte código: "Sub Macro5() Range("C5").Select Application.CutCopyMode = False Selection.Copy Range("C23").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("E5:N5").Select Application.CutCopyMode = False Selection.Copy Range("E23").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False End Sub" O que eu quero fazer? Gostaria de criar apenas um botão de seta que, clicando em qualquer célula C"x" eu conseguisse passar o valor do banco de dados para ela para que não precisasse ter um botão em cada linha e sim apenas um botão geral. Sei que para isso eu devo criar uma célula variável A para que ela receba o valor do banco de dados e envie para a célula que eu clicar (como está atualmente; no caso eu clico numa célula da coluna C e os dados da linha E5:N5 são copiados a respectiva linha clicada, exemplo: cliquei em C24 após ter selecionado um produto, depois cliquei na seta esquerda, o nome do produto e as informações contidas em E5:N5 são copiadas) Gostaria de ajuda, desde já muito obrigado!
  8. Viva pessoal, Sou completamente novato em VBA e preciso de ajuda. Contexto: Tenho o Livro A.... https://www.sendspace.com/file/tbc57e ... e o Livro B https://www.sendspace.com/file/b3sxsv No livro B pretendo preencher os "campos transatas", "finalizadas" e "aguardar", com a informação contida nos respetivos campos do Livro A. Problema: A informação do livro A é produzida periodicamente de forma completamente aleatória. Cada vez que o Livro A é produzido, os "códigos do processo" não são sempre os mesmos, nem aparecem pela mesma ordem. Logo, no livro A tenho que verificar, primeiramente, se existe o "Código do processo” que pretendo preencher no livro B. Se o “código do processo” do Livro B não existir não preenche nada. Se existir, a rotina terá que buscar os valores "transatas", "finalizadas" e "aguardar" presentes no livro A e preencher automaticamente os respetivos campos no livro B. Obrigado pela ajuda.
  9. Pessoal, boa noite. Como realizar uma procv (Vlookup) com mais de um critério? Exemplo eu tenho uma planilha com uma base de dados (Matrícula, Nome, CPF e RG) sendo que a matrícula está em "Texto". Quero fazer um procv(Vlookup) no VBA a partir da Matrícula para buscar os outros dados: Nome, CPF e RG. Eu consegui fazer com os dados na mesma pasta de trabalho com a matricula em número buscando apenas o nome. O que eu quero é buscar os outros dados porém em outra pasta de trabalho. Tentei fazer assim: Na mesma Pasta de trabalho: Dim i As Integer FinalRow = Cells(Rows.Count, 1).End(xlUp).Row On Error GoTo TratarErro For i = 2 To FinalRow Cells(i, 2) = Application.WorksheetFunction.VLookup(Cells(i, 1), Worksheets("Planilha2").Range("A:B"), 2, 0) Next i Exit Sub TratarErro: If Err.Number = 1004 Then MsgBox "Código não encontrado", vbExclamation, "Erro" End If Este em outra pasta de trabalho: Sub Localizar() Dim i As Integer FinalRow = Cells(Rows.Count, 1).End(xlUp).Row On Error GoTo TratarErro For i = 2 To FinalRow Cells(i, 2) = Application.WorksheetFunction.VLookup(Cells(i, 1), Workbooks.Open("C:\BASE PROCV.xlsx").Worksheets("Planilha1").Range("A1:B22"), 2, 0) Next i Exit Sub Poderiam me ajudar?
  10. Boa noite pessoal, tudo bem?! Estou com dificuldades para executar uma rotina teoricamente simples no VB: Estou lendo dados de um dispositivo através da porta serial de meu PC. Esses dados eu necessito armazenar em uma planilha para posterior tratamento. O problema é o seguinte: Tenho que enviar vários comandos ao meu dispositivo, onde cada comando me reporta uma informação (ex. envio um comando e obtenho temperatura, envio outro comando e obtenho tensão, etc). Necessito que isso seja feito ciclicamente. Montei uma planilha no excel com os códigos referentes a cada grandeza que preciso ler (cada código em uma coluna) e cada valor que obtenho de retorno a cada solicitação, quero direcionar na coluna correspondente.... Montei o código, e quando o executo, o mesmo varre as células que desejo, porém não trás os valores....deixa a célula em branco. Se eu depurar o programa o mesmo está funcionando perfeitamente, trazendo os valores exatamente como desejado... Segue o trecho de interesse do código: < For Contador = 1 to 23 SComm1.Output = ActiveCell.Value 'escrevo o valor da célula (comando para obter a grandeza desejada) na saída da serial Sleep 300 'pausa em milisegundos ActiveCell.Offset (1,0).Select 'Movimento o cursor para a célula onde desejo que a resposta seja gravada myData = SComm1.Input 'Efetuo a leitura do dado na serial ActiveCell = myData 'Coloco o dado lido na célula de interesse ActiveCell.Offset(-1,1).Select 'movimento o cursor para a nova célula onde está o próximo comando referente a grandeza desejada Next Contador > O detalhe é que na primeira solicitação de leitura, o dado recebido é escrito normalmente no lugar desejado, porém nas demais vezes, a célula fica em branco.....alguém já passou por uma situação como essa?! Qualquer ajuda será extremamente bem vinda!!! Agradeço antecipadamente... Att. Murilo
  11. Pessoal. Preciso de uma ajuda para criar uma macro que escolha a cor da legenda do gráfico. Tenho vários gráficos que vou usar aqui como exemplo, nome de funcionários. Em alguns gráficos pode ter Fernando, Fábio, etc, outras pode ter só Fernando. Nem todos os funcionários estão presentes em todos os gráficos. Preciso que em todos os gráficos o "Fernando" seja da cor vermelha e a "Fábio" em todos os gráficos que ela aparecer seja da cor azul. Segue abaixo o código que eu já tenho, mas não está dando certo. ;( Sub macro_grafico() If ActiveSheet.ChartObjects("Gráfico 20").Activate Then ActiveChart.SeriesCollection("Fernando").Select With Selection.Format.Fill .Visible = msoTrue .ForeColor.RGB = RGB(255, 255, 0) .Transparency = 0 .Solid End With ElseIf ActiveChart.SeriesCollection("Fabio").Select Then With Selection.Format.Fill .Visible = msoTrue .ForeColor.RGB = RGB(255, 235, 158) .Transparency = 0 .Solid End With ElseIf ActiveChart.SeriesCollection("Priscilla").Select Then With Selection.Format.Fill .Visible = msoTrue .ForeColor.RGB = RGB(204, 51, 0) .Transparency = 0 .Solid End With ElseIf ActiveChart.SeriesCollection("Bruna").Select Then With Selection.Format.Fill .Visible = msoTrue .ForeColor.RGB = RGB(49, 133, 156) .Transparency = 0 .Solid End With ElseIf ActiveChart.SeriesCollection("Bárbara").Select Then With Selection.Format.Fill .Visible = msoTrue .ForeColor.RGB = RGB(102, 0, 102) .Transparency = 0 .Solid End With ElseIf ActiveChart.SeriesCollection("Julio").Select Then With Selection.Format.Fill .Visible = msoTrue .ForeColor.RGB = RGB(195, 214, 155) .Transparency = 0 .Solid End With ElseIf ActiveChart.SeriesCollection("Henrique").Select Then With Selection.Format.Fill .Visible = msoTrue .ForeColor.RGB = RGB(204, 193, 218) .Transparency = 0 .Solid End With ElseIf ActiveChart.SeriesCollection("Cassiano").Select Then With Selection.Format.Fill .Visible = msoTrue .ForeColor.RGB = RGB(55, 96, 146) .Transparency = 0 .Solid End With ElseIf ActiveChart.SeriesCollection("Leandro").Select Then With Selection.Format.Fill .Visible = msoTrue .ForeColor.RGB = RGB(64, 49, 82) .Transparency = 0 .Solid End With ElseIf ActiveChart.SeriesCollection("Jorge").Select Then With Selection.Format.Fill .Visible = msoTrue .ForeColor.RGB = RGB(33, 89, 104) .Transparency = 0 .Solid End With ElseIf ActiveChart.SeriesCollection("Guilherme").Select Then With Selection.Format.Fill .Visible = msoTrue .ForeColor.RGB = RGB(127, 127, 127) .Transparency = 0 .Solid End With ElseIf ActiveChart.SeriesCollection("Lucas").Select Then With Selection.Format.Fill .Visible = msoTrue .ForeColor.RGB = RGB(119, 147, 60) .Transparency = 0 .Solid End With ElseIf ActiveChart.SeriesCollection("Pedro").Select Then With Selection.Format.Fill .Visible = msoTrue .ForeColor.RGB = RGB(1, 13, 255) .Transparency = 0 .Solid End With ElseIf ActiveChart.SeriesCollection("Sergio").Select Then With Selection.Format.Fill .Visible = msoTrue .ForeColor.RGB = RGB(152, 72, 7) .Transparency = 0 .Solid End With ElseIf ActiveChart.SeriesCollection("Gustavo").Select Then With Selection.Format.Fill .Visible = msoTrue .ForeColor.RGB = RGB(155, 187, 89) .Transparency = 0 .Solid End With ElseIf ActiveChart.SeriesCollection("Daniele").Select Then With Selection.Format.Fill .Visible = msoTrue .ForeColor.RGB = RGB(0, 0, 0) .Transparency = 0 .Solid End With End If End Sub Agradeço muito se puderem ajudar.
  12. Bom dia sou estudante de engenharia e minha professora passou este exercício, fiz os códigos de acordo com o pouco que sei, mas não da acerto alguém poderia me ajudar a resolver. Implementar um algoritmo capaz de cadastrar 10 nomes de pessoas em um vetor. Deve-se poder pesquisar um nome dentre os cadastrados. Se o nome ele deve ser incluído exibindo uma mensagem ao usuário. string[] nomes = new string[10]; nomes[0] = "Gabriela"; nomes[1] = "Carolina"; nomes[2] = "Cleonice"; nomes[3] = "Augusto"; nomes[4] = "Romulo"; nomes[5] = "Rosana"; nomes[6] = "Taty"; nomes[7] = "Lyla"; nomes[8] = "Marilia"; nomes[9] = "Sergio"; int = nomes[i]; { for (int i = 0; i <= 9; i++) ; } { nomes[i] = nomes[i]; } if (int i = 0; i = nomes[i]; i++) { listBox1.Items.Add("Nome econtrado"); } else { listBox1.Items.Add("Nome não econtrado"); }

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

×