Okay, mit folgender Zeile gehts

Code:
Dim Y_overlay(16) As Word At Y Overlay