15-01-21, 21:12
|
 | Διαχειριστής Όνομα: Χρήστος Ζώρζος Έκδοση λογισμικού Office: Ms-Office 2016 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική | | Εγγραφή: 20-09-2013 Περιοχή: Κοντά σε ηφαίστειο...
Μηνύματα: 1.047
| |
Λογικά πρέπει να εννοείς το κελί κάτω από τα κελιά Number. Αν ναι, τότε αντικατέστησε τη γραμμή
.Rows("1:1").Find(CmbKAE.Text & " " & CmbKAE12.Text).Activate
με την
.Rows("1:1").Find(CmbKAE.Text & " " & CmbKAE12.Text).Offset(2,0).Activate
και πρόσθεσε από κάτω της τη φράση Unload Me.
Απλά Cells, όπου χρειαζόμαστε η αναζήτηση να γίνει σε όλα τα κελιά του φύλλου.
__________________
Your Curiosity Will Be The Death Of You! |