help with If Isnumeric

**justchris** · 02-10-2005, 04:02 AM

Ok, This has really been a thorn in my side. It seems there should be an easy way to do this through excel but since I havent been able to find how I've turned to vba.

Heres what I have.

if isnumeric(sheets("sales 2").range("e11")) then
Sheets("sales 2").range("g11") = Sheets("sales 2").range ("g11") _
+ Sheets("sales 2"). range(e12)

What this does is it takes the inputed number from collum g adds it to collum e, basically keeping e updated on a daily basis. If this can be done somehow with a circular refrence please let me know.

Sure this way works, but its totally flawed. It doesnt make sense why i would have to use this code just to update a number on a regular basis.

So my question is: I have to do this to a whole sheet, Right now I have that code for each cell. I need a sum(g1:g27) or something similiar to simplify this and make it a whole hell of a lot easier to edit. ANY HELP WOULD BE AWESOME. Thanks in advance

Chris

**mangesh_yadav** · 02-10-2005, 07:05 AM

Use the following code instead:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 7 Then
Cells(Target.Row, 5) = Cells(Target.Row, 5) + Cells(Target.Row, 7)
End If
End Sub

This code has to be entered in the module of the sheet in question. This can be done by right-clicking on the sheet tab name, and then selecting view code.

- Mangesh

**justchris** · 02-11-2005, 08:26 AM

Well, I see what you did there... A problem with that is I need it to stop half way down the page. Example would be g6:g20. I also like the other codes ability to be used with a button instead of on change.

And if you have any info on where I can find some more info on this, or even help me describe what it is im trying to do so I can search for it that would be great too. That is probably my biggest problem... I dont know what to call what im trying to do.

And Thanks Mangesh
This project im working on might get me a nice raise(I'm up for review next week so I'll let you know

)

And thanks in advance for anyone elses help
Chris

**justchris** · 02-14-2005, 05:02 AM

Anyone else have any suggestions by chance?

**mangesh_yadav** · 03-03-2005, 12:57 AM

Hi Justchris,

sorry, had not seen your reply to your second post.

For it to work for g6:g20, modify my code above to something likethis:

Please Login or Register  to view this content.

And If you want it to work for a button, then use something like this:
Assign the following code to the button. I am assuming that you will use a button from the control toolbox

Please Login or Register  to view this content.

- Mangesh

help with If Isnumeric

LinkBack

Thread Tools

Rate This Thread

Display

Help with IF ISNUMERIC and understanding the fundamentals behind it.

Thread Information

Users Browsing this Thread

Bookmarks

Bookmarks

Posting Permissions