Желаю обработать ситуацию при преобразовании "строка -> дата -> строка дата ISO", когда исходная строка = "".

Так, чтобы результатом была пустая строка "".

Ограничения:
Надо без If Then Else. Ибо использовать предполагается в источнике данных контрола формы.
Т.е. функция нужна.

Я сделал, но этож бред.

  MsgBox Format(IIf(x = "", Null, CDate(IIf(x = "", "04.03.2017", x))), "yyyymmdd")

По идее должно бы работать это

  MsgBox Format(IIf(x = "", Null, CDate(x)), "yyyymmdd")

но фигвамм. Run time error. Type mismatch.

Sub test1()

  Dim x As String

  'Так, чтобы результатом была пустая строка ""

  x = ""

  MsgBox Format(IIf(x = "", Null, CDate(IIf(x = "", "04.03.2017", x))), "yyyymmdd")


  'Нормальное преобразование

  x = "21.03.2017"

  MsgBox Format(IIf(x = "", Null, CDate(IIf(x = "", "04.03.2017", x))), "yyyymmdd")

End Sub

http://www.sql.ru/forum/1254327/stroka-data-stroka-data-iso-konkurs-nahodchivyh