Hi,

My VBA script reads some values from cells and sends them to a
webservice. I just realized that using a German Excel e.g.
cell.Font.Strikethrough is returned as Wahr/Falsch instead of
True/False. I tried following code snippet I found online but
unfortunately didn't help either:
......
Dim bolVal As Variant
bolVal = cell.Font.Strkethrough
If CStr(bolVal ) = "False" Then ' Unfortunately this didn't help.
........

Has anybody an idea how to convert this from any language to
True/False?

Reto