qualquer coisa mande o arquivo como esta...

O erro deve ser Sheets(Plan5) Quando você utiliza Sheets() o que vai dentro do parentes deve estar com aspas.. se você colocar plan5 apenas não pr...

Veja o anexo

Segue anexo... vê se ajuda...

Sub Sample2() Sheets("Visualizador").ListBox2.Clear ShowFolderList2 ("C:teste") End Sub Sub ShowFo...

Olá AdGere, continuo imensamente grato pela sua ajuda. se vc tiver intresse em fazer parcerias comigo, eu tenho coisas muito interessantes que eu nao ...

XMAN consegue identificar em qual linha ocorre o erro? O Codigo que inseri foi como exemplo.. os nomes dos controles e da planilha tem que coincidir ...

O codigo de listar arquivos FSO a ser utilizado é: Lembrando: quero que o codigo do OptionButton sirva pra filtrar os arquivos resultantes do seguint...

eu não sei fazer referencia no VBA ao OptionButton inserido na celula. se eu soubesse, escreveria um codigo parecido com esse: If optionBbuttomJPG.val...

na --- Function VerifExt(Arq As String) As Boolean, ----- Perceba que na Função VerifExt solicita uma entrada de uma String.. que é a variavel Arq......

XMAN, boa noite... O optionButton possui apenas 2 valores, Verdadeiro ou Falso.. Portanto, na linha que escreveu: If optionBbuttomJPG.value = "...

Esse codigo você tem que colocar dentre do Optionbutton... da forma que você mesmo disse... Na Aba desenvolvedor... Modo Design... duplo clique sobre...

Verifique o anexo...

Tá... No Módulo MóduloPesquisa Na Private Sub BuscarfsoArquivos(ByVal fsoPasta As Folder, ByVal sBuscarPor As String) Nesta Linha: If md_Pasta.Veri...

Vc localizou o codigo do Botão Up... entendeu? Se sim, podemos passar para os OptionButton...