Converting to number error checking

[luizmachado]

I'm trying to "track" (recording a macro) this error check that converts this "text" to a number, but it won't track anything (literally blank).
It says the data in that cell is a text, but I don't know what to do, except, making "TextBox1.Text" to "TextBox1.Value".

ps: I wanted to track so I could make it a number, make the calculations and then make it a currency again
ps2: You can see it on Worksheet("January").Range("C77")

This is my workbook (as I can't upload files larger than 1000kb, I'm linking my dropbox link below:
https://www.dropbox.com/s/l3gzfibg6a...0dev.xlsm?dl=0

Error checking instructing me to convert into number (but, once I can't track, how it does it?):
bad5603.png

[luizmachado]

All I had to do was make "TextBox1.Text" into CCur(TextBox1.value). This CCur converted the value in TextBox1 to currency.