Forum

Αναζήτηση στο ms-office.gr

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

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

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

 

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

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

Καλησπέρα

Σάκη, μπορείς να τρέξεις το ακόλουθο, σε προβολή 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
Περιοχή: Θεσσαλονίκη
Μηνύματα: 605
Προεπιλογή

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

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

Κώδικας:
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
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 04-12-2009
Μηνύματα: 90
Προεπιλογή

παιδια ευχαριστω πολυ με γλιτωσατε απο πολυ δουλεια.
αν θελω να κανω το αντιθετο , δηλαδη να προσθεσω στην αρχη των εγραφων καποια γραμματα
π.χ. 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
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 04-12-2009
Μηνύματα: 90
Προεπιλογή

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

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

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

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

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

Καλημέρα!

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

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

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

Φιλικά

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

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

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

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

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


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

Θέμα Δημιουργός Forum Απαντήσεις Τελευταίο Μήνυμα
Απόδοση τιμής Υπολογιζόμενου Πεδίου σε πεδίο πίνακα. foxone Access - Ερωτήσεις / Απαντήσεις 6 14-10-11 10:32
Διαγραφή Δεδομένων από Πινάκα synti Access - Ερωτήσεις / Απαντήσεις 6 04-04-11 23:58
Αντιγραφή πεδίου σε πίνακα... Χρήστος Access - Ερωτήσεις / Απαντήσεις 8 06-02-11 19:46
Δημιουργία και Διαγραφή Πίνακα... Ms-Office-Development Team Access samples - Χρήσιμα αρχεία & παραδείγματα 0 15-02-10 06:02
[Γενικά] Διαγραφή γραμμής Chris Excel - Ερωτήσεις / Απαντήσεις 2 17-01-10 19:59


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