Excel data invertida ao gravar no vba

[Ariana Chagas]

Estou com um problema ao armazenar o campo data, está armazenando como mm/dd/aaaa. Já usei o CDATE, porém esse campo data pode ou não ter a data, não é obrigatório o preenchimento.

 

With Planilha3 'planilha de dados

    Do 'loop para encontrar a celula vazia
    
    linha = linha + 1
    
    If .Cells(linha, 3).Value = icj Then 'pesquisa por ICJ
                
        .Cells(linha, 10).Value = ComboBoxDoc1S.Text
        .Cells(linha, 11).Value = TextBoxDocDt1S.Text                'DATA
        .Cells(linha, 12).Value = TextBoxObs1.Text
        .Cells(linha, 13).Value = ComboBoxDoc2S.Text
        .Cells(linha, 14).Value = TextBoxDocDt2S.Text                'DATA
        .Cells(linha, 15).Value = TextBoxObs2.Text

[Basole]

@Ariana Chagas experimente acrescentar nas textBox data a função formatar

 

Desta forma...

 

.Cells(linha, 11).Value = vba.format(TextBoxDocDt1S.Text, mm/dd/yyyy)