isabela queiroz

19 horas atrás, isabela queiroz disse:

@Midori basicamente isso

 

 

esse comando procb é por celula ou tem como fazer usando o FIND? porque o numero de colunas podem mudar conforme o excel que recebo, precisava que fosse feito no vba.

@Midori basicamente isso

34 minutos atrás, isabela queiroz disse:

@Midori basicamente isso, como faria isso pelo PROCB?

 

 

@Midoriaqui, algumas informações não estão aparecendo pois elas vem de outras planilhas, não enviei aqui por ser da empresa 

HP COMP DATA.xlsx

preciso que essas ações sejam automatizadas através do vba:

Ir em na planilha que se chama "sheet1" pegar a primeira familia(produto), procurar na coluna familia(produto) da planilha "tamplete_peso_medida"essa é a planilha que se chama "sheet1"

 essa é a planilha que se chama "tamplate_peso_medida"

depois que encontrar copiar todas as informações dela, e jogar na planilha sheet1 sem formatação.

Para localizar as colunas, preciso que seja pela opção FIND pois o número de colunas pode mudar no template

@Midori ah sim, perdão pela ignorância, entendo muito pouco de VBA. Obrigada, resolveu aqui!

@Midori

não to sabendo arrumar, ta aqui o codigo inteiro, ele ta ficando em um loop esquisito dentro do "do while"

basicamente ele faz: 

Do While ActiveCell.Row <= ultcell.Row

    If Count = 0 Then

End If

Loop

ta grifado aqui em baixo os locais que ta travando 

Sub TESTANDDOWHILE()

'---------------tudo funciona------------------------

Dim pesquisa                As String
Dim pesquisadois            As String
Dim texto                   As Variant
Dim ultcell                 As Range
Dim c                       As Range
Dim firstAddress            As String
Dim i                       As Integer
Dim w                       As Worksheet 'dando nome a planilha
Dim vRNG                    As Range 'toda faixa de celula da planilha utilizada

pesquisa = "<"
pesquisadois = ">"

texto = ActiveCell.Text

Set w = Sheet2 'dando nome a planilha
Set ultcell = Sheet2.Range("M100000").End(xlUp)

w.Select 'selecionando
w.Range("M2").Select 'selecionando a coluna M

'------------escolhendo o <--------------------------------------------------------

Dim Count As Integer
Dim Celll As Object
Dim N As Integer

'--------------FUNCIONANDO aaaaaaaaaa----------------------------------------------------

Do While ActiveCell.Row <= ultcell.Row

    If Count = 0 Then
        If pesquisa = "" Then GoTo Done
            For Each Celll In Selection
                N = InStr(Celll.Value, pesquisa)
                While N <> 0
                    Count = Count + 1
                    N = InStr(N + 1, Celll.Value, pesquisa)
                Wend
             Next Celll
      
'----------------testando o segundo >----------------------------------------------------

    If Count = 0 Then
        If pesquisadois = "" Then GoTo Done
            For Each Celll In Selection
                N = InStr(Celll.Value, pesquisadois)
                While N <> 0
                    Count = Count + 1
                    N = InStr(N + 1, Celll.Value, pesquisadois)
                Wend
            Next Celll
   
   
  '--------------------------tem que ser aqui se não entra em loop infinito----------------------------------------------------------

  If InStr(Celula, "<") And InStr(Celula, ">") Then
        Call Celula.Replace("<", "")
        Call Celula.Replace(">", "")
    End If
  

'-----------------------------------------------------------------------------------------------
    
   
   MsgBox Count1 & Count2 & " Occurrences of " & pesquisa & pesquisadois 'conferindo se achou
Done:

        
    
'-----------------------------FUNCIONA O LOOP------------------------------------------------------------------
    
               
            ActiveCell.Offset(1, 0).Select
               texto = ActiveCell.Text

End If
End If

Loop

End Sub

  
Sub Macro()
    Call RemoveCaracteres([A1])
End Sub

