Feb 10 2019 03:56 PM
The 3 steps below prompt me to manually enter "SUGGESTED SHARES" from "UN-ALLOCATED FUNDS" into the "ADDITIONAL SHARES" cell.
If possible I would like to automate this process. The cells at the top ie "U30" would use up "UN-ALLOCATED FUNDS" first.
1) SUGGESTED SHARES =ROUNDDOWN(($Y$17-$Y$18)/$Q30,0)
2) UN-ALLOCATED FUNDS =$Y$17-$Y$18
3) ADDITIONAL SHARES see macro below
Sub ADDITIONALSHARES()
'
' ADDITIONALSHARES Macro
'
'
Dim KeyCells As Range
' The variable KeyCells contains the cells that will
' cause an alert when they are changed.
Set KeyCells = Range("U30:U600")
If Not Application.Intersect(KeyCells, Range(Target.Address)) _
Is Nothing Then
' Display a message when one of the designated cells has been
' changed.
' Place your code here.
StarStopCalc
End If
End Sub