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

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

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

 

Εργαλεία Θεμάτων Τρόποι εμφάνισης
  #1  
Παλιά 16-04-11, 17:46
Όνομα: Σάκης
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 04-12-2009
Μηνύματα: 104
Προεπιλογή Διαγραφή μέρους πεδίου σε πίνακα

καλησπερα σε ολους
εχω εναν πινακα και ενα απο τα πεδια του ειναι το "code"
στο πεδιο αυτο υπαρχουν περιπου 5.000 εγραφες
οι εγραφες αυτες ειναι οπως η παρακατω " ΕΧ-11000251......"
γινεται να σβησω το προθεμα "ΕΧ-" απο ολες τις εγραφες μαζι ;
αρχισα να τις κανω μια μια αλλα δεν βλεπω να τελειωνω.
αν ξερει καποιος ας βοηθησει.
ευχαριστω σακης.
Απάντηση με παράθεση
  #2  
Παλιά 16-04-11, 19:22
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Καλησπέρα

Σάκη, μπορείς να τρέξεις το ακόλουθο, σε προβολή SQL, ερώτημα: UPDATE table1 SET table1.test = Mid([Test],4);
Φυσικά θα αντικαταστήσεις τα ονόματα του πίνακα Table1 και του test με τα αντίστοιχα δικά σου.

Φιλικά/Γιώργος
Απάντηση με παράθεση
  #3  
Παλιά 16-04-11, 19:33
Το avatar του χρήστη Meteora
Συντονιστής
Όνομα: Νίκος
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 28-12-2008
Περιοχή: Θεσσαλονίκη
Μηνύματα: 1.033
Προεπιλογή

Καλησπέρα στη κοινότητα

Σάκη, φτιάξε σε μια φόρμα ένα κουμπί και 'φόρτωσε' τον κώδικα:

Κώδικας:
Private Sub command1_Click()
   With CurrentDb.OpenRecordset("OnomaPinaka", 2)
        .MoveFirst
        Do While Not .EOF
            .Edit
            !pedio = Mid(!pedio, 4)
            .Update
            .MoveNext
        Loop
    End With
End Sub
Αφαιρεί τους πρώτους τρεις (3) χαρακτήρες από τα περιεχόμενα του πεδίου [pedio] χωρίς καμιά διάκριση.

Θερμά παρακαλώ να κρατήσεις πριν αντίγραφο για κάθε ενδεχόμενο...

Με εκτίμηση

Νίκος Δ.

ΥΣτερολόγιο : Βλέπω μια απάντηση του φίλου μου Γιώργου. Σε περίπτωση που δεν μπορείς να φτιάξεις το "ερώτημα ενέργειας" που προτείνει ο Γιώργος, δοκίμασε τη δική μου VBA...
Απάντηση με παράθεση
  #4  
Παλιά 16-04-11, 19:55
Όνομα: Σάκης
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 04-12-2009
Μηνύματα: 104
Προεπιλογή

παιδια ευχαριστω πολυ με γλιτωσατε απο πολυ δουλεια.
αν θελω να κανω το αντιθετο , δηλαδη να προσθεσω στην αρχη των εγραφων καποια γραμματα
π.χ. pc11000250...... τι μπορω να κανω ;
ευχαριστο και παλι σακης
Απάντηση με παράθεση
  #5  
Παλιά 16-04-11, 20:39
Όνομα: ΔΗΜΗΤΡΗΣ
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007, Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 09-11-2010
Περιοχή: Γιαννιτσά
Μηνύματα: 149
Προεπιλογή

To κανω copy απο του Γιωργου και το προσαρμοζω
UPDATE table1 SET table1.test = "Ρ01010101" & table1.test;

Δημητρης
Απάντηση με παράθεση
  #6  
Παλιά 16-04-11, 21:03
Όνομα: Σάκης
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 04-12-2009
Μηνύματα: 104
Προεπιλογή

δημητρη σ'ευχαριστο και εσενα οπως και τα αλλα παιδια στο forum για την βοηθεια.

