<?xml version="1.0" encoding="utf-8"?>
<rss version="2.0" xmlns:atom="http://www.w3.org/2005/Atom">
	<channel>
		<title><![CDATA[Серый форум &mdash; VBA Word. Selection в защищенной части документа]]></title>
		<link>http://forum.script-coding.com/viewtopic.php?id=16105</link>
		<atom:link href="http://forum.script-coding.com/extern.php?action=feed&amp;tid=16105&amp;type=rss" rel="self" type="application/rss+xml" />
		<description><![CDATA[Недавние сообщения в теме «VBA Word. Selection в защищенной части документа».]]></description>
		<lastBuildDate>Fri, 19 Feb 2021 08:06:28 +0000</lastBuildDate>
		<generator>PunBB</generator>
		<item>
			<title><![CDATA[VBA Word. Selection в защищенной части документа]]></title>
			<link>http://forum.script-coding.com/viewtopic.php?pid=146337#p146337</link>
			<description><![CDATA[<p>Уважаемые коллеги,<br />Как программно понять, что Selection находится в защищенной части документа.<br />Надо &quot;подрихтовать&quot; нежелательное форматирование для некоторых кусков текста.<br />Начало документа защищено от шаловливых ручек - заполняется программно.<br />&quot;прочесать&quot; надо весь документ, за исключением защищенных участков.<br />Делаю следующее</p><div class="codebox"><pre><code>    Selection.Collapse

	ActiveDocument.UndoClear

    Selection.HomeKey Unit:=wdStory
    Selection.Find.ClearFormatting
    With Selection.Find
...
        .Text = &quot;^p&quot;
...
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
    While Selection.Find.Execute = True
    On Error GoTo Conti
...
        Selection.Font.Bold = False
        Selection.Font.Size = 12
        Selection.MoveRight Unit:=wdCharacter, Count:=1  &#039;&#039;, Extend:=wdExtend
Conti:
    Wend</code></pre></div><p>Вставил <strong>On Error</strong> , он отрабатывает первый раз, а на следующем найденном фрагменте ломается (видимо, еще активен).<br />ВИжу два решения:<br />1. &quot;понимать, что найденный Selection в защищенной &quot;зоне&quot;<br />2. Как-то подружиться с&nbsp; <strong>On Error</strong><br />Оба варианта мне неведомы<br />Заранее благодарен.</p>]]></description>
			<author><![CDATA[null@example.com (Dbeer)]]></author>
			<pubDate>Fri, 19 Feb 2021 08:06:28 +0000</pubDate>
			<guid>http://forum.script-coding.com/viewtopic.php?pid=146337#p146337</guid>
		</item>
	</channel>
</rss>
