<?xml version="1.0" encoding="utf-8"?>
<rss version="2.0" xmlns:atom="http://www.w3.org/2005/Atom">
	<channel>
		<title><![CDATA[Серый форум &mdash; VBA: Excel выполнение макроса в режиме редактирования ячейки]]></title>
		<link>https://forum.script-coding.com/viewtopic.php?id=16023</link>
		<atom:link href="https://forum.script-coding.com/extern.php?action=feed&amp;tid=16023&amp;type=rss" rel="self" type="application/rss+xml" />
		<description><![CDATA[Недавние сообщения в теме «VBA: Excel выполнение макроса в режиме редактирования ячейки».]]></description>
		<lastBuildDate>Thu, 20 Jan 2022 09:34:32 +0000</lastBuildDate>
		<generator>PunBB</generator>
		<item>
			<title><![CDATA[Re: VBA: Excel выполнение макроса в режиме редактирования ячейки]]></title>
			<link>https://forum.script-coding.com/viewtopic.php?pid=151691#p151691</link>
			<description><![CDATA[<p><strong>Dbeer</strong>, есть ощущение что пока не выйдешь из режима редактирования ячейки, макрос не запустится,<br />ищи другой подход к решению проблемы, например через событие Worksheet_Change, анализ измененной ячейки и т.д.<br />Еще посмотри вот это: http://novikov.gq/products/ribbonxmleditor/ribbonxmleditor.html</p>]]></description>
			<author><![CDATA[null@example.com (mikegti@yandex.ru)]]></author>
			<pubDate>Thu, 20 Jan 2022 09:34:32 +0000</pubDate>
			<guid>https://forum.script-coding.com/viewtopic.php?pid=151691#p151691</guid>
		</item>
		<item>
			<title><![CDATA[VBA: Excel выполнение макроса в режиме редактирования ячейки]]></title>
			<link>https://forum.script-coding.com/viewtopic.php?pid=145429#p145429</link>
			<description><![CDATA[<p>ПРиветствую, коллеги.<br />Программно дополняю контекстное меню<br /></p><div class="codebox"><pre><code>Set cb = CommandBars(&quot;Formula Bar&quot;)
...
Set cbb = cb.Controls.Add(Type:=msoControlButton, Parameter:=&quot;new&quot;, Before:=1, Temporary:=True)
    With cbb
        .Caption = &quot;Ля-ля-тополя&quot;
        .Tag = &quot;CG_GetDate&quot;
        .Style = msoButtonCaption
        .TooltipText = &quot;Ясен-пень&quot;
        .OnAction = &quot;MySub&quot;
    End With</code></pre></div><p>На листе в ячейке делаю <strong>DoubleClick</strong>.<br />Встаю курсором в нужное место и жму <strong>RightClick</strong><br />В выпавшем меню жму пункт <strong>&quot;Ля-ля-тополя&quot;</strong><br />Жду, что выполнится макрос <strong>&quot;MySub&quot;</strong><br />(В нем хочу дополнить содержимое ячейки, используя&nbsp; Application.SendKeys. Но это, полагаю<br />другая тема.<br />Засада в том, что всё заканчивается молча - <strong>MySub</strong> не отрабатывает (ставлю BreackPoint)<br />Увы...<br />Как жить дальше?<br />Подскажите, чем можите.. <img src="//forum.script-coding.com/img/smilies/smile.png" width="15" height="15" />))</p>]]></description>
			<author><![CDATA[null@example.com (Dbeer)]]></author>
			<pubDate>Mon, 25 Jan 2021 13:40:26 +0000</pubDate>
			<guid>https://forum.script-coding.com/viewtopic.php?pid=145429#p145429</guid>
		</item>
	</channel>
</rss>
