Hi
I attach a test file, how can I find component "Unpaid Leave" for any employee with this pay component to then change the minus value to a plus and a plus value to a minus ?
I have done a before and after as to what I need my macro to do to help - in the test file attached.
In excel I would do a ctrl and find "Unpaid Leave" then an if statement : if (cell<0, cell * -1, active cell value) - but I don't know how to do this in vba ?
Thanks in advance for your help.
Leanne
Hi,
Try this:
Dom
Sub test() Dim rngLoopRange As Range For Each rngLoopRange In Range("C2:C" & Range("C" & Rows.Count).End(xlUp).Row) If UCase(rngLoopRange.Value) = "UNPAID LEAVE" Then With rngLoopRange.Offset(0, 2) .Value = .Value * -1 End With End If Next rngLoopRange End Sub
"May the fleas of a thousand camels infest the crotch of the person who screws up your day and may their arms be too short to scratch..."
Use code tags when posting your VBA code: [code] Your code here [/code]
Remember, saying thanks only takes a second or two. Click the little star to give some Rep if you think an answer deserves it.
Thank you very much - that worked perfectly !
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks