개발/기타

[VBA] Word 목차 만들기 & 업데이트

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455Sub InsTOC()On Error GoTo ErrHandler Selection.TypeText "Contents" Selection.Style = ActiveDocument.Styles("Summary") ActiveDocument.Styles("목차 1").Font = ActiveDocument.Styles("목차_대제목").Font ActiveDocument.Styles("목차 1").ParagraphFormat = ActiveDocument.Styles("목차_대제목").ParagraphFormat ActiveDoc..

2019. 1. 16. 20:08

개발/기타

[VBA]Word CustomDocumentProperties 추가

12345678910111213141516171819202122232425262728293031323334'=========================================================================' 커스텀 속성 : sFieldName 있으면 업데이트, 없으면 추가'-------------------------------------------------------------------------Sub CustomFields_Update(sFieldName As String, s_Value As String) Dim doc_properies As Office.DocumentProperties Set doc_properies = Application.ActiveDoc..

2019. 1. 16. 20:06