Hi,
probier doch mal
Dim Anzahl_tempsensoren As Word

So steht es jedenfalls in der Doku mit dem Hinweis, es muss Word oder Integer sein.

Gruß

Rolf