open System.Runtime.InteropServices open Microsoft.Office.Interop
let app = Marshal.GetActiveObject("Word.Application") :?> Word.Application let doc = app.ActiveDocument for section in doc.Sections do printfn "%A" section
open System.Runtime.InteropServices open Microsoft.Office.Interop
let app = Marshal.GetActiveObject("Word.Application") :?> Word.Application let doc = app.ActiveDocument for section in doc.Sections do printfn "%A" section