Замените в коде все строки Unload Me  
на строки Me.hide  
 
Тогда формы будут не выгружаться из памяти полностью, а просто скрываться.  
При повторном вызове формы все поля останутся заполненными.  
 
 
PS: Дизайн листа СТАРТ понравился)  
Но код...  
 
Зачем сто раз писать в коде одну и ту же строку?  
(например, ThisWorkbook.Worksheets("График").Range("A1").CurrentRegion)  
 
Так намного проще, удобнее, и быстрее:  
 
With ThisWorkbook.Worksheets("График").Range("A1").CurrentRegion  
       Set Jan9ssht = .Offset(Rng.Row - 1, 21).Resize(1, 1)  
       Set feb9ssht = .Offset(Rng.Row - 1, 36).Resize(1, 1)  
       Set mar9ssht = .Offset(Rng.Row - 1, 51).Resize(1, 1)  
       ' ...  
   End With  
 
 
ну или даже так:  
 
With ThisWorkbook.Worksheets("График").Range("A1").Offset(Rng.Row - 1)  
       Set Jan9ssht = .Offset(, 21)  
       Set feb9ssht = .Offset(, 36)  
       Set mar9ssht = .Offset(, 51)  
       ' ...  
   End With  
 
 
И вообще, зачем столько переменных?  
Не знаю, конечно, что там и как работает, но можно найти более оптимальный способ (без множества переменных) - достаточно будет 20 строк кода в Sub OKbt_Click()