-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
Hi Peter,
this will copy the outline numbering ... :-)
Dim i as Integer
Dim oSrcRules as Variant
Dim oDstRules as Variant
Dim oProps() as Variant
oSrcRules = oSrcDoc.getChapterNumberingRules()
oDstRules = oDstDoc.getChapterNumberingRules()
For i = 0 To oSrcRules.getCount()-1
oProps() = oSrcRules.getByIndex(i)
oDstRules.replaceByIndex(i, oProps())
Next i
HTH
Oliver
- --
GnuPG key 0xCFD04A45: 8822 057F 4956 46D3 352C 1A06 4E2C AB40 CFD0 4A45
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.5 (MingW32)
Comment: Using GnuPG with Mozilla - http://enigmail.mozdev.org
iD8DBQFFVLcUTiyrQM/QSkURAoRGAJwP/qhZZE+b4pcdfq8AycYu+2SEawCdEy3z
UkVu/NP3H46ScG3KKTqhaHw=
=Y3v9
-----END PGP SIGNATURE-----
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