preciso fazer um vba para uma planilha com umas descriçoes que tem informações como "CONTAINER FOR IMAGE <COMMERCIAL_SOFTWARE_7.4.1>"

porém o aplicativo da minha empresa não reconhece os dados se estiverem com "< >", a ideia é fazer um VBA que resolve o problema removendo esses caracteres, apenas quando aparecerem juntos na celula, se houver a ocorrencia de somente um não precisa remover, segue como pretendo fazer, porém sou iniciante em vba e não sei como fazer o codigo.

eu pensei numa lógica assim: identificar se existe o caractere < na descrição, se existir, identificar a posição do caractere
identificar se existe o caractere > na descrição, se existir, identificar a posição do caractere
depois validar se os 2 ocorrem ao mesmo tempo, se sim, removê-los se não ocorrem ao mesmo tempo não faz nada e começa a analisar a próxima descrição

uma variavel para guardar o dado encontrado, mas faria por comparação. Tipo o caractere analisado é iguarl a <? e depois uma outra para fazer a verificação para o >. tendo os dois retornos positivos, eu faria a troca deles, usando a referencia (posição).

Ou quem sabe duas variaveis mas apenas retornando a posição deles na frase, se as duas forem maior que zero, faz a troca também..

as informações estão na coluna "M" no "sheet2"

exemplo de um codigo que comecei mas não sei pra onde ir depois disso pra fazer ele reconhecer os dois ocrrendo junto, fora que ta apresentando problemas e entrando em loop depois de encontrar as ocorrencias na celula

Sub TESTANDDOWHILE()

'---------------tudo funciona------------------------

Dim pesquisa                As String
Dim pesquisadois            As String
Dim texto                   As Variant
Dim ultcell                 As Range
Dim c                       As Range
Dim firstAddress            As String
Dim i                       As Integer
Dim w                       As Worksheet 'dando nome a planilha
Dim vRNG                    As Range 'toda faixa de celula da planilha utilizada


pesquisa = "<"
pesquisadois = ">"

texto = ActiveCell.Text

Set w = Sheet2 'dando nome a planilha
Set ultcell = Sheet2.Range("M100000").End(xlUp)


w.Select 'selecionando
w.Range("M2").Select 'selecionando a coluna M



Dim Count As Integer
Dim Celll As Object
Dim N As Integer



Do While ActiveCell.Row <= ultcell.Row

    If Count = 0 Then
        If pesquisa = "" Then GoTo Done
            For Each Celll In Selection
                N = InStr(Celll.Value, pesquisa)
                While N <> 0
                    Count = Count + 1
                    N = InStr(N + 1, Celll.Value, pesquisa)
                Wend
             Next Celll
      


    If Count = 0 Then
        If pesquisadois = "" Then GoTo Done
            For Each Celll In Selection
                N = InStr(Celll.Value, pesquisadois)
                While N <> 0
                    Count = Count + 1
                    N = InStr(N + 1, Celll.Value, pesquisadois)
                Wend
            Next Celll
   
   
   MsgBox Count1 & Count2 & " Occurrences of " & pesquisa & pesquisadois 'conferindo se achou
Done:   
          
            ActiveCell.Offset(1, 0).Select
               texto = ActiveCell.Text


End If
End If

Loop

End Sub

to com um i3 9100f na caixa com nota fiscal tudo certinho

infelizmente o lacre ja ta meio zoado, acho que não da pra vender como seminovo, quanto eu aceito nele?

atualmente estou com um PC terrível, no fim da vida, porém eu provavelmente consigo salvar o SSD e o Cooler, tenho uma placa-mãe novinha na caixa (uma da Gigabyte H310M M.2 2.0, Intel LGA 1151).

pretendo vender meu i3 9100f por uma graninha e usar essa grana pra comprar uma fonte melhor e um processador suavinho também, qual a possibilidade de eu encontrar essas peças num preço da hora e ainda rodar uns jogos tipo LOL, por exemplo, sem gastar mais de 1k?

