Overrule/Replace

  • Thread starter Thread starter 40lbsofPoop
  • Start date Start date
4

40lbsofPoop

I have a row where I will be using tally marks. I only want one
tally per row but it is based on a progression to track steps in the
process. So if they have reached the next step they can just put a
tally (an X) in the new cell and it will auto replace the previous
tally. Thank you for any help.

eg.

Step 1 Step 2 Step 3

Person 1 X

Person 2 X


Person 3 X
 
Brent,

Copy the code below, right-click on the sheet tab, select "View Code" and paste the code in the
window that appears.

HTH,
Bernie
MS Excel MVP

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Value = "X" Then
Application.EnableEvents = False
Range(Cells(Target.Row, 1), Cells(Target.Row, Target.Column - 1)).Replace "X", ""
Application.EnableEvents = True
End If
End Sub
 
This should be inserted as the first line.... So that it doesn't blow up when entering values into
column A.

If Target.Column = 1 Then Exit Sub

HTH,
Bernie
MS Excel MVP
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Overrule/Replace 1
Calculating(Processors(2)): % 1
Calculating(Processor(2)): % 8
Select method of Range class failed 4
NEED HELP! Macro loop 7
Run-time error: '9' 5
Dir help 3
Tally operations question 1

Back
Top