Καλημέρα σας, χρειάζομαι μια μακροεντολή που να μετατρέπει το περιεχόμενο μιας πράξης/συνάρτησης σε κείμενο ώστε να φαίνονται αναλυτικά οι υπολογισμοί που δίνουν το αποτέλεσμα μου. Μετά από λίγη έρευνα βρήκα το εξής:
Function FORM2TEXT(form As Range)
If form.HasFormula Then
FORM2TEXT = form.Formula
Else: FORM2TEXT = form
End If
End Function
Το οποίο δουλεύει μια χαρά και με βολεύει άλλα θα ήθελα να κάνω κάποιες τροποποιήσεις.
1. (με την χρήση της replace μάλλον) στο κείμενο που θα επιστρέφει το * να αντικαθιστάτε από × και όλα τα + - = και × να είναι ανάμεσα από κενά ώστε η πράξη να είναι ευανάγνωστη.
2. Η μορφή των αριθμών να είναι 0.000,00
3. Αν είναι δυνατόν, σε μια πράξη του τύπου =Η23*0,56 αντί για =Η23*0,56 να δίνει κατευθείαν την τιμή του Η23 π.χ. =2300*0,56
Ελλείψει χρόνου για να διαβάσω αρκετά ώστε να το κάνω μόνος μου, στρέφομαι στην καλή σας διάθεση για βοήθεια.
Ευχαριστώ.