Klik Event i MS Project
Jeg ønsker at kunne klikke på en række i MS Project - finde et id - og springe til en extern VBA Form der viser detaljerne i Id'enDet gør jeg som beskrevet nedenfor i Excel. Nu ønsker jeg det samme i MS Project.
Jeg har i linket nedenfor fundet nogle koder men mangler en klik event ar lægge dem i svarende til excel's Worksheet_BeforeDoubleClick
Kan i hjælpe
Excel:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Row = Selection.Row
ProduktId = Cells(Row, 3).Value
AccessApp.Run "Gantt_Produktionsplaner", ProduktId
If DoClose Then
AccessApp.Quit
End If
Set AccessApp = Nothing
end sub
Project:
https://learn.microsoft.com/en-us/office/vba/api/project.task.getfield
Dim projectField As Long
Dim projectFieldName As String
Dim message As String
projectField = FieldNameToFieldConstant("TestEntProjText", pjProject)
ActiveProject.ProjectSummaryTask.SetField FieldID:=projectField, Value:="This is a new value."
projectFieldName = FieldConstantToFieldName(projectField)