@Alex Camus Eu duvido que seja o processador, a temp dele sempre ta abaixo de 35° C e nao faz muito tempo que troquei a pasta térmica

Vou dar uma verificada no HD 

@XDRZ 

A um tempo eu tinha comprado uma da vx-350w porque a minha tinha queimado ai a de 350 queimou também, então resolvi colocar uma de 500w porque ta difícil.

Meu pc começou a desligar sozinho depois que me mudei ai a fonte de 350w queimou e tive que comprar essa

@Kleber Peters bom, era principalmente quando abria algo pesado mas de uns tempos pra ca vem desligando com praticamente tudo o que faço sem ser mexer no sistema ou no navegador (que são coisas bem levinhas)

Bem, como disse num tópico recente e meu pc é beeem antiguinho, estava com uns planos de ir transformando ele em um bom pc aos poucos mas a pandemia me deixou desempregada kk então tive que dar uma pausa no plano 

Atualmente meu pc tem uma placa-mãe da Itautec ST 4344.

Eu tenho outra placa-mãe que comprei numa promo (vulgo uma H310m lga 1151 da gigabyte), porém como sei que meu pc é meio estragado tenho medo de colocar ela e estragar também.

Comprei recentemente uma fonte de 500w e parece estar tranquila 

Meu processador é um intel core 2 quad Q9400 (comprei um i3 também mas como sei que é impossível eu colocar ele agora vou deixar ele no canto).

Meu maior problema vem sendo o pc desligar as vezes quando abro coisa s muito pesadas ou ele trava bastante, não sei qual é o problema porque tudo parece ok fora o HD entao suponho que ele finalmente chegou ap fim da vida (já que ele é provavelmente de 2011 e tem capacidade de 400gb)

Compensa trocar meu HD pra um de 1tb ou nada sera resolvido como imagino?

@NIGHT FALL foi pelo speccy

@GuilhermeGB

Em 08/05/2021 às 11:11, Alcantu disse:

Pode ser o sensor da placa-mãe. Já tive uma Asus H81M-A que marcava 100 graus e nunca tive um sequer throttling. Era a placa que marcava errado.

Sugestão minha: se não está perdendo desempenho nem nada do tipo, fecha o programa de monitoramento, faz as suas atividades, jogue seus jogos e vai ser feliz.

Então, na verdade ele da umas desligada causo abro algo meio pesadinho, tipo um jogo e ou trava bastante se eu abro mais de uma coisa, por exemplo, discord e o navegador junto. 

Eu suponho que o maior problema dele agora é o disco rigido mesmo porque ele é muuuito antigo mas nao tenho certeza.

Meu pc é beeem antiguinho, estava com uns planos de ir transformando ele em um bom pc aos poucos mas a pandemia me deixou desempregada kk então tive que dar uma pausa no plano 

Atualmente meu pc tem uma placa-mãe da Itautec ST 4344 a temperatura dela ta chegando a 91°C!!

Eu tenho outra placa-mãe que comprei numa promo (vulgo uma H310m lga 1151 da gigabyte), porém como sei que meu pc é meio estragado tenho medo de colocar ela e estragar também.

Comprei recentemente uma fonte de 500w e parece estar tranquila 

Meu processador é um intel core 2 quad Q9400 (a temperatura dele ta média uns 47° C, o cooler dele é meio recente também mas não é dos mais incríveis)

E a pergunta é, compensa eu colocar essa placa-mãe já? Minha maior intenção com isso é porque pretendo trocar meu HD pra um de 1tb e se a placa-mãe ja ta aquecendo muito com um de 500gb magine com um de 1tb

(Causo o problema esteja tambem no cooler do processador eu tenho um aqui da intel novinho junto com meu i3 que vou trocar quando tiver uma placa de video porque é o i3-9100f)

Em 20/07/2020 às 13:39, dzeta90 disse:

Eu tenho esta placa, por enquanto aguenta o que quero, mas você tem certeza que ela é a melhor pelo preço que você irá pagar? Eu comprei ela faz alguns anos já. Dê uma pesquisada antes.

