15-02-11, 11:34
|
| Όνομα: Κωνσταντίνος Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική | | Εγγραφή: 30-12-2010
Μηνύματα: 14
| |
Παράθεση:
Αρχική Δημοσίευση από gr8styl  Φίλε μου,
για να έχεις τα αποτελέσματα σε μια στήλη, αρκεί να αντικαταστήσεις στον κώδικα
το " i - 3" με το " 1" χωρίς τα εισαγωγικά.
και για να μην έχεις το όνομα του τελευταίου φύλλου στο κελί Search!A7,
πάλι στον κώδικα αντικαθιστάς το Sheets(i).Name με το "Αποτελέσματα που βρέθηκαν" με τα εισαγωγικά όμως αυτή τη φορά.
Κοίταξε την συνάρτηση call_Find_str() που έχω στον κώδικα και έχω βάλει και επεξηγήσεις.
Αν δεν σου είναι κατανοητά θα σου έλεγα να ξεχάσεις προς το παρόν την VBA αφού δηλώνεις και αρχάριος.
Φιλικά
Θανάσης
ΥΓ. Σε ευχαριστώ και εγώ με την σειρά μου για την ανταπόκριση και τα καλά σου λόγια και στα δύο θέματα. | Καλημέρα Θανάση , σε υπερευχαριστώ για τις πολύτιμες συμβουλές σου για ακόμα μια φορά  |