ms-office.gr > Forum > Microsoft Excel > Excel - Ερωτήσεις / Απαντήσεις > [VBA] Άμεση αντικατάσταση

Excel - Ερωτήσεις / Απαντήσεις Ότι έχει σχέση με συναρτήσεις, μορφοποίηση, εκτυπώσεις γραφήματα κτλ.

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

 

Εργαλεία Θεμάτων Τρόποι εμφάνισης
  #1  
Παλιά 18-10-23, 10:51
Όνομα: Χρήστος
Έκδοση λογισμικού Office: Ms-Office 2010, Ms-Office 365
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 01-06-2017
Μηνύματα: 78
Προεπιλογή Άμεση αντικατάσταση

Καλημέρα Θα ήθελα την βοήθειά σας για ένα κώδικα (μιας και οι γνώσεις μου σε κώδικες είναι μηδενικές) για άμεση αντικατάσταση ανάλογα με τη γράμμα είναι στην στήλη Α και να εξηγήσω: όταν στην στήλη Α είναι το Σ στην αντίστοιχη γραμμή το Α - Β και μόνο αυτό να γίνεται Α τα υπόλοιπα να μένουν όπως είναι Όταν στην στήλη Α είναι το Κ στην αντίστοιχη γραμμή το Α - Β και μόνο αυτό να γίνεται Β
Σας ευχαριστώ προκαταβολικά
Συνημμένα Αρχεία
Τύπος Αρχείου: xlsx Βιβλίο1.xlsx (10,0 KB, 4 εμφανίσεις)
Απάντηση με παράθεση
  #2  
Παλιά 18-10-23, 15:05
Το avatar του χρήστη ChrisGT7
Super Moderator
Όνομα: Χρήστος Ζώρζος
Έκδοση λογισμικού Office: Ms-Office 2016
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 20-09-2013
Περιοχή: Κοντά σε ηφαίστειο...
Μηνύματα: 835
Προεπιλογή

Καλησπέρα Χρήστο,

Δοκίμασε το συνημμένο αρχείο αν σε καλύπτει.
Συνημμένα Αρχεία
Τύπος Αρχείου: xlsm ΑΝΤΙΚΑΤΑΣΤΑΣΗ ΑΝΑ ΓΡΑΜΜΗ.xlsm (18,3 KB, 12 εμφανίσεις)
__________________
Your Curiosity Will Be The Death of You!
Απάντηση με παράθεση
  #3  
Παλιά 19-10-23, 08:33
Όνομα: Χρήστος
Έκδοση λογισμικού Office: Ms-Office 2010, Ms-Office 365
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 01-06-2017
Μηνύματα: 78
Προεπιλογή

Σε ευχαριστώ πολύ για την βοήθεια. Πάρα πολύ καλή η ιδέα σου. Θα με βόλευε όμως, γιατί έχω περισσότερους συνδυασμούς ,αν ο κώδικας ήταν του τύπου
"Αν στο Α2 υπάρχει το Σ τότε στην γραμμή C2 -AO2 το Α - Β να δίνει Α το Γ - Δ να δίνει Γ και στην γραμμή C3 -AO3 το Ε - Β να δίνει Β
"Αν στο Α2 υπάρχει το Κ τότε στην γραμμή C2 -AO2 το Α - Β να δίνει Β το Γ - Δ να δίνει Δ και στην γραμμή C3 -AO3 το Ε - Β να δίνει Ε
Το ίδιο θα εφαρμόσω παρακάτω και στα κελιά Α4 , Α6 κλπ με άλλα γράμματα
Συγνώμη που σε κουράζω και σε ευχαριστώ προκαταβολικά
Απάντηση με παράθεση
  #4  
Παλιά 19-10-23, 09:37
Το avatar του χρήστη ChrisGT7
Super Moderator
Όνομα: Χρήστος Ζώρζος
Έκδοση λογισμικού Office: Ms-Office 2016
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 20-09-2013
Περιοχή: Κοντά σε ηφαίστειο...
Μηνύματα: 835
Προεπιλογή

