Ir ao conteúdo
  • Cadastre-se
douglasdasilva2901

Excel inputbox grava ultima inserção

Posts recomendados

Boa tarde,

 

Uso uma macro com inputs para localizar dados em área determinada dentro da planilha, gostaria de saber se existe alguma forma de a box vir pré carregada conforme a ultima vez que foi utilizada, pois existe a possibilidade de ter até 20 ou mais campos dentro da planilha igual.

 

segue minha macro utilizada atualmente.

 

Sub Pesquisa_Avançada()

    Dim linha As Long
    linha = ActiveCell.Row
     Range("AB" & linha).Select
     ActiveCell.Offset(3, 0).Select

    Dim EncontraString As String
    Dim Intervalo As Range
    EncontraString = "*" & InputBox("Digite a pesquisa", "Pesquisa Avançada") & "*"
        If Trim(EncontraString) <> "" Then
            With Sheets("Clientes").Range("Y:AF")
                Set Intervalo = .Find(What:=EncontraString, _
                                            After:=ActiveCell(1), _
                                            LookIn:=xlValues, _
                                            LookAt:=xlWhole, _
                                            SearchOrder:=xlByRows, _
                                            SearchDirection:=xlNext, _
                                            MatchCase:=False)
                    If Not Intervalo Is Nothing Then
                    Range(Intervalo.Address).Select
                    Else
                        MsgBox "Não Localizado.", vbCritical, "Atenção"
                    End If
            End With
        End If
        
End Sub

Compartilhar este post


Link para o post
Compartilhar em outros sites
Em 12/06/2019 às 15:28, douglasdasilva2901 disse:

 ... gostaria de saber se existe alguma forma de a box vir pré carregada conforme a ultima vez que foi utilizada,
 

Em princípio não.

O seu código seleciona uma única célula que contém o valor procurado. Se você utilizar o recurso Localizar/Substituir lá há a opção de Localizar tudo. Não serviria?

Se você nos informar o que você pretende fazer após rodar o código, isto é, qual o seu objetivo ao selecionar a(s) célula(s) talvez apareça alguma sugestão.

Compartilhar este post


Link para o post
Compartilhar em outros sites
1 hora atrás, osvaldomp disse:

Em princípio não.

O seu código seleciona uma única célula que contém o valor procurado, se você utilizar o recurso Localizar/Substituir lá há a opção de Localizar tudo. Não serviria?

Se você nos informar o que você pretende fazer após rodar o código talvez apareça alguma sugestão.

A principio eu uso ela para localizar uma informação dento de um determinado intervalo, quando ela termina a localização me leva até o resultado, mas por exemplo se eu tiver vários resultados abaixo que são iguais e o primeiro encontrado e precisar usar novamente a macro, vou ter que indicar de novo o que estou procurando.

 

Exemplo procurei chocolate, ele achou chocolate x, mas eu quero procurar chocolate novamente pois quero outro modelo, e quando rodar a macro novamente terei que preencher a inputbox novamente pois ela não memorizou a ultima pesquisa, queria que ao menos ela apareça já preenchida com chocolate para facilitar a nova pesquisa.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Não salientei um detalhe, quando uso localizar normal, para achar cada campo que preciso leva em media 30 segundos, usando a macro do jeito que esta levo apenas 1 a 2 segundos para localizar, tendo em vista que ela procura no intervalo que eu determinei Range("Y:AF") se consegui-se alguma forma ao menos de fazer um localizar próximo ou fazer a inputbox manter os valores inseridos na ultima pesquisa, ira ajudar a agilizar o meu processo.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Para tornar o recurso Localizar tão rápido quanto a sua macro você precisa antes selecionar o intervalo de busca (Y:AF).;)

 

Se você deixar de lado a sua macro e responder ao que comentei no post #3 (cópia abaixo) talvez facilite a obtenção de ajuda para a sua demanda.

Se você nos informar o que você pretende fazer após rodar o código, isto é, qual o seu objetivo ao selecionar a(s) célula(s) talvez apareça alguma sugestão.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar agora





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

×
×
  • Criar novo...

GRÁTIS: minicurso “Como ganhar dinheiro montando computadores”

Gabriel TorresGabriel Torres, fundador e editor executivo do Clube do Hardware, acaba de lançar um minicurso totalmente gratuito: "Como ganhar dinheiro montando computadores".

Você aprenderá sobre o quanto pode ganhar, como cobrar, como lidar com a concorrência, como se tornar um profissional altamente qualificado e muito mais!

Inscreva-se agora!