Valter26

Usei o Winreducer para criar uma ISO mais leve, só que agora as configurações de exibição não abre, alguém sabe resolver?

https://youtu.be/KKouBnnZ2_E

@Math.Pi r7

placa-mãe: ipmh61p1

Processador: i3 3210

Placa de Vídeo : Rx 360

@Math.Pi amd rx 360

tenho uma ipmh61p1, no site diz que ela suporta 2ª e 3ª geração, tava usando um i3 3210 e quando coloquei um i5 2550 não deu vídeo pela placa de vídeo, só deu vídeo se eu ligar direto na placa-mãe, Quando eu tento instalar os driver da placa de vídeo diz que  nenhum hardware de video foi encontrado, alguém me ajuda

Gostaria de Adicionar a Pesquisa à outras planilhas. no código abaixo (Código do Botão Pesquisar) está somente e a Plan1, só que estou com mais 14 plan, ou seja, da plan1 a plan15, Como faço pra Pesquisar nas demais ??? 

Private Sub btnpesquisar_Click()

ActiveSheet.Range("$A$1:$J$616").AutoFilter Field:=1, Criteria1:="=*" & Me.txtprocesso.Value & "*"
ActiveSheet.Range("$A$1:$J$616").AutoFilter Field:=2, Criteria1:="=*" & Me.txtnome.Value & "*"
ActiveSheet.Range("$A$1:$J$616").AutoFilter Field:=3, Criteria1:="=*" & Me.txtcpf.Value & "*"
ActiveSheet.Range("$A$1:$J$616").AutoFilter Field:=5, Criteria1:="=*" & Me.txtcidade.Value & "*"




        ListView1.ListItems.Clear
        
        Sheets("Plan1").Select
        
        lin = 2
        
        Do Until Sheets("Plan1").Cells(lin, 1) = ""
        
        If Cells(lin, 1).Rows.Hidden = False Then
        
        
        Set li = ListView1.ListItems.Add(Text:=Sheets("Plan1").Cells(lin, 1).Value)
        li.ListSubItems.Add Text:=Sheets("Plan1").Cells(lin, 2).Value
        li.ListSubItems.Add Text:=Sheets("Plan1").Cells(lin, 3).Value
        li.ListSubItems.Add Text:=Sheets("Plan1").Cells(lin, 5).Value
        li.ListSubItems.Add Text:=Sheets("Plan1").Cells(lin, 10).Value
        
       
        
        End If
                
        lin = lin + 1
                        
        Loop



End Sub