Não há mais suporte para esse navegador.
Atualize o Microsoft Edge para aproveitar os recursos, o suporte técnico e as atualizações de segurança mais recentes.
![](data:image/svg+xml, %3Csvg xmlns='http://www.w3.org/2000/svg' height='64' class='font-weight-bold' style='font: 600 30.11764705882353px "SegoeUI", Arial' width='64'%3E%3Ccircle fill='hsl(233.6, 16%, 32%)' cx='32' cy='32' r='32' /%3E%3Ctext x='50%25' y='55%25' dominant-baseline='middle' text-anchor='middle' fill='%23FFF' %3EAC%3C/text%3E%3C/svg%3E)
Olá,
Estou a dias desenvolvendo um codigo, porém a função VLookup não entra,
Me.TextBoxEmpresa = Application.WorksheetFunction.VLookup(Me.TextBoxID, Sheets("Planilha1").Range("B:T"), 4, 0)
![](data:image/svg+xml, %3Csvg xmlns='http://www.w3.org/2000/svg' height='64' class='font-weight-bold' style='font: 600 30.11764705882353px "SegoeUI", Arial' width='64'%3E%3Ccircle fill='hsl(272, 11%, 36%)' cx='32' cy='32' r='32' /%3E%3Ctext x='50%25' y='55%25' dominant-baseline='middle' text-anchor='middle' fill='%23FFF' %3EJP%3C/text%3E%3C/svg%3E)
Olá André Caetano
Esperamos que esta mensagem o encontre bem.
Pedimos sinceras desculpas pela demora em trazer seu tópico para este fórum.
Quero me colocar à sua disposição se hoje você ainda tiver o problema para o qual abriu este tópico.
Estarei atento à sua resposta.
Se não recebermos uma resposta sua nos próximos dias, continuaremos a fechar o tópico. No entanto, gostaríamos de garantir que estamos sempre disponíveis para qualquer assistência que você possa precisar.
Agradecemos sua compreensão e estamos disponíveis para ajudar no que for necessário.
Atenciosamente
Jonathan