Если вы хотите, чтобы данные сохранялись после выключения программы, надо:

Const strFile = "c:\windows\lift_settings.ini"

Private Sub SaveSettings_Click()'сохранение данных (кнопка)
Open strFile For Random As #1
Put #1, 10, Label1.Caption'1 ячейка
Close #1
Open strFile For Random As #1
Put #1, 20, Label2.Caption'2 ячейка
Close #2
End Sub

Private Sub loadSettings()'загрузить значения в ячейки
On Error Resume Next' при отсутствии файла (при ошибке) не выдаст_
'сообщение об ошибке
Dim s As String
Open strFile For Random As #1
Get #1, 10, s
Close #1
Label1.Caption = s'1 ячейка
Dim t As String
Open strFile For Random As #1
Get #1, 20, t
Close #1
Label2.Caption = t' 2 ячейка
End Sub

Private Sub Form_Load()
On Error Resume Next
loadSettings
End Sub

Ещё strFile может быть с любым именем и с любым расширением (с латинским) на ваш вкус. При этом не обязательно прописывать полный путь, можно написать Const strFile = "myfile.xls" но при этом надо помещать его в одну и ту же папку с выполняемым проектом или приложением.