-
Posts
100 -
Cadastrado em
-
Última visita
Tipo de conteúdo
Artigos
Selos
Livros
Cursos
Análises
Fórum
Tudo que isabela queiroz postou
-
Excel VBA - automatização de encontrar dados em uma planilha (find) e colocar em outra
isabela queiroz respondeu ao tópico de isabela queiroz em Microsoft Office e similares
@Midori então, eu fiz assim por enquanto ' Macro1 Macro ' ' Sheets("Sheet1").Select ActiveSheet.Range("$A$1:$C$349").AutoFilter Field:=3, Criteria1:= _ "250G8 - MALDIVES 6U" Range("C4").Select ActiveCell.FormulaR1C1 = "250G8 - MALDIVES 6U" Sheets("TEMPLATE_PESO_MEDIDA").Select ActiveSheet.Range("$A$2:$AQ$48").AutoFilter Field:=2, Criteria1:= _ "MALDIVES 6U 250" 'procurando no tamplate a familia Range("AD31:AQ31").Select 'copiando as info da familia Selection.Copy Sheets("Sheet1").Select Range("D4").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False 'colando as info em sheet1 sem formatação Application.CutCopyMode = False '---------------------------------------------------------------------------- Range("D4").Select Range(Selection, Selection.End(xlToRight)).Select 'seleciona ate a informação da linha Application.CutCopyMode = False 'copia a linha Selection.Copy Range(Selection, ActiveCell.SpecialCells(xlLastCell)).Select 'seleciona ate a ultima informção da tabela Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False 'cola sem formatação End Sub to indo na base do ctrl c ctrl v só da informação que necessito da familia, o problema agora ta sendo que ta copiando pra tabela inteira, não somente as informaçoes que eu trouxe @Midori sobre o numero de colunas, acredito que tenham me solicitado assim porque as vezes as tabelas podem vir com mais colunas de informaçoes antes, não sei porque mudariam assim mas foi o que me solicitaram. -
Excel VBA - automatização de encontrar dados em uma planilha (find) e colocar em outra
isabela queiroz respondeu ao tópico de isabela queiroz em Microsoft Office e similares
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. -
Excel VBA - automatização de encontrar dados em uma planilha (find) e colocar em outra
isabela queiroz respondeu ao tópico de isabela queiroz em Microsoft Office e similares
@Midori basicamente isso -
Excel VBA - automatização de encontrar dados em uma planilha (find) e colocar em outra
isabela queiroz respondeu ao tópico de isabela queiroz em Microsoft Office e similares
@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
-
Excel VBA - validação de duas ocorrencias juntas para remoção
isabela queiroz respondeu ao tópico de isabela queiroz em Microsoft Office e similares
@Midori ah sim, perdão pela ignorância, entendo muito pouco de VBA. Obrigada, resolveu aqui! -
Excel VBA - validação de duas ocorrencias juntas para remoção
isabela queiroz respondeu ao tópico de isabela queiroz em Microsoft Office e similares
@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 -
Excel VBA - validação de duas ocorrencias juntas para remoção
isabela queiroz postou um tópico em Microsoft Office e similares
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 -
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?
-
Computador desligando sozinho, pode ser o HD?
isabela queiroz respondeu ao tópico de isabela queiroz em Computador desligando sozinho
@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?
-
Temperatura da placa-mãe muito alta
isabela queiroz respondeu ao tópico de isabela queiroz em Refrigeração e superaquecimento
@NIGHT FALL foi pelo speccy @GuilhermeGB 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. -
Temperatura da placa-mãe muito alta
isabela queiroz postou um tópico em Refrigeração e superaquecimento
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) -
Placa de video GeForce GTX 1050 TI funciona na Gigabyte H310M M.2 2.0?
isabela queiroz respondeu ao tópico de isabela queiroz em Placas de vídeo
recomenda alguma por um preço parecido? -
Placa de video GeForce GTX 1050 TI funciona na Gigabyte H310M M.2 2.0?
isabela queiroz respondeu ao tópico de isabela queiroz em Placas de vídeo
@dzeta90 estava pesquisando mas como de placa-mãe é o que menos entendo achei ela boa ta por uns 500 -
Placa de video GeForce GTX 1050 TI funciona na Gigabyte H310M M.2 2.0?
isabela queiroz respondeu ao tópico de isabela queiroz em Placas de vídeo
@Aelson Carvalho obrigada, só queria confirmar mesmo pra cometer nenhum erro -
Comprando um pc novo
isabela queiroz respondeu ao tópico de isabela queiroz em Montagem e upgrade de computadores de mesa
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!
-
processador novo pc mais lento
isabela queiroz respondeu ao tópico de isabela queiroz em Problemas de desempenho
@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 adicionado 6 minutos depois Agora fui ver e esta um pouco acima do comum mesmo -
processador novo pc mais lento
isabela queiroz respondeu ao tópico de isabela queiroz em Problemas de desempenho
@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é -
processador novo pc mais lento
isabela queiroz respondeu ao tópico de isabela queiroz em Problemas de desempenho
É 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?
-
preciso atualizar as bios, itautec
isabela queiroz respondeu ao tópico de isabela queiroz em Placas-mãe
@GusGraf 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
Sobre o Clube do Hardware
No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades 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