Tem sim, tente desta forma: Private Sub Pro1_Enter() Sheets("Estoque").Activate Dim i as Integer Dim aux as Variant Dim aux2 as V...

Luan, boa tarde, edite o código conforme as suas necessidades. Em base, é isso: Dim ConferePasta As String ConferePasta = “C:UsersLuanDesktopNo...

Groriz, bom dia, tudo bem? Trabalhar com Html é um pouco chato, mas tá ai. Acrescente o código abaixo no final do seu código. Set tags = IE.D...

Acredito que sim, você poderia anexar a planilha para os eventuais testes?

Prezado, modelos de planilhas variam conforme necessidades. Acredito que se alguém fosse te oferecer esse serviço, iria cobrar por ele. Todos os us...

Bernardo, muito obrigado, ficou perfeito. gostaria de tirar mais uma duvida se possivel. quando eu faço a consulta nao sei se vc reparou, mas a pl...

Quais critérios você quer que ele obedeça?

Pelo que eu entendi, aqui está uma fórmula que talvez resolva seu problema. =SE(D1=2;"";SE(E(ÉNÚM(D1);ÉNÚM(C1));REPT(B1;(D1-C1)+1);"&q...

Deu certo com essas alterações, obrigada!!! Private Sub Worksheet_SelectionChange(ByVal Target As Range) If ActiveCell.Value = "F" Then Ac...

Observações sobre o código: - Substitua o "D1" pelo range onde começa a sua coluna dos F's - A segunda linha vai dar um Control + Seta pra...

Eu entendi o que você está pedindo, você que não está entendendo a solução proposta. A partir do momento em que você coloca em ordem alfabética a tab...

Dedique uma célula na planilha para ter a numeração que você deseja, ex: 01 Depois na hora de criar o arquivo você manda concatenar o número que está...

Basta colocar a tabela das empresas em ordem alfabética. Abraços.

Esse código é bem superficial, pode ser útil ou não, depende muito de como tá estruturada sua planilha. Só adapta pro seu problema, usa o método Wor...

Não veio nenhuma planilha anexada. Por favor, zipe-a e anexe, geralmente o site não deixa pelo tamanho da planilha e por regra é bom zipa-la para não ...