Use .fill vector pattern to apply transparency from VBA

Looked high low cannot seem to find anything. Want to use a .fil file to apply vector pattern transparency from a macro. Cannot seem to find any info on how or if this can be done. Any ideas?

TIA

Tom