yedekalma

Merhabalar, Kodu kopyalayın. Kullanmak istediğiniz sayfa sekmesine sağ tıklayıp "Kod Görüntüle"yi seçin. Açılan VBA penceresinde Ctrl+V ile yapıştırın. Excel sayfanıza dönün. Dosyayı kaydedin. Sub auto_open() On Error Resume Next org = ThisWorkbook.FullName tarih = Format(Now...