Skip to content
ProjectControls.com
Asta Powerproject

VBA code for setting Income value

In the Open Standard
Dariusz CMember for 7 years 10 months
Created
1
3
0

Hi experts

I'm writing macro for Asta and hit the wall when I want to assign income value in task.

Below code finds Income Cost Centre assigned, but can't find a way to set value.

Dim t As TaskBase

Dim bcv As BarChartView
Dim ca As CostAllocation

 
Set bcv = ap.CurrentView
 
AllTasks = bcv.AllTaskBaseIds
 
 
For Each act In AllTasks    
 
    For i = 1 To t.Allocations.Count
 
    
        Set ca = t.Allocations(i)
 
        'here I need to set income value on this task 
 
 
    Next i
 
Next act


Thank you in advance for any hints!
Save Follow Follow forum Report
Reply New topic

1 reply

Oldest first
  1. 0
    Dariusz C ·
    #1

    It wasn't work with

    It wasn't work with ca.Value.
    I found that work like below:

    The missing code is:

    ca.GivenValue = 100 ' or whatever you need

    Topic closed :)

    Report

Log in or join to reply

ProjectControls.com is free to join. Members can post questions, reply, vote and follow discussions.

Log inJoin free

Existing members: your original username and password still work. Forgot password?