Se copiou a rotina do site, a instrução está correta : Set tbl = ThisWorkbook.Worksheets(Sheet1.Name).ListObjects("mj")....

PAIZZANNO Fui em quem editou o título do teu tópico. Se as pessoas tomassem conhecimento dos links que eu posto, quando da apresentação, o fórum est...

Boa noite Veja se o vídeo do link abaixo pode te ajudar: Não se esqueça de clicar na mãozinha. []s

Olá JSCOPA. Tens razão com relação ao título desse tópico. Sugestão aceita. Deciog, peço desculpas se não toquei na mãozinha por achar que se o fizess...

. Boa solução deciog!! ... É uma pena um tópico deste estar com um Título tão VAGO!! ... Vai ser difícil alguém que precisar dessa mesma solução futur...

Não entendi, a proposta foi baseada na sua solicitação, qualquer alteração altera consideravelmente a rotina

Veja se auxilia Sub letraspermutadas() Dim MyTxt(1 To 4) As String Dim a As Integer, b As Integer, c As Integer, d As Integer MyTxt(1) = "MA&quo...

Caramba, Deciog! Ficou show. Por gentileza, sem querer abusar de tua boa vontade. Mas, me ocorreu uma ideia. Supondo que ao importar os dados, após o...

Boa noite Antrax Baixe a planilha e veja se é isto que você deseja. 25_11_17_Primeira quinta do mes-Patropi.zip Se foi útil, clique na mãozinha. ...

Olá Deciog. Antes de tudo quero agradecer tua ajuda. Bem, vamos ao fato. A função que tu fizeste, e com muita maestria posso afirmar, faz referência a...

Bom dia à todos. Peço desculpas pela demora. Tive que me afastar por uns dias. Por gentileza,coloquei um exemplo simples para facilitar na compreensão...

Pelo que li na sua 1ª colocação, tente: Cod = Format(.Range("h2").Value, "001") & "/" & Month(Date) Es...

Boa noite Cristovão O objetivo do fórum não é fornecer planilhas prontas, mas sim ajudar a resolver as dúvidas. Se quiser poderá utilizar a ferramen...

Boa noite Paula Movi tua dúvida para o local correto. Sempre crie um novo tópico para as tuas dúvidas . Como você é novata, para facilitar a tua pa...