C#如何設(shè)置Word頁腳？

劉蘇

Word頁腳設(shè)置是個比較頭疼的問題

在Word中錄制宏難以產(chǎn)生代碼，即使產(chǎn)生代碼都不能直接執(zhí)行，要轉(zhuǎn)化成C#有點困難



需求：
奇偶頁不同

奇數(shù)頁  右對齊  微軟雅黑  四號字體     格式：  - 1 -

偶數(shù)頁  左對齊  微軟雅黑  四號字體     格式： - 2 -

MSDN參考資料
https://msdn.microsoft.com/zh-cn/library/ms178795.aspx?cs-save-lang=1&cs-lang=csharp

望幫助��！

tmtony

Word還真沒弄過，
你所說的 左對齊，右對齊 是針對此頁所有內(nèi)容，還是只是頁碼

劉蘇

tmtony 發(fā)表于 2016-4-9 07:59
Word還真沒弄過，
你所說的 左對齊，右對齊 是針對此頁所有內(nèi)容，還是只是頁碼

頁碼
來自: 微社區(qū)

tmtony

int OddAndEvenPagesHeaderFooter {get; set;}
應(yīng)該是整型
bool OddAndEvenPagesHeaderFooter { get; set; }
邏輯型
設(shè)置為-1 或 0 即可

[img]file:///D:\Users\tmtony\AppData\Local\Temp\8LDO48C$8@[GWU0353$FOVS.png[/img]https://msdn.microsoft.com/zh-cn/library/office/microsoft.office.interop.excel.pagesetup.oddandevenpagesheaderfooter.aspx
或 System.Boolean.  可出來值

暈 ，excel 和word 好像不同
excel是boolean
word是 int
[img]file:///D:\Users\tmtony\AppData\Roaming\Tencent\Users\18449932\QQ\WinTemp\RichOle\PZO[~UQVVZ1[Z%DCWF%H9}B.png[/img]

word你就用 int型
file:///D:\Users\tmtony\AppData\Roaming\Tencent\Users\18449932\QQ\WinTemp\RichOle\)EDTBF1%KCT8QCUVR5LBESP.png
可以為3種值
Can be True, False, or wdUndefined.
  
true 就是 -1
false 就是 0

實際上還是邏輯值，只是因為word還有個 wdUndefined
所以 要用 int
你填 1  或 -1 值
看看哪個可以
不行，再用int.parse
app.ActiveDocument.PageSetup.OddAndEvenPagesHeaderFooter = int.Parse("-1");

劉蘇

tmtony 發(fā)表于 2016-4-9 12:13
int OddAndEvenPagesHeaderFooter {get; set;}
應(yīng)該是整型
bool OddAndEvenPagesHeaderFooter { get; set ...

謝謝王站指導(dǎo)

頁碼設(shè)置的需求麻煩王站再幫忙看一下

Word錄制宏有限制，有一些操作沒法錄制，弄起來也是蠻糾結(jié)的，加上英語不好
奇數(shù)頁  右對齊  微軟雅黑  四號字體     格式： - 1 -
偶數(shù)頁  左對齊  微軟雅黑  四號字體     格式： - 2 -

tmtony

你是說 設(shè)置 字體？
你把屬性貼出來

聞啟學(xué)

Sub test()
    Application.ScreenUpdating = False
    With ActiveDocument.Sections(1)
        .PageSetup.OddAndEvenPagesHeaderFooter = True
        With .Footers(wdHeaderFooterPrimary)
            With .PageNumbers
                .Add PageNumberAlignment:=wdAlignPageNumberRight
                .NumberStyle = wdPageNumberStyleNumberInDash
            End With
            With .Range.Frames(1)
                .HorizontalPosition = wdFrameRight
                With .Range.ParagraphFormat
                    .Alignment = wdAlignParagraphRight
                    .CharacterUnitRightIndent = 1
                End With
            End With
        End With
        With .Footers(wdHeaderFooterEvenPages).Range.Frames(1)
            .HorizontalPosition = wdFrameLeft
            With .Range.ParagraphFormat
                .Alignment = wdAlignParagraphLeft
                .CharacterUnitLeftIndent = 1
            End With
        End With
    End With
    Application.ScreenUpdating = True
End Sub

在網(wǎng)上找到VBA 代碼

劉蘇

聞啟學(xué) 發(fā)表于 2016-4-9 22:47
Sub test()
    Application.ScreenUpdating = False
    With ActiveDocument.Sections(1)

謝謝····

劉蘇

C#代碼 糾結(jié)了一天多，終于搞定了，感謝 @只為設(shè)計 全程指導(dǎo)

1.             //關(guān)閉屏幕更新
   
2.             app.ScreenUpdating = false;
   
3. 
   
4.             //設(shè)置奇數(shù)頁頁腳
   
5.             word.HeaderFooter secFooter = app.ActiveDocument.Sections[1].Footers[word.WdHeaderFooterIndex.wdHeaderFooterPrimary];
   
6.             secFooter.PageNumbers.Add(PageNumberAlignment:word.WdPageNumberAlignment.wdAlignPageNumberInside);
   
7.             secFooter.PageNumbers.NumberStyle = word.WdPageNumberStyle.wdPageNumberStyleNumberInDash;
   
8.             secFooter.Range.Font.Name = "方正仿宋_GBK";
   
9.             secFooter.Range.Font.Size = int.Parse("14");
   
10.             
    
11.             //設(shè)置奇偶頁不同
    
12.             app.ActiveDocument.PageSetup.OddAndEvenPagesHeaderFooter = int.Parse("-1");
    
13. 
    
14.             //設(shè)置偶數(shù)頁頁腳
    
15.             word.HeaderFooter secEven = app.ActiveDocument.Sections[1].Footers[word.WdHeaderFooterIndex.wdHeaderFooterEvenPages];
    
16.             secEven.PageNumbers.Add(PageNumberAlignment: word.WdPageNumberAlignment.wdAlignPageNumberOutside);
    
17.             secEven.PageNumbers.NumberStyle = word.WdPageNumberStyle.wdPageNumberStyleNumberInDash;
    
18.             secEven.Range.Font.Name = "方正仿宋_GBK";
    
19.             secEven.Range.Font.Size = int.Parse("14");
    
20. 
    
21.             //清除奇數(shù)頁頁眉橫線
    
22.             app.ActiveWindow.ActivePane.View.SeekView = word.WdSeekView.wdSeekPrimaryHeader;
    
23.             app.Selection.ClearFormatting();
    
24. 
    
25.             //清除偶數(shù)頁頁眉橫線
    
26.             app.ActiveWindow.ActivePane.View.SeekView = word.WdSeekView.wdSeekEvenPagesHeader;
    
27.             app.Selection.ClearFormatting();
    
28. 
    
29.             //退出頁眉視圖
    
30.             app.ActiveWindow.ActivePane.View.SeekView = word.WdSeekView.wdSeekMainDocument;
    
31. 
    
32.             //啟用屏幕更新
    
33.             app.ScreenUpdating = true;

復(fù)制代碼

tmtony

強！