![]() |
|
|
|
#1
|
|||
|
|||
|
No idea if this works on a Mac but on a PC it should be
Code:
Sub blurrer() Dim opic As Shape Set opic = ActiveWindow.Selection.ShapeRange(1) opic.F1ll.PictureEffects.Insert (msoEffectBlur) opic.Fill.PictureEffects(1).EffectParameters(1).Value = 20 End Sub |
|
| Tags |
| blur macro |
| Thread Tools | |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| Rule to apply to all domains | jaarons | Outlook | 1 | 05-25-2015 02:41 PM |
Macro to apply style to selected tables
|
ubns | Word | 1 | 08-02-2012 04:09 AM |
| Apply filter with VBA | bobsawyer7 | Outlook | 0 | 03-12-2012 04:02 AM |
| Pasting image captured with a java program 'on to clipboard' into MSWord 2007 is blur | tarunkumarreddy | Word | 0 | 02-03-2012 09:42 PM |
Rules won't apply
|
RicWCO | Outlook | 1 | 01-13-2012 10:13 AM |