using macro (VB): Connect TextShape (Right-Center Glue Point) at Snap Point

Hopefully, I have the terminology correct…

LibreOffice 7.0.6.2 ( 64bit) | Windows 10 | DRAW

Problem\Question:

  1. In DRAW, how to create snap point, using a macro (VB this case).
    example. coordinates
    Position.X = 1.0
    Position.Y = 5.0
    ||
    (1.0, 5.0)

  2. Connect/Position TextShape (Right-Center Glue Point) at Snap Point Object, and not the standard Top-Left gluepoint.
    Again, using a macro.

  3. Also, to be able to apply the macro solution to other Shapes

I’m not sure that you want, you can add example in file, please?