recomenda alguma por um preço parecido?

@dzeta90 estava pesquisando mas como de placa-mãe é o que menos entendo achei ela boa ta por uns 500

@Aelson Carvalho obrigada, só queria confirmar mesmo pra cometer nenhum erro

Boa tarde, uma placa-mãe Gigabyte H310M M.2 2.0, Intel LGA 1151, mATX, DDR4 suporta uma placa de video MSI NVIDIA GeForce GTX 1050 TI 4G OCV1, 4GB, GDDR5 - GeForce GTX 1050 Ti 4G OCV1?

2 minutos atrás, João Nadal disse:

@isabela queiroz Na faixa de dois mil reais, consegue-se montar um PC de entrada, CPU Ryzen 3 3400G.

Pô fiz uma media com o meu namorado juntamos umas peças, tipo kit (placa-mãe, memória RAM e processador) só de início na kabum e deu uns 1.700, ai depois eu ia investir mais, comprar uma placa de video etc 

Eai galera, preciso da ajuda de vocês de novo. Irei comprar um pc para games novo, mas meio barato não aqueles de 20 mil, tava querendo um de uns 2mil e pouco, e tava pensando em comprar um ryzer 5 ou um i5 por ai, queria a opinião de alguem que sabe mais sobre, desde ja agradeço!

@Pessoa Aleatoria desde que eu comprei o cooler novo eu fiquei comparando a temperatura de antes e depois e nao vi ela subir muito não, achei que poderia ter alguma coisa a ver com as bios precisarem atualizar mas eu nao sei 

5 minutos atrás, isabela queiroz disse:

@Pessoa Aleatoria desde que eu comprei o cooler novo eu fiquei comparando a temperatura de antes e depois e nao vi ela subir muito não, achei que poderia ter alguma coisa a ver com as bios precisarem atualizar mas eu nao sei 

Agora fui ver e esta um pouco acima do comum mesmo 

@Pessoa Aleatoria na verdade não, sempre uso uma coisa de cada vez e mesmo assim ele nao melhorou muito o desempenho ou piorou até

5 minutos atrás, Pessoa Aleatoria disse:

@isabela queiroz Qual o modelo do seu processador?

 

É um Core2 Quad Q9400 2.66ghz 6mb 1333

Então, eu comprei um processador e um cooler também pra não sobrecarregar nada, mas meu pc ficou um pouco mais lento do que antes, estava pesquisando e eu deveria instalar o "AMD Dual Core Optimizer" ou fazer algo do tipo?

@GusGraf

45 minutos atrás, GusGraf disse:

@isabela queiroz Tudo bem jovem? Bem-vindo ao Fórum do Clube do Hardware!

 

O "TDP" de 65w apresentado no CPU-Z não é da placa-mãe e sim do processador utilizado. Trocar Bios não aumenta "TDP". No caso dessas placas Itautec, como a assistência foi encerrada, é melhor não se aventurar com atualização de BIOS.

 

Qual processador pretende utilizar?

 

Aqui tem uma lista de processadores que normalmente são compatíveis com o chipset G41:

http://www.cpu-upgrade.com/mb-Intel_(chipsets)/G41_Express.html

 

Aqui foi discutido o mesmo assunto:

 

 

Até!

Olá! É que na verdade eu estava conversando com o vendedor de um processador Core 2 Quad Q9400 2.66ghz 6mb 1333 Lga 775 e ele qie me disse que se o meu desse 95w tava tudo certo se nao tinha que atualizar pra usar esse processador

estou querendo comprar um novo processador, porém eu fui ver e o TDP  do processador que quero comprar é de 95w e o da minha placa é 65w, queria atualizar porém não acho em nenhum lugar a atualização dessa bio, minha placa-mãe:

itautec S.A / ST 4344 padrão

chipset intel G41 A3

southbridge intel 8280 1gb (ich7/r)

bios itautec ST 4344 0100