
15-05-12, 20:57
|
| Όνομα: ΠΑΝΤΕΛΗΣ Έκδοση λογισμικού Office: Ms-Office 2007, Ms-Office 2016 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική | | Εγγραφή: 11-04-2012 Περιοχή: ΝΕΑ ΣΜΥΡΝΗ
Μηνύματα: 69
| |
Καλησπέρα σε όλους.
Τάσο όταν το φίλτρο μπαίνει με το χέρι όλα λειτουργούν άψογα.
Στην δική μου περίπτωση το φίλτρο ενργοποιείται με check box από άλλο φύλλο εργασίας και με τον εξής κώδικα:
Private Sub CheckBox75_Click()
If CheckBox75 = True Then
Sheets("Φύλλο4").Select
Selection.AutoFilter Field:=22, Criteria1:="1"
Sheets("Φύλλο5").Select
Exit Sub
Else
Sheets("Φύλλο4").Select
Selection.AutoFilter Field:=22
Sheets("Φύλλο5").Select
Exit Sub
End If
End Sub
Με το μόλις ενεργοποιείται το φίλτρο από το checkbox χαλάει η συνάρτηση και βγάζει σαν αποτέλεσμα
ΤΙΜΗ. Δε μπορώ να καταλάβω γιατί γίνεται αυτό;
|