Peter Scheutz #1 forget about the array and do: Type Maxi Field Val Field FirstMini.Mini End Type Type Mini Field SubValue Field NextMini.Mini End Type