add some vba little functions in it

...