Danilo Lima Alves

Boa tarde jovens, tudo bem? Tenho um desk positivo à anos, cheguei a fazer pequenas melhorias mas acho que o tempo dele já se encerrou... Pretendo investir até R$ 1.000,00 para o novo PC, assim, gostaria de verificar com vocês se o cenário abaixo é uma boa opção. OBS: Seria interessante se o computador suportasse rodar CS GO no Ultra com FPS acima dos 60. PC ATUAL Positivo 4GB DDR2 SSD 240 Core 2 Duo VGA AMD PCYES R7 260X 1GB GDDR5 FONTE EVGA 430W 80PLUS PC PLANEJADO placa-mãe (dúvida): LGA 1150 H81 LGA 1155 H61 (WARSHIPS) LGA 1155 H61 (KAZUK) 8GB DDR3 1600 ou 1333 (INICIAL) Manter SSD 240 (PC ATUAL) I5 3570 Manter VGA (troca posterior. Sugestões?) Manter Fonte (fonte atual atende?)

Olá pessoal, boa tarde Não tenho conhecimento da linguagem necessária para programação em VBA, porém, vasculhando a internet, consegui um código que atendeu muito bem as minhas necessidades. Quero realizar a limpeza de uma planilha especifica, utilizando macro. Para isso, utilizo os códigos abaixo, porém, preciso criar um botão para cada critério de exclusão. Desta forma, gostaria de analisar com vocês, se é possível unificar os comandos em um único botão. Código mestre: Function DeleteRowsByCriteria(ByVal firstRow As Integer, ByVal lastRow As Integer, ByVal criteriaColumn As Integer, ByVal criteria As String) As Integer Dim deletedRows As Integer Dim I As Integer deletedRows = 0 With ActiveSheet I = firstRow While I < lastRow If CStr(.Cells(I, criteriaColumn).Value) = criteria Then .Rows(I).Delete deletedRows = deletedRows + 1 Else I = I + 1 End If Wend End With DeleteRowsByCriteria = deletedRows End Function Critério de exclusão através de todas as linhas que possuem a string "Historico das U" na coluna 5 Sub dasU() MsgBox DeleteRowsByCriteria(1, 30000, 5, "Historico das U") & " rows has been deleted" End Sub Critério de exclusão através de todas as linhas que possuem a string "Item" na coluna 1 Sub Cabecalho() MsgBox DeleteRowsByCriteria(1, 30000, 1, "Item") & " rows has been deleted" End Sub E assim em diante. Atualmente, possuo 9 comandos de exclusão. Além de um comando especifico para remoção de linhas em vazias e outro para caractere coringa " * ". Conto com a ajuda de vocês, muito obrigado!