Forum - Εκθέσεις Διαχωρισμός ονοματεπώνυμου

Forum (https://www.ms-office.gr/forum/)

- Access - Ερωτήσεις / Απαντήσεις (https://www.ms-office.gr/forum/access-erotiseis-apantiseis/)

- - [ Εκθέσεις ] Διαχωρισμός ονοματεπώνυμου (https://www.ms-office.gr/forum/access-erotiseis-apantiseis/1114-diaxorismos-onomateponymoy.html)

Διαχωρισμός ονοματεπώνυμου

Χαιρετώ όλα τα μέλη του φόρουμ.
Θα ήθελα αν μπορεί να με βοηθήσει κάποιος στο εξής.
Έχοντας ένα πεδίο στην φόρμα (Ονοματεπώνυμο) και θέλοντας στην έκθεση αυτά να διαχωρίζονται,δηλαδή σε άλλο σημείο να αναγράφεται το Επίθετο και σε άλλο σημείο να αναγράφεται το Όνομα,δεν γίνεται να βάλω 2 ξεχωριστά πεδία στην φόρμα (Όνομα,Επώνυμο) γιατί υπάρχουν ήδη γύρω στις 7000 εγγραφές.

Μια λύση θα μπορούσε να είναι η εξής. Να αντιγράψεις σε ένα φύλλο excel το πεδίο Ονοματεπώνυμο, στη συνέχεια να σπάσεις το πεδίο σε δυο (με διαχωριστικό το κενό για παράδειγμα) και μετά τις 2 στείλες που θα προκύψουν να τις ξαναπεράσεις στη βάση σου με μια απλή αντιγραφή, αφού δημιουργήσεις 2 νέα πεδία. Αυτά βέβαια αν στο Ονοματεπώνυμο γράφεις σε όλες τις εγγραφές πρώτα το επώνυμο και μετά το όνομα (ή το ανάποδο δεν εχει σημασία).

http://office.microsoft.com/el-gr/ex...in=HA010221840

Γειά σας!
Φαντάζομαι το διαχωριστικό είναι το κενό.
Δοκίμασε:

ΕΠΩΝΥΜΟ: Left(Trim([ΟΜΑΤΕΠΩΝΥΜΟ]);InStr(1;LTrim([ΟΜΑΤΕΠΩΝΥΜΟ]);" "))

ΟΝΟΜΑ: Trim(Right(Trim([ΟΜΑΤΕΠΩΝΥΜΟ]);Len(Trim([ΟΜΑΤΕΠΩΝΥΜΟ]))-InStr(1;LTrim([ΟΜΑΤΕΠΩΝΥΜΟ]);" ")))

Φίλε dimmag σε ευχαριστώ αλλά δεν παίζει,μήπως υπάρχει κάποιο λάθος στην σύνταξη;

Δεν ξέρω γιατι δεν σου δουλευει.... κοίτα το συνημμένο

Καλησπέρα
Δεν είναι σωστό να έχεις μια τόσο μεγάλη βάση και να έχεις πεδίο [ΟΝΟΜΑΤΕΠΩΝΥΜΟ]. Ο Ευθύμης σε δίνει μια απλή και εύκολη διαδικασία να κάνεις τον διαχωρισμό, με τους όρους που παρουσιάζει. Κράτα αντίγραφο και δούλεψε πάνω στην πρόταση του Ευθύμη.

Ο Δημήτρης πάλι δίνει δυο εκφράσεις που είναι σωστές και μπορείς να εργαστείς με δυο τρόπους:

Να περάσεις τις δυο εκφράσεις σε query, από όπου -στη συνέχεια- θα ανλεί τα δεδομένα σου το report
Να φτιάξεις δυο πλαίσια κειμένου στην έκθεσή σου και στο μεν πρώτο να γράψεις μέσα στο πεδίο (Αντιγραφή και επικόλληση) :

Κώδικας:

= Left(Trim([ΟΜΑΤΕΠΩΝΥΜΟ]);InStr(1;LTrim([ΟΜΑΤΕΠΩΝΥΜΟ]);" "))

Και στο δεύτερο πλαίσιο κειμένου να γράψεις:

Κώδικας:

 =Trim(Right(Trim([ΟΜΑΤΕΠΩΝΥΜΟ]);Len(Trim([ΟΜΑΤΕΠΩΝΥΜΟ]))-InStr(1;LTrim([ΟΜΑΤΕΠΩΝΥΜΟ]);" ")))

Προσάρμοσε τα label κατάλληλα...

Έχεις λύσεις λοιπόν!

Με εκτίμηση

Νίκος Δ.

Υστερολόγιο: Δημήτρη απαντήσαμε ...συγχρόνως...

Ειλικρινά σας υπέρ ευχαριστώ όλους και ιδιαίτερα τον Δημήτρη,δούλεψε άψογα.
Ευχαριστώ και πάλι.