μια τελευταια ερωτηση και συγνωμη αν σας πρηζω!!!!!

αν θελουμε να διαγραψουμε ενα μερος των εγραφων που βρησκεται καπου ενδιαμεσα
πχ pc11002sa100...... ας πουμε οτι θελω να σβησω το "sa" πως το κανω;;;
ευχαριστω και παλι
Απάντηση με παράθεση
  #7  
Παλιά 16-04-11, 21:24
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Σάκη, μπορείς να τρέξεις το ερώτημα: UPDATE table1 SET table1.test = Replace([test],"sa","");
Θα αφαιρέσει όλα τα «sa» που θα βρίσκει σε κάθε τιμή του πεδίου test.
Γιώργος
Απάντηση με παράθεση
  #8  
Παλιά 16-04-11, 21:36
Όνομα: Σάκης
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 04-12-2009
Μηνύματα: 104
Προεπιλογή

παιδια ενα μεγαλο ευχαριστω απο μενα γιατι και σημερα με γλυτωσατε απο πολυ δουλεια.
ΕΥΧΑΡΙΣΤΩ !!!!!!!!
ΣΑΚΗΣ
Απάντηση με παράθεση
  #9  
Παλιά 17-04-11, 09:29
Το avatar του χρήστη Tasos
Διαχειριστής
Όνομα: Τάσος Φιλοξενιδης
Έκδοση λογισμικού Office: Ms-Office 365
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική, Γερμανική
 
Εγγραφή: 21-10-2009
Μηνύματα: 2.035
Προεπιλογή

Καλημέρα!

Σάκη από το μήνυμα σου βγήκε κάτι θετικό και σ ευχαριστούμε!

Πολλοί από μας είδαν και κατανόησαν τη βασική χρήση της UPDATE της SQL καθώς και την εμμεση αλλαγή περιεχομένων με χρήση του Recordset στη VBA.

Νομίζω ότι αξίζει να αναφέρουμε και την κλασσική λύση (μιας και πρόκειται για αντικατάσταση τμημάτων περιεχομένων ενός πεδίου πίνακα με σταθερή σειρά και μήκος)
δηλαδή:
  • Άνοιγμα του πίνακα
  • Επιλογή του πεδίου (στήλης) προς αλλαγή
  • Κλήση της Εύρεσης/Αντικατάστασης της Access (CTRL+H)
  • ........

Φιλικά

Τάσος
__________________
Ms-Office Development Team
Ανάπτυξη επαγγελματικών εφαρμογών
Απάντηση με παράθεση
  #10  
Παλιά 17-04-11, 10:36
Όνομα: Σάκης
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 04-12-2009
Μηνύματα: 104
Προεπιλογή

καλημερα Τασο και σε ολα τα παιδια του forum.
ευχαριστω για την βοηθεια
Σακης
Απάντηση με παράθεση
Απάντηση στο θέμα

Εργαλεία Θεμάτων
Τρόποι εμφάνισης

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

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


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

Θέμα Δημιουργός Forum Απαντήσεις Τελευταίο Μήνυμα
[ Πίνακες ] Διαγραφή εγγραφών πίνακα υπό όρους dimitrisp Access - Ερωτήσεις / Απαντήσεις 5 12-11-16 13:58
Αυτόματη διαγραφή εγγραφών Πίνακα dimitrisp Access - Ερωτήσεις / Απαντήσεις 3 09-04-15 23:50
[ Πίνακες ] Ενημέρωση πεδίου πίνακα kosta Access - Ερωτήσεις / Απαντήσεις 5 11-12-12 09:02
Διαγραφή Δεδομένων από Πινάκα synti Access - Ερωτήσεις / Απαντήσεις 6 04-04-11 23:58
Δημιουργία και Διαγραφή Πίνακα... Ms-Office-Development Team Access samples - Χρήσιμα αρχεία & παραδείγματα 0 15-02-10 06:02


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