Excel - Tombol makro untuk merekam

Isu

Saya ingin membuat tombol perintah "Rekam" dalam file Excel.

Ketika seseorang mengklik tombol, makro mengambil sel tempat orang itu memasukkan namanya dan sel yang berisi tanggal masing-masing dan menyimpan data dalam buku kerja.

Larutan

Buka buku kerja Anda
Buka VBA Alt F11
Klik dua kali kiri pada ThisWorkbook di kiri atas
Klik kanan di jendela kanan

Salin kode di bawah ini di jendela ini

 Sub Macro_Enregistrement () Dim Nom_Fichier, Chemin, Repons 'Chemir definir = "C: \ ............ \"' A1 et A2 changer suivant vos besoin Nom_Fichier = Lembar Kerja ("Feuil1") .Range ("A1") & Lembar Kerja ("Feuil1"). Rentang ("A2") & ".xlsm" retval = MsgBox ("Voulezvous enregistrer ce fichier:" & Nom_Fichier & "?", VbYesNo) Jika retval = 6 Lalu Tanggapan = "Lebih Fichier" & Nom_Fichier & "sauvegardé" ActiveWorkbook.HematSebagai Nama file: = Chemin & Nom_Fichier, _FileFormat: = xlOpenXMLWorkbookMacroEnabled, CreateBackup: = False Else Reponse = "Fichier bukan pesan ulang End Sub