Εμφάνιση ενός μόνο μηνύματος
  #2  
Παλιά 02-11-10, 01:13
Το avatar του χρήστη gr8styl
gr8styl Ο χρήστης gr8styl δεν είναι συνδεδεμένος
Super Moderator
Όνομα: Θανάσης Στυλιανίδης
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-10-2009
Περιοχή: Βρυξέλλες, Βέλγιο
Μηνύματα: 758
Προεπιλογή

Παράθεση:
Αρχική Δημοσίευση από Flashgordon61 Εμφάνιση μηνυμάτων
Τι τροποποίηση πρέπει να γίνει στον κώδικα VBA ούτως ώστε το όνομα του αρχείου εξάγεται να μήν παίρνει το όνομα ClearBook.xls, αλλά ένα όνομα που θα το παίρνει από το κελί Α1του αρχείου.
Φίλε Γιώργο,
Στο πρώτο συνημμένο του φίλου Γιάννη CreateCLearBook.zip η γραμμή του κώδικα που αποθηκεύει το βιβλίο είναι η
Κώδικας:
        .SaveAs ThisWorkbook.Path & "\" _
                & Format(lngCopyNum, "000") & "_ClearBook.xls"
άλλαξε την σε
.SaveAs Range("A1").value

Ελπίζω να κατάλαβα το ζητούμενο.
Απάντηση με παράθεση