Εμφάνιση ενός μόνο μηνύματος
  #3  
Παλιά 07-02-15, 10:09
asterix Ο χρήστης asterix δεν είναι συνδεδεμένος
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2007, Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 06-08-2011
Μηνύματα: 70
Προεπιλογή

Γιαννη το προβλημα σου ειναι σχετικα απλο

αλλαξε τα παρακατω

ΠΡΩΤΟ
Private Sub CommandButton1_Click()

Application.Run "Report.xlsm!Φυλλο1.LoopThruBooks1"

End Sub
και μετα σε ολες της ρουτινες
p = "το path που ειναι τα αρχεια σου "
f = Dir(p & "*.xlsx")

φιλακια περιμενω μπυρες ξερεις που
Απάντηση με παράθεση