Форматирование даты по хиджре

У меня есть данные, загруженные с веб-сайта, один столбец этих данных содержит дату хиджры. Чтобы этот столбец был правильным столбцом даты, я применил следующее форматирование:

Но проблема не будет считаться датой и выравниваться по правому краю, если я не введу ячейку (двойным щелчком или F2), а затем нажму Enter

Поскольку количество строк велико, то, как я использую, непрактично

Я пробовал следующее:

• Скопируйте ячейки в Блокнот, а затем снова вставьте в Excel, но не сработало.
• Заменен разделитель даты с «-» на «». а затем замените обратно на "-", как если бы разделитель даты был "." и заменен на "-", который обычно работает с датой по григорианскому календарю, преобразуя ее из текста в дату
• Создан код VBA, применяющий код для выбранных ячеек для входа в ячейки и выхода из них для обновления, проверьте ниже:

Sub HijriDateEnforce()
  Dim cel As Range
  Dim selectedRange As Range
  Set selectedRange = Application.Selection
  For Each cel In selectedRange.Cells
    Selection.NumberFormat = "[$-1970000]B2dd/mm/yyyy;@"
    SendKeys "{F2}~"
  Next cel
End Sub

Но код по неизвестной причине, если количество строк очень велико, он останавливается через некоторое время, и мне нужно снова запустить его для оставшихся ячеек