Amy Gray52 said:Is there any way to select a column in an Excel sheet (filled with numbers—specifically seniority data) and just bump all those numbers up by one (or whatever amount)?
Try using a VBA macro that you can run manually whenever you need to bump specific cells on a given Sheet by a certain number.
You could even create a Button to trigger the macro. Just a heads-up: buttons are risky because if you misclick, there's no UNDO once a macro runs. But hey, I'll give you a second macro to subtract the same amount. For the subtraction version, just swap out the math operator in this code:
Code:
Sub plus()
EnableCancelKey = xlDisabled Application
ScreenUpdating = False Sheet1
Sheet1.Range("A1") = Sheet1.Range("A1").Value + 1 Sheet1
Sheet1.Range("A2") = Sheet1.Range("A2").Value + 1 Sheet1
Sheet1.Range("A3") = Sheet1.Range("A3").Value + 1 Sheet1
Sheet1.Range("A4") = Sheet1.Range("A4").Value + 1 Sheet1
Sheet1.Range("A5") = Sheet1.Range("A5").Value + 1 Sheet1
Sheet1.Range("A6") = Sheet1.Range("A6").Value + 1 Sheet1
End Sub
EnableCancelKey = xlDisabled Application
ScreenUpdating = False Sheet1
Sheet1.Range("A1") = Sheet1.Range("A1").Value + 1 Sheet1
Sheet1.Range("A2") = Sheet1.Range("A2").Value + 1 Sheet1
Sheet1.Range("A3") = Sheet1.Range("A3").Value + 1 Sheet1
Sheet1.Range("A4") = Sheet1.Range("A4").Value + 1 Sheet1
Sheet1.Range("A5") = Sheet1.Range("A5").Value + 1 Sheet1
Sheet1.Range("A6") = Sheet1.Range("A6").Value + 1 Sheet1
End Sub
To see how this actually works in practice, check out this tutorial
