VBA - Converting Text to Number Solved

Question

It's me again!
I wanted to know if there is a function that converts text into a number (more specifically into %) to store it in a cell (Excel).
Here's an example of what I'm doing:

ActiveCell.Value = UserForm3!TextBox1

But the problem is that the cell where the value is stored changes to text format!

Is there a solution?
Thanks

filaliabdou · Accepted Answer

a small clarification  my_string="9874" val(my_string)=9874  time is not money, time is life

blux · Answer

Hello,

in the Excel help about string functions, you'll find the CNUM function, it might suit you...

the list of functions can be obtained by searching for "About text functions" in the help

See you, Blux

 "Stupid people dare anything. That's how you recognize them."

blux · Answer

I'm sorry, I wasn't paying attention.  In the VBA help, they talk about VAL... which suits perfectly... ;-)  See you, Blux  "Fools dare everything. It's even how we recognize them."

Jerry21 · Answer

You can get a book on VB or go find the MSDN library online (legally, of course!)  Don't take your time because time doesn't wait for you.

filaliabdou · Answer

Use the VAL() function instead, which converts text to a number and is a VBA function. my_string = "9874" val(my_string)=9874   le temps n'est pas de l'argent, le temps est la vie

nounours · Answer

HELLO everyone

In a table made with Excel 2003, I would like to automatically replace the F with 2 and the H with 1 in another column
For the beginner that I am, it seems difficult because I can't find a function to do it
Is there a trick
Thank you for any response

kadeh · Answer

Good morning, XRay maybe this suits you  If UserForm3!TextBox1.Value = "" Then ActiveCell.Value .Value = "" Else ActiveCell.Value = CDbl(UserForm3!TextBox1.Value) End If  have a nice day

S_D · Answer

Hi Xray,
I suggest a two-step method:

1/ You do a copy/paste special (change the parameters) to paste as numbers the content of the cells you're interested in
2/ You change the style "manually" by recording a macro.

You compile it all into one program. That's it!

djidge · Answer

.............D............I..............E..................I............. F...............I............... G..........I
...........................I..................................I...............................I............................I
....11/03/2010 ....I........ Couleur ...........I............ 45..............I... #VALUE!.........I
....25/03/2010 ....I.......... Bois ...............I........... 60...............I... #VALUE! .......I

Here is a glimpse of my table and here is my formula in G: = E6*7+D6

I would need to calculate a delay. In E there is a dropdown list containing the words Wood, color, white, bending, and bicolour. Each of these corresponds to a delivery time in weeks, hence the 7 in the formula.

In VBA after using the help I did this but it doesn't work (at the same time, given my level, I expected that)

Private Sub Worksheet_Calculate() If Target.Column <> 7 Or Target.Row < 6 Or Target.Cells.Count > 1 Then 'if the column <>7 (C) or the row <6 or the selection is more than 1 cell Private Const Wood As Integer = 4 Private Const Color As Integer = 3 Private Const Bending As Integer = 6 Private Const Bicolour As Integer = 4 Private Const White As Integer = 2 Else On Error GoTo End End If End Sub

VBA - Converting Text to Number

9 réponses

Texture issues in enshrouded

Announcement: online source code archive

Pc that doesn't run normally

Keyboard issue with the "alt gr" key

End of the movie room 1408

Pc startup black screen white dash blinking

Edit mp3 file properties

Freebox telephony no dial tone

Pc won't start - pxe issue (e61 and m0f)

I would like to change the date on my digitec watch.