vba - Remove the "same as the whole table" property from Outlook table -
i've got following code "codeize" block of code in outlook message:
on error goto catch dim oselection word.selection set oselection = application.activeinspector.currentitem.getinspector.wordeditor.application.selection oselection .font .name = "courier new" '.color = 10027008 '13369344 .size = 10 end end dim otable word.table set otable = oselection.converttotable(, 1, 1) otable .borders.outsidelinestyle = wdlinestyledot .shading.backgroundpatterncolor = wdcolorgray05 .toppadding = inchestopoints(0.1) .bottompadding = inchestopoints(0.1) .leftpadding = inchestopoints(0.2) .rightpadding = inchestopoints(0.05) end
works great, think i cannot margins work because i'm missing whatever removes "same whole table" property.
after code runs, table properties looks this:
perhaps i'm setting margins wrong, , automatically go away? missing?
word provides macro recorder allows generate vba code in background. try record vba macro in word , see properties should used that. see record or run macro more information.
Comments
Post a Comment