Γειά σας, έχω επισυνάψει για παράδειγμα ένα αρχείο του excel το οποίο δουλεύει με καταχωρήσεις και Visual Basic.
Όταν πατάω το κουμπί "Enter" μου βγάζει ένα παράθυρο επεξεργασίας της κάθε καταχώρισης.

Στο Editboxe "Value" αν γράψω "5" θα το καταχωρήσει κανονικά στο φύλλο εργασίας,  αν ομως γράψω έναν αριθμό με υποδιαστολή πχ "5,5" θα το εμφανίσει αλλά με Error και θα λέει :

"Number stored as text"

αυτό δημιουργεί πρόβλημα στο άθροισμα απο το κελί H2 και για να διορθωθεί πρέπει να γίνει χειροκίνητα ένα ένα..

Ο κώδικάς του στο σημείο που αναφέρεται για το τι θα γραφτεί στη κωλόνα 5 στο τέλος λέει "Text" αυτό κανονικά δεν θα έπρεπε να λέει κάτι άλλο για να καταχωρεί κανονικά τα ψηφία με υποδιαστολή? 

 <<   Worksheets("Example").Cells(RowNo, 5).Value = _
   DialogSheets("DLG").EditBoxes(1).Text   >>

Υπάρχει τρόπος να καταχωρείται κατευθείαν σαν αριθμός χωρίς να βγάζει "Error" όταν έχει υποδιαστολή?

Βρηκα μια λυση, ελπιζω να σε βολευει. Αντι για υποδιαστολη χρησιμοποιησε την τελεια και φροντισε ο αριθμος να εχει την εξης μορφη:

π.χ 5.500 (ΟΧΙ 5.5 ΟΥΤΕ 5,5 ΟΥΤΕ 5,500). OK?

Ευχαριστώ φίλε για τη γρήγορη απάντηση,

θα προτιμούσα να βρεθεί μια λύση που να καταχωρείται ο αριθμός μόνο με υποδιαστολή και χωρίς error.. 

Στο "module2" που γραφει τον κώδικα δεν γίνεται να αλλάξω κάποια λέξη η φράση και να διωρθοθεί το πρόβλημα?

Δοκίμασες να παίξεις με την συνάρτηση ccur π.χ.

Worksheets("Example").Cells(RowNo, 5).Value = _
   CCur(DialogSheets("DLG").EditBoxes(1).Text)

Δες το συννημένο

Αυτό ακριβώς ήθελα και δεν ήξερα τι πρέπει να γράψω στον κώδικα,

Ευχαριστώ για την απάντηση και το χρόνο που αφιέρωσες!