Изменение формата даты, которая уже была записана в Excel

Question

Обновление 05/03/2019

Я использовал следующее из URL, приведенного ниже Томом.

Function ConvertDate(InputStr As String) As Date

    Dim InputYear As Integer
    Dim InputMonth As Integer
    Dim InputDay As Integer

    'extract year, month and day
    InputYear = Right(InputStr, 4)
    InputMonth = Mid(InputStr, 4, 2)
    InputDay = Left(InputStr, 2)

    'put it together to a real date
    ConvertDate = DateSerial(InputYear, InputMonth, InputDay)
End Function

Это дает мне датутак, как я хочу.Но когда я записываю ту же дату в текстовый файл, она меняется обратно на формат ПК, это MM / DD / YYYY.Есть ли способ решить эту проблему?

**** У меня есть этот превосходный VBA-код, который фиксирует дату из другого приложения мэйнфрейма, имеющего формат DD.MM.YYYY.Я пытаюсь изменить его обратно на следующий формат ГГГГ / ММ / ДД.Я применил следующий формат к столбцу date_value моего Excel.Sheet1.Range ("A2", "A50000"). NumberFormat = "гггг / мм / дд" Так я получил значение даты из программы мэйнфрейма.Ячейки (noRow, 9) .Value = Trim (MyHost.TextRC (5, 68, 12)) Когда я запускаю программу, она не меняет формат даты так, как я хочу.Формат даты моего ПК установлен следующим образом: ММ / ДД / ГГГГ.Любая подсказка или руководство высоко ценится. ****