перевірити правильність рядка формату для числових значень у форматі excel (dna) - excel, excel-vba, excel-interop, excel-dna, vba

Я використовую Excel для управління надбудовою Excel. Там я застосовую числовий формат до комірки, використовуючи Range.NumberFormat = myformat;. Я не знаю заздалегідь рядок myFormat, це визначено в бекенда.

У хороших випадках myFormat є щось на кшталт "0.00; (0,00) "або" # ## 0,00 _ € [червоний] - # ## 0,00 _ € ", в інших - щось на кшталт" toto ". У останньому випадку дисплей у комірці Excel це ########## або те, що не має сенсу.

Отже, чи є спосіб перевірити, що рядок myFormat є формою чисельного валіда для Excel, перш ніж застосовувати формат до комірки ?.

Дякую, Маріо

Відповіді:

Sub tester()
Dim rng1 As Range, rng2 As Range

Set rng1 = Range("F1")" Formatted with 2 decimal places
Set rng2 = Range("G1")" Formatted with 6 decimal places

If rng1.NumberFormat <> rng2.NumberFormat Then
Beep
End If

End Sub