How to add set text bold, italic, super script and sub script in comment text in Word VBA? -


i want format comment text in word template using vba. can add simple text using following code. don't know how format text

commenttext = "test bold: bold text & vbnewline & test italic: italic text & vbnewline & test bold italic: bold italic text & vbnewline &  test superscript: brandtm & vbnewline & test subscript: h2o" selection.comments.add range:=selection.range selection         .typetext (commenttext)                        'add comment text end

output should following image: enter image description here

the code below add formatted comment selected text. tested in word 2007, , functioning expected.

by way, in case need similar in future, start recording macro, add comment, stop recording. resulting macro code should of way there.

public sub addcomment()    selection.comments.add range:=selection.range    selection     .typeparagraph      .typetext text:="test bold: bold text"     .moveleft unit:=wdcharacter, count:=9, extend:=wdextend     .font.bold = wdtoggle     .endkey unit:=wdline     .font.bold = wdtoggle      .typeparagraph      .typetext text:="test italic: italic text"     .moveleft unit:=wdcharacter, count:=11, extend:=wdextend     .font.italic = wdtoggle     .endkey unit:=wdline     .font.italic = wdtoggle      .typeparagraph      .typetext text:="test bold italic: bold italic text"     .moveleft unit:=wdcharacter, count:=16, extend:=wdextend     .font.bold = wdtoggle     .font.italic = wdtoggle     .endkey unit:=wdline     .font.italic = wdtoggle     .font.bold = wdtoggle      .typeparagraph      .typetext text:="test superscript: brandtm"     .moveleft unit:=wdcharacter, count:=2, extend:=wdextend     .font.superscript = true     .endkey unit:=wdline     .font.superscript = false      .typeparagraph      .typetext text:="test subscript: h20"     .moveleft unit:=wdcharacter, count:=1     .moveleft unit:=wdcharacter, count:=1, extend:=wdextend     .font.subscript = true     .endkey unit:=wdline     .font.subscript = false   end  end sub

-

Comments

Post a Comment

Popular posts from this blog

amazon web services - S3 Pre-signed POST validate file type? -

i know it's possible put limit on file size content-length-range header. possible validate file type? https://docs.aws.amazon.com/amazons3/latest/dev/httppostforms.html#policyconditions i see there content-type header, if set say, audio/mp3 allow mp3 files , return error if file not mp3? i found previous question answers mention validating file size: s3 direct upload restricting file size , type you can specify content-type @ post request. you can specify @ signature, post must done content-type: { "expiration": "2007-12-01t12:00:00.000z", "conditions": [ {"acl": "public-read" }, {"bucket": "johnsmith" }, {"content-type: "audio/mp3"} ] } creating html form (using aws signature version 4) edit: @ previous question found, checking content-type.
Read more

c# - Check Keyboard Input Winforms -

i wondering if instead of doing this protected override void onkeydown(keyeventargs e) { if (e.keycode == keys.a) console.writeline("the key down."); } i set bool method , this: if(keydown(keys.a)) // whatever here i've been sitting here ages trying figure out how it. can't wrap head around it. in case wondering, plan call bool inside different method, check input. since want perform action after pressing key, using keydown event enough. but in cases suppose want check if specific key down in middle of process, can use getkeystate method way: [dllimport("user32.dll", charset = charset.auto, exactspelling = true)] public static extern short getkeystate(int keycode); public const int key_pressed = 0x8000; public static bool iskeydown(keys key) { return convert.toboolean(getkeystate((int)key) & key_pressed); } you should know, each time check key state using example iskeydown(keys.a) method returns true if ke...
Read more