Forum - Γενικά Πως μπορώ να κάνω ένα μαζικό copy-paste;

Forum (https://www.ms-office.gr/forum/)

- Excel - Ερωτήσεις / Απαντήσεις (https://www.ms-office.gr/forum/excel-erotiseis-apantiseis/)

- - [Γενικά] Πως μπορώ να κάνω ένα μαζικό copy-paste; (https://www.ms-office.gr/forum/excel-erotiseis-apantiseis/2720-pos-mporo-na-kano-ena-maziko-copy-paste.html)

Πως μπορώ να κάνω ένα μαζικό copy-paste;

Δουλεύω ένα project μετάφρασης στο excel. Σε μια στήλη είναι οι όροι στα Αγγλικά (πηγή) και στην διπλανή μεταφράζω στα Ελληνικά (μετάφραση) . Επειδή το αρχείο είναι τεραστιο και επειδή αρκετοι όροι επαναλαμβάνονται, πως μπορώ να κάνω paste τον μεταφρασμενο ορο σε όλο το αρχείο απέναντι απο όμοιες πηγες? Π.χ Όπου υπάρχει ο ορος "Cancel", στο διπλανο κελι να γραφτεί "Άκυρο"...

:confused1:
:confused1:
:confused1:

Αν επιλέξεις τη στήλη που περιέχει τους όρους που θα αντικατασταθούν από τους αντίστοιχους ελληνικούς, μπορείς απλά να χρησιμοποιήσεις την κλασική Αντικατάσταση (Ctrl + H).

Δεν ξέρω αν σε διευκολύνει αυτή η μέθοδος.

Καλησπέρα
Πέτρο καλώς όρισες στην παρέα μας.
Δεν χρειάζεται Copy-Paste.
Αν υποθέσουμε ότι στην Α στήλη από A1 έως A2000 είναι λέξεις στα Αγγλικά
και στην Β στήλη από B1 έως B2000 είναι η περιοχή που θα βρίσκονται οι μεταφράσεις τους
τότε βάλε τον κώδικα:

Κώδικας:

Sub MyTranslation()

    Dim c As Range

    Application.ScreenUpdating = False

    For Each c In Range("A1:A2000")

        If c.Value = Range("D1").Value Then

            c(, 2).Value = Range("D2").Value

        End If

    Next c

End Sub

σε μία Module και σύνδεσέ τον σ' ένα κουμπί.
Βάλε στο D1 όποια Αγγλική λέξη θέλεις που περιέχεται στην περιοχή A1 έως A2000
Βάλε στο D2 την μετάφραση
Με το πάτημα του κουμπιού όλες οι επιλεγμένες λέξεις θα μεταφραστούν αυτόματα
Προσοχή στην ορθογραφία
Αν επιλέξουμε "house" και "Σπίτι" θα μεταφραστεί
αλλά δεν θα μεταφραστεί αν υπάρχει "House"
Αν η περιοχή μας έως το A2000 δεν φτάνει τότε άλλαξε το με A3000 για παράδειγμα
Όσο μεγαλώνει η περιοχή ελέγχου τόσο θα γίνεται ο κώδικας πιο αργός
Test για όλη τη Στήλη Α:Α περίπου 8 sec. για το 2010 excel