Ανανέωση ιστοσελίδας
ms-office.gr > Forum > Microsoft Access > Access - Ερωτήσεις / Απαντήσεις > Αντικατάταση τελικού "ς" απο αρχείο πελατών

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

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

 

Εργαλεία Θεμάτων Τρόποι εμφάνισης
  #1  
Παλιά 17-02-15, 09:18
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2007, Ms-Office 2013
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 02-04-2013
Περιοχή: Κύπρος
Μηνύματα: 738
Προεπιλογή Αντικατάταση τελικού "ς" απο αρχείο πελατών

Καλημέρα σε όλους τους φιλους του φόρουμ,

Θέτω ένα φαινομενικά απλό θέμα το οποίο γνωριζω πως είναι εφικτό αλλά δεν θυμάμαι πώς το έχω ξανακάνει.

Έχω λοιπόν ένα αρχείο πελατών (περί τις 11,000 εγραφές) και στην προσπάθεια μου να μετατρέψω τα κεφαλαία γράμματα σε πεζά (μικρά) συνέβηκε το εξής:

Αν και έχω καταφέρει την μετατροπή τους (μέσω της Word) τελικά προέκυψε ότι, όπους υπήρχε το τελικό "Σ" στην κάθε λέξη, τώρα μετά απο την μετατροπή μου έβαλε το "σ"αντί το τελικό "ς". Δηλαδή στην λέξη ας πούμε "ΣΤΕΛΙΟΣ" έγινε μετατροπή σε "Στέλιοσ" και απο ότι αντιλαμβάνεστε θα ήθελα να αντικαταστήσω την λέξη βάζωντας φυσικά το τελικό "ς". Δηλαδή να γίνει "Στέλιος"..!

Όπως προανάφερα, έχω ξανακανει στο μακρυνό παρελθόν κάτι τέτοιο σε ένα άλλο μεγάλο αρχείο και το έχω επιτύχει αλλά τώρα μετά απο τόσα χρόνια δεν θυμάμαι πώς το έχω επιτύχει..

Παρακαλώ την βοήθεια σας και σας ευχαριστώ προκαταβολικά.
Απάντηση με παράθεση
  #2  
Παλιά 17-02-15, 10:16
Όνομα: ΝΑΣΟΣ
Έκδοση λογισμικού Office: Ms-Office 2007, Ms-Office 2016
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 14-10-2010
Μηνύματα: 455
Προεπιλογή

Καλημέρα σε όλους.
Γιώργο μπορείς να δοκιμάσεις το εξής:
Κώδικας:
UPDATE Πίνακας1 SET Πίνακας1.Όνομα = Left([Όνομα],Len([Όνομα])-1) & "" & "ς"
WHERE ((Right([Όνομα],1)="σ"));
Απάντηση με παράθεση
  #3  
Παλιά 17-02-15, 11:25
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Καλημέρα στην παρέα

Μια άλλη λύση στη συνημμένη ΒΔ.

Στηρίζεται στο ερώτημα:

UPDATE [Names] SET [Names].fName = Trim(Replace([Names]![fName] & " ","σ ","ς "));

και καλύπτει και την περίπτωση που το πεδίο περιέχει περισσότερες από μία λέξεις (πχ όνομα και επώνυμο).

Φιλικά/Γιώργος
Συνημμένα Αρχεία
Τύπος Αρχείου: mdb Replace_σ2.mdb (344,0 KB, 12 εμφανίσεις)

Τελευταία επεξεργασία από το χρήστη kapetang : 17-02-15 στις 14:22. Αιτία: αλλαγή συνημμένου
Απάντηση με παράθεση
  #4  
Παλιά 17-02-15, 13:27
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2007, Ms-Office 2013
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 02-04-2013
Περιοχή: Κύπρος
Μηνύματα: 738
Προεπιλογή

Παράθεση:
Αρχική Δημοσίευση από nasos23 Εμφάνιση μηνυμάτων
Καλημέρα σε όλους.
Γιώργο μπορείς να δοκιμάσεις το εξής:
Κώδικας:
UPDATE Πίνακας1 SET Πίνακας1.Όνομα = Left([Όνομα],Len([Όνομα])-1) & "" & "ς"
WHERE ((Right([Όνομα],1)="σ"));
Νάσο μπορείς σε παρακαλώ αν δεν κανει κόπο να ανεβάσεις ένα παράδειγμα φλιλε καθότι εν μέρη άσχετος (τουλάχιστον απο κώδικα) δεν κατάφερα να κάνω την δοκιμή?

