Event fired if the target text has been set.

Syntax:

 
OnSetTargetText(TransUnit As TransUnit)
Parameters: TransUnit Translation unit for which the target text has been set.
Example: 
' in a class module "EventClass"

Dim WithEvents App As Application

Private Sub App_OnSetTargetText(TransUnit As TransUnit)
 
[...]

End Sub

' in a module

Public EventManager As New EventClass

Sub TestMacro()
	Set EventManager.App = Application
End Sub

See also:

Class Application
Last Updated: 03/29/21