Hi !Does anyone know how to automate Gaussian Blur in CorelDraw VBA ?
with selected bitmap
Sub Macro1()Dim OrigSelection As ShapeRange Set OrigSelection = ActiveSelectionRange OrigSelection(1).Bitmap.ApplyBitmapEffect "Gaussian Blur", "GaussianBlurEffect GaussianBlurRadius=350,GaussianBlurResampled=0"End Sub
PS: I tried macro recored on X5
This code works, but it gets 'frozen' and 'GaussianBlurRadius' can't modify the effect. This happens after non-destructive effects have been implemented. In the link below you have more details about this:
(+) Dados de curva de tom em VBA - CorelDRAW e Corel DESIGNER API - Área do desenvolvedor - Comunidade CorelDRAW
I just want to apply GaussianBlur effect to a text or an object without transform it into bitmap
with the Gaussian blur tool from the effect menu > blur menu.
But that's exactly what the discussion in the link talks about, how to use the new non-destructive effects, and apparently that's all there is to it!
thank you but sorry my level of coding does not allow me to understand what exactly needs to be done.
May I ask if it is possible to modify it to Gaussian blur at the edges of the image?