I have to automate the drawing of the organizational chart by the way of VBA and complete some calculation. For Example:
On Sheet1, I have allowed the user to input the organizational details which can dynamic as below:
<tbody>
</tbody>On Sheet2, with the help of the vba code I am pasting the above values and completing the accumulation and domination calculation:
Accumulation logic : the total shares accumulated by the child at each level in its parents level i.e., 1.1 accumulation in 1
Domination logic : if the percentage value is more 50 then the child owns the total share of the parent i.e., 1.2 owns 100% of 1
<tbody>
</tbody>
Along with the above calculation the vba needs to generate the two org charts. I have the code but it is buggy and heavy. Can somebody help me in writing the simple code.?
On Sheet1, I have allowed the user to input the organizational details which can dynamic as below:
| Level | Name | Percentage value |
| 1 | Alphabet | 100 |
| 1.1 | 40 | |
| 1.2 | Calico | 60 |
<tbody>
</tbody>
Accumulation logic : the total shares accumulated by the child at each level in its parents level i.e., 1.1 accumulation in 1
Domination logic : if the percentage value is more 50 then the child owns the total share of the parent i.e., 1.2 owns 100% of 1
| Level | Name | Percentage value | Accumulation | Domination |
| 1 | Alphabet | 100 | 100 | 100 |
| 1.1 | 40 | 40 | 0 | |
| 1.2 | Calico | 60 | 60 | 100 |
<tbody>
</tbody>
Along with the above calculation the vba needs to generate the two org charts. I have the code but it is buggy and heavy. Can somebody help me in writing the simple code.?
