VBA - Ένα κουμπί για την αποθήκευση του αρχείου ενός εγγράφου σε ένα κελί

Θέμα

Πρέπει να δημιουργήσω ένα κουμπί που αποθηκεύει ένα τροποποιημένο έγγραφο ως αριθμό σε ένα συγκεκριμένο κελί (π.χ. σε A6).

Λύση

 Private Sub CommandButton1_Click () '.xlsm ή xls ανάλογα αν θέλετε να αποθηκεύσετε τις μακροεντολές. Όνομα αρχείου ActiveWorkbook.SaveAs: = "c: \ archive \" & Κύτταρα (1, 6) & ".xlsm" Κύτταρα (1, 5) = "Αρχειοθετημένα" Αν τα Κύτταρα (1, 5) = False End Αν τελειώσει Sub 

Χάρη στο f894009 για αυτή την συμβουλή.

Προηγούμενο Άρθρο Επόμενο Άρθρο

Οι Καλύτερες Συμβουλές