Ola Joocta, como não da para alterar o post anterior, o erro 91 vem da função PreecheRecordSet()

Ola joocta, o erro esta na Sub Exportar, verifique txtConservacao.Text Private Sub Exportar() Dim i As Integer Dim NewWorkBook As Workbook ...

Ola rrcostac, formate a coluna de datas como no exemplo abaixo. Sht2.Columns("B").NumberFormat = "mm/dd/yyyy"

Ola bymauricio, os dados de um formulário são do tipo texto, converta para o tipo correto usando CInt() , CDate e etc Private Sub CommandButton1_Cli...