
26-04-24, 10:19
|
 | Διαχειριστής Όνομα: Χρήστος Ζώρζος Έκδοση λογισμικού Office: Ms-Office 2016 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική | | Εγγραφή: 20-09-2013 Περιοχή: Κοντά σε ηφαίστειο...
Μηνύματα: 1.046
| |
Καλημέρα Γιώργο,
Μια προσέγγιση είναι μέσω κώδικα. Δηλαδή, δημιούργησε στο βιβλίο εργασίας σου μια module και επικόλλησε τον παρακάτω κώδικα: Κώδικας: Public Function Eval(Rng As Range) As Currency
Eval = Evaluate("SUM(" & Replace(Replace(Rng, "€", ""), ",", ".") & ")")
End Function
Αυτό δημιουργεί τη συνάρτηση Eval(). Μ' αυτόν τον τρόπο αν πληκτρολογήσεις π.χ. =Eval(A1) θα υπολογίσει το άθροισμα που χρειάζεσαι, όπου Α1 το κελί που βρίσκεται το κείμενο προς μετατροπή.
__________________ Your Curiosity Will Be The Death Of You! |