25-02-16, 12:41
|
| Super Moderator Όνομα: ΓΙΩΡΓΟΣ Έκδοση λογισμικού Office: Ms-Office 2010, Ms-Office 2013, Ms-Office 2016, Ms-Office 365 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική | | Εγγραφή: 14-01-2014
Μηνύματα: 234
| |
Γεια σου Γιώργο.
Στον κώδικα που έχεις σου χτυπάει λάθος η γραμμή «Open sfile For Random As #nfile» γιατί την έχεις δυο φορές, σβήσε την μια.
Το αρχείο γιατί το ανοίγεις «For Random».
Δες τα επισυναπτόμενα αρχεία και πρόσεξε την διαφορά που έχουν.
Στο ένα μεταβιβάζουμε την τιμή του textbox την μεταβλητή «strSearch» ενώ στο άλλο την περνάμε σαν όρισμα στην συνάρτηση «findtext». Αρκεί και στις δυο περιπτώσεις το περιεχόμενο των μεταβλητών να μην είναι κενό.
|