Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Hello,
I need to write data and symbols in a Word document, without any Reference to Microsoft Word 11.0 because another application is disturbed by such a reference. So I tried the folowing macro, but the wdAlignParagraphCenter and .Color = wdColorRed don't work until I reset the reference. What can I do ? Thanks for your help. Gérard Public Sub CALL_WORD() Dim wrdApp As Object Dim wrdDoc As Object Dim MyTable4 As Object Set wrdApp = CreateObject("Word.Application") wrdApp.Visible = True Set wrdDoc = wrdApp.Documents.Open(FileName:="D:\Mes documents\Pilotage\Fiche Pilotage 3 WPs V2.doc") Set MyTable4 = wrdDoc.Tables(4) MyTable4.Cell(Row:=4, Column:=11).Range.Text = Chr(236) 'Chr(236) 'Flèche ascendante MyTable4.Cell(Row:=4, Column:=11).Range.Select wrdDoc.Application.Selection.ParagraphFormat.Align ment = wdAlignParagraphCenter 'Doesn't work!!! With wrdDoc.Application.Selection.Font .Name = "Wingdings" .Size = 16 .Bold = True .Color = wdColorRed ''Doesn't work!!! End With wrdDoc.Close SaveChanges:=True wrdApp.Quit Set wrdApp = Nothing Set wrdDoc = Nothing End Sub |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
how i can write arabic numbers by microsoft excel word | Excel Discussion (Misc queries) | |||
How can I write a reference formula? | Excel Discussion (Misc queries) | |||
HOW PUT WORD-ART IN THE BACKGROUND AND WRITE OVER IT | Excel Worksheet Functions | |||
How do I write macros with relative reference cells | Excel Programming | |||
Looking for documentation/reference to write Excel Macro | Excel Programming |