Σε ευχαριστώ εκ προτέρων
Απάντηση με παράθεση
  #5  
Παλιά 17-02-15, 14:19
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Γιώργο, έχεις δίκιο.

Ενώ σκέφτηκα την περίπτωση στην υλοποίηση ξέχασα να τη λάβω υπόψη μου.

Δες το νέο συνημμένο.
Συνημμένα Αρχεία
Τύπος Αρχείου: mdb Replace_σ2.mdb (344,0 KB, 27 εμφανίσεις)
Απάντηση με παράθεση
  #6  
Παλιά 18-02-15, 06:38
Όνομα: ΝΑΣΟΣ
Έκδοση λογισμικού Office: Ms-Office 2007, Ms-Office 2016
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 14-10-2010
Μηνύματα: 455
Προεπιλογή

Παράθεση:
Αρχική Δημοσίευση από γιώργοςΚ Εμφάνιση μηνυμάτων
Νάσο μπορείς σε παρακαλώ αν δεν κανει κόπο να ανεβάσεις ένα παράδειγμα φλιλε καθότι εν μέρη άσχετος (τουλάχιστον απο κώδικα) δεν κατάφερα να κάνω την δοκιμή?

Σε ευχαριστώ εκ προτέρων
Καλημέρα Γιώργο.
Δες ένα παράδειγμα στην επισυναπτόμενη βάση.
Συνημμένα Αρχεία
Τύπος Αρχείου: mdb Αντικατάσταση '' σ'' .mdb (384,0 KB, 21 εμφανίσεις)
Απάντηση με παράθεση
  #7  
Παλιά 17-02-15, 13:21
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2007, Ms-Office 2013
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 02-04-2013
Περιοχή: Κύπρος
Μηνύματα: 738
Προεπιλογή

Χαιτερώ όλους και σας ευχαριστώ πολύ για την βοήθεια,

Γιώργο έχω δοκιμάσει την λύση που προτείνεις αλλά αν και δουλεύει εντούτις εντόπισα ένα πρόβλημα. Δοκίμασε στον πίνακα να γράψεις το όνομα πχ Χρίστος το οποίο περιλαμβάνει και ένα ενδιάμεσο "σ". Θα διαπιστώσεις ότι δυστυχώς αλλάζει και το ενδιάμεσο "σ" σε τελικό "ς". Εάν βρεθεί λύσει και για αυτό θα είναι το ιδανικό.

Ωστόσο θέλω να ευχαριστήσω και εσένα Νάσο και θα δοκιμάσω σε λίγο και την δική σου λύση. Εύχομαι και ελπίζω είτε με τον έναν είτε με τον αλλο τρόπο να επιλύσουμε το πρόβλημα.

Σε κάθε περίπτωση σας ευχαριστώ και πάλιν και τους δύο.
Απάντηση με παράθεση
  #8  
Παλιά 17-02-15, 22:01
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2007, Ms-Office 2013
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 02-04-2013
Περιοχή: Κύπρος
Μηνύματα: 738
Προεπιλογή

Καλησπέρα Γιώργο και ευχαριστώ πολύ για την βοήθεια σου

Βρίσκομαι υπηρεσία απόψε φίλε μου, θα κοιτάξω την αναθεωρημένη λύση που προτείνεις και εάν παραστεί αναγκαίο θα επανέλθω στο θέμα

Σε κάθε περίπτωση ευχαριστώ και πάλι, καλό βράδυ
Απάντηση με παράθεση
Απάντηση στο θέμα


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

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


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

Θέμα Δημιουργός Forum Απαντήσεις Τελευταίο Μήνυμα
[Γενικά] Απαγόρευση "save as" σε αρχείο excel Nikos Kok Excel - Ερωτήσεις / Απαντήσεις 3 23-12-14 12:58
[Γράφημα] Εμανίζει "$" αντί "€" gfevran Excel - Ερωτήσεις / Απαντήσεις 17 24-08-14 11:43
Εμφανιση "Μηνός" και "Έτους" σε πίνακα και ερώτημα antonib Access - Ερωτήσεις / Απαντήσεις 4 24-09-12 20:58
[ Πίνακες ] Εμφάνιση πίνακα "παρασκηνίου" στο "προσκήνιο" PanosPan Access - Ερωτήσεις / Απαντήσεις 6 12-10-10 15:33
[ Εκθέσεις ] Άθροισμα "σε μεταφορά" στο υποσέλιδο και "από μεταφορά" στην κεφαλίδα prokopino Access - Ερωτήσεις / Απαντήσεις 4 25-06-10 16:24


Η ώρα είναι 09:09.