prøv at upload dit ark for som jeg ser det har du fejl i din kode
og så vidt jeg ved kan man kun gemme data i en celle til senere brug hvor du skal genindlæse den.

Sheets("Ark2").Range("A1").Value = supertest.Value
Sheets("Ark2").Range("A1").Value = userform.tekstboxnr.Value

supertest.Value = Sheets("Ark2").Range("A1").Value
userform.tekstboxnr.Value = Sheets("Ark2").Range("A1").Value
tror jeg de skal se ud

Jeg har oprettet en tekstbox: supertest i en UserForm med navnet: test

Ark2 er navnet på den side hvor jeg åbner min UserForm

Når jeg skriver i supertest ønsker jeg at det skrevne bevares for senere brug, også når jeg har gemt siden og åbner den igen.

Kan nogen give et forslag hertil?

Nedenstående virker desværre ikke.

 

Private Sub supertest_Change()

Sheets("Ark2").Range("A1").Value = supertest.Value

End Sub

 

Private Sub test_Initialize()

supertest.Value = Sheets("Ark2").Range("A1").Value

End Sub