Private Sub Form_Load() If App.PrevInstance Then Kaydet$ = App.Title App.Title = ' ... İkinci Kopya.' Form1.Caption = ' ... İkinci Kopya.' AppActivate Kaydet$ SendKeys ' % R' , True End End If End Sub