Καλημέρα Χρήστο,

Αν χρειάζεσαι τρόπο χωρίς κώδικα, πιστεύω πως το φίλτρο και η αντικατάσταση θα σε καλύψουν αρκετά. Αναλυτικότερα:

1. Βάζεις φίλτρο στη στήλη με τα Σ και Κ.
2. Επιλέγεις από το φίλτρο το επιθυμητό γράμμα (π.χ. Σ) για να εμφανιστούν οι γραμμές του.
3. Επιλέγεις την περιοχή μέχρι τη στήλη ΑΟ και πατάς Ctrl+H.
4. Στο πρώτο πλαίσιο βάζεις την παλιά ακολουθία (π.χ. Α - Β) και στο δεύτερο τη νέα ακολουθία (π.χ. Α) και πατάς Αντικατάσταση όλων.
5. Επαναλαμβάνεις την παραπάνω διαδικασία και για το άλλο γράμμα.

Αν χρειάζεσαι τρόπο με κώδικα για πιο γρήγορα αποτελέσματα, θα τον έχεις το απογευματάκι, γιατί είμαι στη δουλειά. :)
__________________
Your Curiosity Will Be The Death of You!
Απάντηση με παράθεση
  #5  
Παλιά 19-10-23, 16:09
Το avatar του χρήστη ChrisGT7
Super Moderator
Όνομα: Χρήστος Ζώρζος
Έκδοση λογισμικού Office: Ms-Office 2016
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 20-09-2013
Περιοχή: Κοντά σε ηφαίστειο...
Μηνύματα: 835
Προεπιλογή

Χρήστο,

Δες αν το νέο αρχείο καλύπτει τις ανάγκες σου.

Στο φύλλο ΛΙΣΤΕΣ υπάρχουν δύο πίνακες, όπου εκεί θα βάζεις όλους τους συνδυασμούς που χρειάζεσαι ανάλογα το γράμμα. Οι πίνακες δεν είναι υποχρεωτικό να έχουν το ίδιο πλήθος γραμμών, π.χ. ο Σ μπορεί να έχει 10 συνδυασμούς ενώ ο Κ μόνο 3.
Συνημμένα Αρχεία
Τύπος Αρχείου: xlsm ΑΝΤΙΚΑΤΑΣΤΑΣΕΙΣ.xlsm (26,1 KB, 11 εμφανίσεις)
__________________
Your Curiosity Will Be The Death of You!
Απάντηση με παράθεση
  #6  
Παλιά 19-10-23, 18:17
Όνομα: Χρήστος
Έκδοση λογισμικού Office: Ms-Office 2010, Ms-Office 365
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 01-06-2017
Μηνύματα: 78
Προεπιλογή

Σε ευχαριστώ πάρα πολύ φίλε Χρήστο για την βοήθειά σου. Η λύση με το φίλτρο δεν μου πέρασε καθόλου από το μυαλό. Για άλλη μια φορά σε ευχαριστώ πολύ.
Απάντηση με παράθεση
Απάντηση στο θέμα


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

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


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

Θέμα Δημιουργός Forum Απαντήσεις Τελευταίο Μήνυμα
[VBA] αντικατάσταση συνάρτησης σε VBA. maxtor10 Excel - Ερωτήσεις / Απαντήσεις 2 06-04-17 19:01
[VBA] Αντικατασταση Γραμματων manolis Excel - Ερωτήσεις / Απαντήσεις 3 05-06-15 21:04
[ Υποφόρμες ] Άμεση ενημέρωση πεδίου συνόλου athineos1812 Access - Ερωτήσεις / Απαντήσεις 3 27-07-14 16:50
[ Φόρμες ] Άνοιγμα φόρμας και άμεση μετάβαση σε συγκεκριμένη εγγραφή. sakis297 Access - Ερωτήσεις / Απαντήσεις 11 07-03-12 19:31
Αμεση ενημέρωση Access alatis Access - Ερωτήσεις / Απαντήσεις 6 27-07-10 23:45


Η ώρα είναι 06:51.