Home |
Search |
Today's Posts |
|
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
jamison,
Will this work for you??? mycount = Range("e" & ActiveCell.Row) + 1 Range("e" & ActiveCell.Row) = mycount John Jamison wrote: I have command buttons in one column, that when clicked add 1 to the value in an adjacent column. As of now the code is very specific, here is the code for the buttons in cells A4 and A5: __________________________________ Private Sub CommandButton1_Click() mycount = Range("e4") + 1 Range("e4") = mycount End Sub Private Sub CommandButton2_Click() mycount = Range("e5") + 1 Range("e5") = mycount End Sub ____________________________________ I would like to make it more flexible so that it adds 1 to the cell in column e that is in the same row, instead of having to list the row #. For example, it should add 1 to the cell e"samerow", instead if creating twenty different pieces of code like "e6", one for "e7", etc., I hope this makes sense. Thanks. |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Yes, that worked great. Thanks!
-----Original Message----- jamison, Will this work for you??? mycount = Range("e" & ActiveCell.Row) + 1 Range("e" & ActiveCell.Row) = mycount John Jamison wrote: I have command buttons in one column, that when clicked add 1 to the value in an adjacent column. As of now the code is very specific, here is the code for the buttons in cells A4 and A5: __________________________________ Private Sub CommandButton1_Click() mycount = Range("e4") + 1 Range("e4") = mycount End Sub Private Sub CommandButton2_Click() mycount = Range("e5") + 1 Range("e5") = mycount End Sub ____________________________________ I would like to make it more flexible so that it adds 1 to the cell in column e that is in the same row, instead of having to list the row #. For example, it should add 1 to the cell e"samerow", instead if creating twenty different pieces of code like "e6", one for "e7", etc., I hope this makes sense. Thanks. . |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
"ClearContents" command halts code | Excel Discussion (Misc queries) | |||
"Flexible" External Links | Excel Worksheet Functions | |||
Programming a "Save as..." command button within Excel | Excel Discussion (Misc queries) | |||
Making a "Filter" button or field | Excel Discussion (Misc queries) | |||
inserting a conditional "go to" command on a excel "if" function | Excel Worksheet Functions |