не работает функция очистка - Microsoft Office Excel

Akmal-Sharipov · 06.03.2022, 12:28

Здравствуйте уважаемые программисты. Высылаю макрос с небольшим вопросом. Данный макрос работал исправно в эксель 2007. Но на эксель 2019 работает не полностью. сам не разобрался. Функция очистки картинки не работает. Функция поиска и вставки картинки работает. Получается так, что картинка на картинке. Просмотрите пожалуйста. Файл прикрепил

Igor1961 · 07.03.2022, 16:12

У меня 2007 (и Win и Office). Проблема у меня тоже воспроизводится.
Но:
Если в макросе "Main" после ссылки на "Очистка" поставить Exit Sub, запустить макрос "Main", а потом вернуть все на место, проблема исчезает. Почему - ХЗ...

Akmal-Sharipov · 07.03.2022, 16:33

У меня не так. Все равно не работает. оставляет мусор, не очищает.

doober · 08.03.2022, 19:01

Так будет работать

Код:

     If sha.Type = msoPicture Or sha.Type = msoLinkedPicture Then
            sha.Delete
     End If

Akmal-Sharipov · 10.03.2022, 09:30

Прекрасно работает. Спасибо вам.

08.03.2022, 19:01	#4
doober Старожил Регистрация: 02.05.2009 Сообщений: 3,907	Так будет работать Код: `If sha.Type = msoPicture Or sha.Type = msoLinkedPicture Then sha.Delete End If` Анализ,обработка данных Недорого

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Калькулятор с# не работает очистка	Мария19043	C# (си шарп)	1	30.11.2020 12:49
Функция не работает	Gro-m	Python	11	15.02.2019 12:28
Не работает функция	awashwinter	Общие вопросы C/C++	0	13.03.2016 13:57
Sendmail работает, функция mail() работает, но есть проблема.	PavelNAndreev	PHP	8	27.01.2014 12:45

07.03.2022, 16:12	#2
Igor1961 Пользователь Регистрация: 05.10.2015 Сообщений: 39	У меня 2007 (и Win и Office). Проблема у меня тоже воспроизводится. Но: Если в макросе "Main" после ссылки на "Очистка" поставить Exit Sub, запустить макрос "Main", а потом вернуть все на место, проблема исчезает. Почему - ХЗ...

07.03.2022, 16:33	#3
Akmal-Sharipov Пользователь Регистрация: 18.11.2010 Сообщений: 30	У меня не так. Все равно не работает. оставляет мусор, не очищает.

10.03.2022, 09:30	#5
Akmal-Sharipov Пользователь Регистрация: 18.11.2010 Сообщений: 30	Прекрасно работает. Спасибо вам.