Schau mal in der Help nach ERAM

geht sehr einfach.

Dim Eesf As Eram Long
Dim Startframe As Long

.......
Startframe = 123456

'Speichern
Eesf = Startframe
........

' beim Programmstart aus Eeprom lesen
Startframe = Eesf