Oi amigo, pelo oq pude notar estava faltando declarar o item como objeto:

Dim wshNetwork As Object

Após isso não estava localizando também o campo Date do formulário pois o correto era Data.

Com essas alterações o código avança, mais precisa revisar se todos os objetos e referencias estão sendo informados corretamente.

Espero ter ajudado.

Bom DIa, Larissa!!!

Perfeito Mto Obrigado pela excelente ajuda. Quem manja manja..rsrsr...Obrigado!!!

Perfeito Larissa.

Mto Obrigado pela ajuda!!!