Ανανέωση ιστοσελίδας
ms-office.gr > Forum > Microsoft Access > Access - Ερωτήσεις / Απαντήσεις > [ Εκθέσεις ] Διαχωρισμός ονοματεπώνυμου

Access - Ερωτήσεις / Απαντήσεις Access + VBA... Εδώ δεν υπάρχουν όρια!

Απάντηση στο θέμα

 

Εργαλεία Θεμάτων Τρόποι εμφάνισης
  #1  
Παλιά 07-05-11, 11:26
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 07-05-2011
Μηνύματα: 137
Προεπιλογή Διαχωρισμός ονοματεπώνυμου

Χαιρετώ όλα τα μέλη του φόρουμ.
Θα ήθελα αν μπορεί να με βοηθήσει κάποιος στο εξής.
Έχοντας ένα πεδίο στην φόρμα (Ονοματεπώνυμο) και θέλοντας στην έκθεση αυτά να διαχωρίζονται,δηλαδή σε άλλο σημείο να αναγράφεται το Επίθετο και σε άλλο σημείο να αναγράφεται το Όνομα,δεν γίνεται να βάλω 2 ξεχωριστά πεδία στην φόρμα (Όνομα,Επώνυμο) γιατί υπάρχουν ήδη γύρω στις 7000 εγγραφές.
Απάντηση με παράθεση
  #2  
Παλιά 07-05-11, 11:39
Όνομα: Ευθύμης
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 24-02-2011
Μηνύματα: 28
Προεπιλογή

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

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

Τελευταία επεξεργασία από το χρήστη pixelman : 07-05-11 στις 12:05. Αιτία: Προσθήκη link
Απάντηση με παράθεση
  #3  
Παλιά 07-05-11, 15:13
Όνομα: Δημήτρης
Έκδοση λογισμικού Office: Ms-Office 2003
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 21-07-2010
Μηνύματα: 98
Προεπιλογή

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

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

ΟΝΟΜΑ: Trim(Right(Trim([ΟΜΑΤΕΠΩΝΥΜΟ]);Len(Trim([ΟΜΑΤΕΠΩΝΥΜΟ]))-InStr(1;LTrim([ΟΜΑΤΕΠΩΝΥΜΟ]);" ")))
Απάντηση με παράθεση
  #4  
Παλιά 07-05-11, 17:43
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 07-05-2011
Μηνύματα: 137
Προεπιλογή

Φίλε dimmag σε ευχαριστώ αλλά δεν παίζει,μήπως υπάρχει κάποιο λάθος στην σύνταξη;
Απάντηση με παράθεση
  #5  
Παλιά 07-05-11, 20:54
Όνομα: Δημήτρης
Έκδοση λογισμικού Office: Ms-Office 2003
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 21-07-2010
Μηνύματα: 98
Προεπιλογή

Δεν ξέρω γιατι δεν σου δουλευει.... κοίτα το συνημμένο
Συνημμένα Αρχεία
Τύπος Αρχείου: mdb OMOMATEPONYMO.mdb (540,0 KB, 91 εμφανίσεις)
Απάντηση με παράθεση
  #6  
Παλιά 07-05-11, 20:58
Το avatar του χρήστη Meteora
Συντονιστής
Όνομα: Νίκος
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 28-12-2008
Περιοχή: Θεσσαλονίκη
Μηνύματα: 1.033
Προεπιλογή

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



Ο Δημήτρης πάλι δίνει δυο εκφράσεις που είναι σωστές και μπορείς να εργαστείς με δυο τρόπους:
  • Να περάσεις τις δυο εκφράσεις σε query, από όπου -στη συνέχεια- θα ανλεί τα δεδομένα σου το report
  • Να φτιάξεις δυο πλαίσια κειμένου στην έκθεσή σου και στο μεν πρώτο να γράψεις μέσα στο πεδίο (Αντιγραφή και επικόλληση) :
Κώδικας:
= Left(Trim([ΟΜΑΤΕΠΩΝΥΜΟ]);InStr(1;LTrim([ΟΜΑΤΕΠΩΝΥΜΟ]);" "))
Και στο δεύτερο πλαίσιο κειμένου να γράψεις:
Κώδικας:
 =Trim(Right(Trim([ΟΜΑΤΕΠΩΝΥΜΟ]);Len(Trim([ΟΜΑΤΕΠΩΝΥΜΟ]))-InStr(1;LTrim([ΟΜΑΤΕΠΩΝΥΜΟ]);" ")))
Προσάρμοσε τα label κατάλληλα...

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

Με εκτίμηση

Νίκος Δ.

Υστερολόγιο: Δημήτρη απαντήσαμε ...συγχρόνως...
Απάντηση με παράθεση
  #7  
Παλιά 08-05-11, 00:45
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 07-05-2011
Μηνύματα: 137
Προεπιλογή

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


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

Ο κώδικας ΒΒ είναι σε λειτουργία
Τα Smilies είναι σε λειτουργία
Ο κώδικας [IMG] είναι σε λειτουργία
Ο κώδικας HTML είναι εκτός λειτουργίας
Trackbacks are εκτός λειτουργίας
Pingbacks are εκτός λειτουργίας
Refbacks are εκτός λειτουργίας


Παρόμοια Θέματα

Θέμα Δημιουργός Forum Απαντήσεις Τελευταίο Μήνυμα
[Συναρτήσεις] Διαχωρισμός ενός αριθμού. Niha Excel - Ερωτήσεις / Απαντήσεις 3 11-08-15 08:49
[Γενικά] διαχωρισμος χωρις την παυλα GreekPowers Excel - Ερωτήσεις / Απαντήσεις 7 29-07-15 13:58
[ Πίνακες ] Διαχωρισμός πίνακα gaz_manos Access - Ερωτήσεις / Απαντήσεις 12 05-06-13 07:52
[Γενικά] Διαχωρισμός σε φύλλα Θανάσης Excel - Ερωτήσεις / Απαντήσεις 12 14-05-11 15:45
Διαχωρισμός δεδομένων πεδίου JohnD Access - Ερωτήσεις / Απαντήσεις 13 08-09-10 14:43


Η ώρα είναι 07:26.