Runtype Wert aus einer Zelle

[gong1]

Ich möchte in Excel-VBA den Wert für Runtype aus einer Zelle übergeben.
Runtype ist as String.
Wie ist das möglich