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.

LaerteB

Membros Plenos
  • Total de itens

    37
  • Registro em

  • Última visita

  • Qualificações

    0%

Reputação

4

Informações gerais

  • Cidade e Estado
    São Paulo/SP
  • Sexo
    Masculino

Meu PC

  • Processador
    AMD FX-8320E
  • Cooler
    Zalman CNPS10x FLEX / FAN COOLER EXCALIBUR 120MM R4-EXBB-20PK-R0
  • Placa de vídeo
    GTX 970 OC 4GB GDDR5 256 BIT da GALAX
  • Placa-mãe
    M5A97 EVO - Rev. 1.xx
  • Memória
    KINGSTON HIPERX FURY 16GB (2x8GB) 1866Mhz DDR3 CL10
  • HDs
    1 - HD WD BLACK 1TB / 1 - HD SEAGATE SURVEILLANCE 3TB
  • Fonte
    CORSAIR TX 750 W
  • Monitor
    LG 21' FLATRON E2250
  • Browser
    FIREFOX
  1. Bom dia, Pessoal!! Agora faz um mês que postei a minha indagação, e por sinal percebi que ninguém neste fórum (como em outros três fóruns que sou inscrito) não teve uma solução para este caso. Bem como não pude esperar tanto, resolvi fazer um método diferente, estou utilizando o "winmm.dll" e gravo as mensagens em formato "wav". Este método é mais trabalhoso, pois tenho que gravar as mensagens com a minha própria voz (editando para não ficar ruim); entendo que isso é somente para os "Windows" legados pela "Microsoft", como no caso deste projeto (para o meu cliente) que é para Windows 7 64 bits. Sei que para o Windows 8.1 em diante não teremos problemas com isso e poderá ser usado a fala em português TTS - Heloísa ou outra que a Microsoft tem nas versões mais recentes dos Windows. Não gosto das outras vozes "comerciais", pois como meus projetos são para os clientes, é melhor as vozes nativas do próprio Windows do que essas que tem que comprar. Gostaria de agradecer a todos que tentaram, mesmo que não colocaram aqui uma resposta, sei que este caso é muito complicado e talvez não tenha uma solução neste momento (pelo fato até de ser Windows 7), mas se alguém encontrar uma solução a escreva aqui, desta forma podemos aprimorar nosso conhecimento e aprendizado. Abraços Laerte.
  2. Bom dia, Pessoal! Estava sumido, muitos problemas particulares.. agora estou voltando. Estou tendo uma dificuldade em um código no VBA Excel (Tenho o Excel 2010 e o 2016 em 32Bits - Windows 7 Premium de 64Bits); seria o seguinte : - Primeiro antes de formatar o meu PC estava funcionando tranquilo a fala em português (BR) no Excel (2010 ou 2016 com o Windows 7 de 64 Bits). - Depois que formatei e instalei o Windows 7 novamente e os Offices 2010 e 2016, e tb o idioma PT-BR para o Narrator (TTS - Heloisa, como tinha instalado anteriormente antes de formatar) e o narrator funciona normalmente em PT-BR; só que quando abro o programa em Excel (que antes funcionava) o código de fala (Speech.Speak) volta na falar em inglês. Já tentei de tudo, tipo desinstalar os pacotes de fala e reinstala-los... não deu certo... tentei até colocar os dois pacotes tanto 32 Bits e 64 Bits juntos e nada (funciona o narrator normalmente como PT-BR, mas no Excel não). Gostaria que se alguém souber me dar uma luz seria de grande ajuda ou outra solução para que o mesmo volte a falar em PT-BR. Abaixo o código que coloco no "UserForm_Initialize" : Application.Speech.Speak ("Olá! Bem Vindo ao Sistema." + CStr(Now)) Uma obs: não sei se tem alguma coisa a ver, tinha instalado antes de formatar o FreeSpeech 2000 (fiz com que funcionasse no Windows 7), mas não quero instalá-lo agora, pois pode dar conflitos com outros programas.. Agradeço e aguardando uma resposta é uma funcionalidade que preciso deixar implementada no meu projeto. Abraços Laerte.
  3. Pessoal, bom dia! Já tentei achar em outros fóruns e nada, todos são somente para uma caixa de imagem (daí existem várias maneiras de colocar e alterar as imagens, mas somente com uma caixa de imagem), para o que estou precisando não encontrei nada.. bem espero que alguém tenha uma ideia de como resolver esse problema, pois acho que exista muitas pessoas que gostariam tb de saber como usar esse recurso... senão vou ter que mudar o meu projeto e seria muito trabalhoso, mas faz parte... Agradeço e aguardando uma ajuda se possível. Laerte.
  4. Oi Pessoal. Alguém já tem alguma sugestão?? estou tentando ainda uma solução, mas não estou conseguindo resolver. Agradeço qualquer ajuda. Laerte.
  5. Boa tarde, Pessoal! Estou precisando de uma ajuda e não estou conseguindo achar na net e nem em livros, desta forma colocarei aqui para que se alguém puder me dar uma luz agradeço. Estou anexando o arquivo em anexo (somente é um exemplo), do meu problema, gostaria que quando eu escolho (por ex.) na combobox o número 3 e sinalizo os checkbox E04 e C05 (no formulário) em seguida apertando o botão OK, a figura (imagem3) apareça a imagem de um cabo (que se encontra no arquivo "Imagem" no C:\). Só que com os códigos que implementei não fazem nada, quero dizer que não acontece nada (nem erro). Outra coisa não será somente duas checkbox que serão assinaladas, poderá ser assinalada somente 1 ou 2 ou 3 ... todas, com as imagens que são (06) que serão escolhidas de acordo com os checkbox assinalados. Aqui o arquivo para ser baixado para um melhor entendimento : https://www.sendspace.com/file/1wm8k0 Abaixo os códigos do botão OK: Private Sub CommandButton1_Click() Dim sPath As String Dim Image1 Dim Image2 Dim Image3 Dim Image4 Dim Image5 Dim Image6 ckS = UserForm1.CheckBox1.Value ckI = UserForm1.CheckBox2.Value ckE = UserForm1.CheckBox3.Value ckD = UserForm1.CheckBox4.Value ckC = UserForm1.CheckBox5.Value ChDrive "C:" ChDir "C:\Imagens\" 'sPath = ActiveWorkbook.Path & "\.ico" figura = ComboBox1.Value Image1 = figura Image2 = figura Image3 = figura Image4 = figura Image5 = figura Image6 = figura If (ckC = True) And (ckD = True) Then figura = LoadPicture("C:\Imagens\cabo.ico") End If End Sub Agradeço e aguardo alguma luz para o meu problema. Abraços Laerte.
  6. Boa tarde Pessoal e Basole. Como havia informado na mensagem anterior, estou deixando os códigos com as alterações na Listview (das três colunas ações só uma está preenchida na planilha, e será preenchida em uma única coluna de Ação da Listview - conforme mensagens acima) para que possam alterar e inserir se adequando aos projetos de vocês; abaixo os códigos do preenchimento da Listview: Private Sub Atualizar() Dim Item As ListItem Dim LinhaFinal As Integer Dim i As Integer, j As Integer ListView1.ListItems.Clear LinhaFinal = Plan1.Cells(Rows.Count, 2).End(xlUp).Row For i = 2 To LinhaFinal Set Item = ListView1.ListItems.Add(Text:=Plan1.Cells(i, 2)) Item.SubItems(1) = Plan1.Cells(i, 3) Item.SubItems(2) = Plan1.Cells(i, 4) Item.SubItems(3) = Plan1.Cells(i, 5) Item.SubItems(4) = Plan1.Cells(i, 6) Item.SubItems(5) = Plan1.Cells(i, 7) Item.SubItems(6) = Format(Plan1.Cells(i, 8), "DD MMM YYYY") 'Formatar data do mês com três letras e sem / For j = 9 To 11 If Sheets("Plan1").Cells(i, j) <> "" Then Item.SubItems(7) = Sheets("Plan1").Cells(i, j) Exit For End If Next j Next i lb_num_registro.Caption = ListView1.ListItems.Count End Sub Agradeço ao Basole a ajuda, muito obrigado. Laerte.
  7. Oi Basole. Agradeço a sua resposta e o arquivo que enviou com a mudança, estou analisando e testando. Até o momento está como eu precisava, muito obrigado. Amanhã vou analisar melhor o código que foi inserido e alterado (para o meu aprendizado), e como sempre vou informar aqui para que outros que tiverem a mesma dúvida possam utilizar dentro de seu projeto. Valeu e obrigado. Laerte.
  8. Olá Basole! Obrigado por responder e estou disponibilizando o arquivo (rar) com alguns dados para a sua análise. Valeu e no aguardo. Laerte. FORMULARIO CADASTRO E PESQUISA teste.rar
  9. Pessoal, Bom dia!! Não tem ninguém que possa me ajudar?? alguma sugestão? ou dica? Aguardando uma resposta, estou precisando de uma solução logo, pois ainda não estou conseguindo resolver. Agradeço muito. Laerte.
  10. Bom dia Pessoal! No aguardo de uma ajuda, ainda não estou conseguindo. Obrigado. Laerte.
  11. Bom dia Pessoal. Estou com um problema que não consigo resolver (verifiquei em meus livros, na net e nada que solucione), o que estou querendo fazer é o seguinte: Inserir dados da planilha 01 na Listview (até aí já está feito), só que tem três colunas nesta planilha 01 que se refere a respostas de ações tomadas, mas só é preenchida (na linha) uma das três (desta forma uma fica preenchida e as outras duas ficam vazias). Na Listview tem todas as colunas da planilha 01 menos duas (eu deixei somente uma coluna de ação tomada), nesta coluna (na Listview) chamada ações será preenchida com a célula da coluna (das três colunas de ações tomadas) que não estiver vazia, e é neste ponto que não estou conseguindo. Gostaria que vocês pudessem me ajudar a informar como devo proceder para que somente uma das células da plan1 (das três colunas ações) que está preenchida preencha a única coluna de Ação da Listview. Estou anexando as imagens da plan1 e da Listview com os códigos desta Listview abaixo. Private Sub UserForm_Initialize() With ListView1 .Gridlines = True 'Exibe/oculta as linhas da grade .View = lvwReport 'Estilo da Exibição .FullRowSelect = True 'Permite Selecionar uma lista 'Adicona Colunas com seus parametros, neste caso Texto, tamanho e alinhamento .ColumnHeaders.Add Text:="REMESSA", Width:=80, Alignment:=lvwColumnLeft .ColumnHeaders.Add Text:="PEDIDO", Width:=40, Alignment:=lvwColumnCenter .ColumnHeaders.Add Text:="DESTINATÁRIO", Width:=140, Alignment:=lvwColumnCenter .ColumnHeaders.Add Text:="CIDADE", Width:=100, Alignment:=lvwColumnCenter .ColumnHeaders.Add Text:="UF", Width:=20, Alignment:=lvwColumnCenter .ColumnHeaders.Add Text:="OCORRENCIA", Width:=120, Alignment:=lvwColumnCenter .ColumnHeaders.Add Text:="DATA OCORRENCIA", Width:=100, Alignment:=lvwColumnCenter .ColumnHeaders.Add Text:="AÇÃO", Width:=120, Alignment:=lvwColumnCenter End With Call Atualizar End Sub Private Sub Atualizar() Dim Item As ListItem Dim LinhaFinal As Integer Dim i As Integer ListView1.ListItems.Clear LinhaFinal = Plan1.Cells(Rows.Count, 2).End(xlUp).Row For i = 2 To LinhaFinal Set Item = ListView1.ListItems.Add(Text:=Plan1.Cells(i, 2)) Item.SubItems(1) = Plan1.Cells(i, 3) Item.SubItems(2) = Plan1.Cells(i, 4) Item.SubItems(3) = Plan1.Cells(i, 5) Item.SubItems(4) = Plan1.Cells(i, 6) Item.SubItems(5) = Plan1.Cells(i, 7) Item.SubItems(6) = Format(Plan1.Cells(i, 8), "DD MMM YYYY") 'Formatar data do mês com três letras e sem / Item.SubItems(7) = Plan1.Cells(i, 9) Next lb_num_registro.Caption = ListView1.ListItems.Count End Sub Private Sub ListView1_ColumnClick(ByVal ColumnHeader As MSComctlLib.ColumnHeader) 'Clicando no cabeçalho de uma coluna da listview e será ordenado para Ascendente e Descendente With ListView1 .SortKey = ColumnHeader.Index - 1 If .SortOrder = lvwDescending Then .SortOrder = lvwAscending Else .SortOrder = lvwDescending End If .Sorted = True End With End Sub Private Sub bt_relatorio_Click() Worksheets("Relatorio").Activate 'Intervalo das linhas e colunas entre A2 até H150 Worksheets("Relatorio").Range(Cells(2, 1), Cells(150, 8)).Select Selection.ClearContents End Sub Obs: como sou novato em vba estou aprendendo, desta forma gostaria que me dessem um parecer de uma solução para este caso, se eu coloca-se a estrutura If … Then … Else, na linha " Item.SubItems(7) = Plan1.Cells(i, 9)" do preenchimento da Listview para selecionar somente os campos preenchidos na Plan1?? se for por este o método me deem um suporte, pois não sei como fazer isso para três linhas como mencionado acima (agradeceria muito). Agradeço e aguardo uma resposta. Laerte
  12. Boa tarde. Olha o meu forte não é render, mas o que Mr. Paglia disse acima é correto e pode te ajudar muito; só gostaria de acrescentar a você, seria de pensar em adquirir uma fonte um pouco mais potente (para futuras atualizações de seu hardware) e aconselharia uma placa de vídeo da Quadro (NVidia) que são ótimas para CAD e Renderização, sei que são caras mas tem algumas mais baratas (modelos mais antigos) que poderiam de dar um rendimento maior nos seus render. Só que com isso não seria muito bom para os jogos, então pode até deixar esta GTX 1080 sniper no momento, se montar outra máquina poderá adquirir uma Quadro. Boa sorte. Laerte
  13. Pessoal, bom dia. Já instalei o FX-8320e na minha placa-mãe M5A97 EVO (da primeira versão) e ocorreu tudo bem, está funcionando normalmente (em Stock). Qualquer alteração aviso aqui e se fizer algum OC também. Desta forma afirmo que este placa-mãe M5A97 EVO Rev. 1.xx , aceita o FX-8320e (com a BIOS atualizada para a versão 1604). até mais Laerte
  14. Rafael Tuco. Obrigado novamente, é verdade nós que mexemos para fazer alterações rsrs.. bem agora vou abrir o PC e trocar o processador pelo FX-8320e, vamos ver como vai sair. Quando tiver tudo em ordem eu informo como foi e se está tudo OK. Ah vou testar algumas alterações se o sistema ficar estável, e passo aqui se ocorreu tudo bem; para acrescentar mais informações para todos que precisarem. Valeu mesmo, até. Laerte.
  15. Valeu Zopek e Rafael Tuco, eu vou trocar o meu processador antigo pelo FX-8320e, só não consigo entender o porque o pessoal da ASUS informar no e-mail que "CPU citado não suportado...Modelos ausentes da lista acima (modelos se encontram no site), não são suportados, podendo causar mensagens de aviso, instabilidades ou danos aos hardwares envolvidos em curto, médio ou longo prazo de uso..". Será que querem que compre a placa-mãe da versão 2.0?? Vou tentar, espero que não dê instabilidade. Se alguém já passou por isso me avise aqui. Obrigado Zopek e Rafael Tuco, se tiverem mais alguma observação estou ouvindo. **************************************** adicionado 24 minutos depois Pessoal, tenho mais uma dúvida, se a BIOS 1604 não reconhecer completamente esse processador, poderá ter conflito no Boosted P states, pois no modelo FX-8320 é esse: 4000 MHz, 1.425V - / 3700 MHz, 1.4125V e no modelo FX-8320e é esse: 4000 MHz, 1.4125V - / 3500 MHz, 1.225V. Eu teria que mudar esses parâmetros na UEFI da ASUS? Laerte

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

×