#1
|
|||
|
|||
How do I output special character to a specific cell (x,y)?
How do I output a special character to a specific cell(x,y) ?
For example, I am trying to use something like : Selection.InsertSymbol Font:="Times New Roman", CharacterNumber:=9632, _ Unicode:=True for a specific cell, but I can't get the line correct. Thanks (again, today) ! |
#2
|
|||
|
|||
Code:
Sub Macro1() Selection.Tables(1).Cell(2, 3).Select Selection.Collapse wdCollapseStart Selection.InsertSymbol Font:="Wingdings", CharacterNumber:=-4022, Unicode:=True Selection.InsertSymbol Font:="Times New Roman", CharacterNumber:=9632, Unicode:=True 'or Dim oRng As Word.Range Set oRng = Selection.Tables(1).Cell(1, 3).Range oRng.Collapse wdCollapseStart With oRng .Text = ChrW(&H25A0) .Font.Name = "Times New Roman" End With End Sub |
#3
|
|||
|
|||
This is great. Thanks again for your help.
|
Thread Tools | |
Display Modes | |
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
How do I output text to a specific cell (x,y)? | norwood | Word VBA | 2 | 01-31-2014 08:43 AM |
Display a label character in a data cell | markg2 | Excel | 9 | 09-07-2013 05:56 AM |
Print attachment when it arrive in specific folder with specific subject | visha_1984 | Outlook | 1 | 01-30-2013 10:42 AM |
Point to a specific cell | ericerler | Mail Merge | 1 | 08-11-2011 05:31 AM |
Insert an item to excel specific cell | apjneeraj | Excel | 0 | 01-18-2011 03:39 AM |