
07-02-15, 10:09
|
Όνομα: Γιώργος Έκδοση λογισμικού 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")
φιλακια περιμενω μπυρες ξερεις που
|