Multiply if Column Contains Certain Text

[jhuang5132]

I have column A that declares the account as asset, liability, expense, etc. Some of the accounts need to be reversed. I'm having a hard time figuring out a formula or code I can use. Column C contains the values. I prefer VBA as I want to add it to the current macro I already have.

So if Column A has a liability, offset by (0,2), and multiply that value by -1. If Column A has an asset, leave the value as is.

I wanted to use an if-then statement but I'm not sure how to highlight entire columns. The number of liabilities, and assets, etc. will vary so I'm stuck.

Any help would be great.

[globalsourcing]

try this

Sub k()


For i = 1 To 24

SkipBlanks = False

If Cells(i, 1).Value = "liability" Then

Cells(i, 2).Value = Cells(i, 2).Value * -1

End If
Next i

End Sub

[judgeh59]

this should get you started....I think

Please Login or Register  to view this content.

[jhuang5132]

Thanks for the quick responses guys. I just did a formula and it seems to work, but maybe you guys can see some flaws with this.

Using VBA, I would add a column and use this code:

Please Login or Register  to view this content.

I would hide the column with the original values and it would show the results from the formula above. I will just nest in the other accounts.

[judgeh59]

is it working for you? (POST #4)

[jhuang5132]

It is, but I just decided to adapt your code instead. I would have to add and hide columns, and would make it more messy. I'm still kind of surprised my formula works.

Thanks again for the code, I'm still new to VBA but I'm learning quickly.

[judgeh59]

If this has been completed to your satisfaction, please set the thread to Solved...If you feel we deserve an increase in our reputation, feel free to click on the star in the lower left of the thread. Remember, someday when you help somebody they may add to your rep points, and it could be us...just a thought...

[judgeh59]

thanks for the points and keep plugging away on the VBA