Study/VBA 테르미니 2014. 11. 1. 02:25
머리글&바닥글 삭제 Sub KillHeaderAndFooter() Dim objHF As HeaderFooter Dim objSection As Section For Each objSection In ActiveDocument.Sections For Each objHF In objSection.Headers objHF.Range.Delete Next objHF For Each objHF In objSection.Footers objHF.Range.Delete Next objHF Next objSection End Sub ------------ 응용해서 바닥글만 삭제 한다면 Sub KillFooter() Dim objHF As HeaderFooter Dim objSection As Section For E..
