Needing a Macro Button to execute Subtraction on Sheet 1 and Addition on Sheet 2

Hello,

So i'm asking for a friend here.

He's stuck and is basically trying to write the correct code for the VBA Macro Button that executes the following from a single press: Adds a Value in Sheet 2 and Subracts in Sheet 1.

So for instance he's wanting to Sell Apples.

-> How much is in Stock: Sheet 1 Apples in stock with Row 1 Column A Cell = 50
-> Individual that bought some apples: Sheet 2 Buyer with Row 1 Column A Cell = 4

By increasing the value to 4 in R1CA within Sheet 2, Sheet 1 R1CA would have 46.

What code or how would the code need to be written in order to execute an action on both sheets simultaneously, but subtracting Sheet 1 and Adding to Sheet 2 (at the same time).

Can you please advise?

Any help would be greatly greatly appreciated.



Friend wanted to also have the following added which is ** * Detrimentally important!! **

As it is being designed for an office, everything is simple and made of buttons. It needs to be VBA code so that way a Single Button press can execute the action of Subtracting Value from Sheet 1, that was entered in Sheet 2.

Something like this ?

Please Login or Register  to view this content.

The beginning condition (before running the macro) :
Sheet1 cell A1 has value (for example) 50
Sheet2 cell A1 no value

When the macro is run, it ask how many sold.
If for example the user input 4, then
Sheet1 cell A1 value become 46
Sheet2 cell A1 value become 4

But I don't think is that simple,
since maybe there are more data, not just one data in cell A1 in a whole sheet .