20-12-20, 10:43
|
 | Διαχειριστής Όνομα: Χρήστος Ζώρζος Έκδοση λογισμικού Office: Ms-Office 2016 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική | | Εγγραφή: 20-09-2013 Περιοχή: Κοντά σε ηφαίστειο...
Μηνύματα: 1.046
| |
Καλημέρα Κώστα,
Δοκίμασε τις παρακάτω αλλαγές να δεις αν έχεις τα επιθυμητά αποτελέσματα:
Τη γραμμή με τα έντονα γράμματα άλλαξέ την σε:
Range("Sheet1!A7").AutoFilter 2, ActiveSheet.Cells(2, 1).Value
και στην ακριβώς από κάτω γραμμή αντικατέστησε την κόκκινη τελεία με κόμμα:
... Range(Cells(7, 1).Cells(c ...
__________________
Your Curiosity Will Be The Death Of You! |