Farklı Kaydederken Dosya İsmini Otomatik Yazsın Online Eğitimler sadece 49,99 TL. Hem de ikinci eğitim ücretsiz! Makroyu Kopyala 'Excel Makro (VBA) online eğitimleri için: https://www.excelsizeyeter.com/excelsizeyeter.com/udemy_giris.php adresine tıklayınız. Bir eğitim alana bir eğitim bedavadır. İkinci eğitim olarak Excel, Excel pratik çözümler, finans eğitimleri vb. alabilirsiniz. Sub Enregistre_Sous2() Réponse = MsgBox("Voulez-vous enregistrer ce classeur ?", vbYesNo) If Réponse = vbYes Then Dim nom As String Do While nom = "" 'Répète l'instruction tant qu'aucun nom est donné nom = InputBox("Donnez un nom de fichier !" & Chr(13) & "Exemple: Rapport") Loop ChDrive "c" ChDir "c:" 'Indiquez le répertoire ActiveWorkbook.SaveAs Filename:=(nom) Application.Dialogs(xlDialogSaveAs).Show 'pour afficher la boîte Enregistrer sous End If End Sub Bu makro ile ilgili sorun bildir Bu makro çalışmıyor. Kodlarda bir hata var. Diğer Hata ile ilgili görüşlerinizi aşağıdaki kutuya yazabilirsiniz. Hata bildir TÜM MAKROLAR Youtube Kanalımız Aşağıdaki makrolar işinize yarayabilir. Benzer Sonuçlar NoMakro Adı 1 farklı kaydederken dosya ismini otomatik yazsın 2 2 farklı kaydederken dosya ismini otomatik yazsın 3 alt alta kayıt işlemi 4 excelde kendi eklenti ve fonksiyonlarınızı oluşturun 5 dosyayı farklı şekillerde kaydetme 6 farklı kaydeti engelle 7 save as (farklı kaydet) 8 makronun otomatik olarak açılması ve çalışması 9 userform'u otomatik boyutlandırma 10 bütün excel dosyalarının %85 ile açılması 11 tek hücrede yer alan "ad soyad" bilgisini ayrı hücrelere alma 12 sayfayı kaydederken mesaj farklı kaydet iptal 13 Dosyayı kapatmadan önce "Kaydetmek İstiyor musunuz?" sorusunu engelleme ve her kapatma işleminde otomatik olarak kaydetme 14 dosyanın bayt cinsinden büyüklüğü nedir? 15 txt dosyasını seç yeni excel sayfasına yazsın 16 klasör ve dosya makrolarındaki yolları kendine göre düzenle 17 dosya açıldığında tanimlama bilgisi 18 dosya açıldığında tanımlama bilgisi 19 yedek alma ile ilgili 20 dosyanın yolunu ve ismini hücreye yazdırır