Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Удалить все рисунки (фигуры) в файле Экселя / 5 сообщений из 5, страница 1 из 1
01.11.2011, 11:39
    #37506444
Stepler
Stepler
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Удалить все рисунки (фигуры) в файле Экселя
Есть таблица в Экселе...
и в ней есть фигуры "AutoShape 3", причем много.
Фигуры БЕЗ заливки и границ, так что их не видно.
Если делаю вручную "Выбор объекта-Выделение по области листа-Удалить", то все формы удаляются, но:
-где гарантия, что енти фигуры НЕ присутствуют в других, отдаленных уголках листа...

Делаю
Код: plaintext
1.
2.
3.
Columns("A:Z").Select
    Selection.EntireColumn.Hidden = False
    ActiveSheet.Shapes("AutoShape 3").Select
      Selection.Delete


при запуске макроса ничего не происходит...
Подскажите, плз, как разом все енти фигуры удалить?
Спасибо

Stepler (щёлк-щёлк!!)

Код: plaintext
 P.S.Чтобы наступила смерть - необходима жизненная сила !!!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.11.2011, 11:54
    #37506474
kuklp
kuklp
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Удалить все рисунки (фигуры) в файле Экселя
Stepler,

Код: plaintext
1.
2.
Sub DeleteShapes1()    
    ActiveSheet.DrawingObjects.Delete
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.11.2011, 12:07
    #37506502
Serge 007
Serge 007
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Удалить все рисунки (фигуры) в файле Экселя
Steplerкак разом все енти фигуры удалить?
F5- Выделить - Объекты - Delete
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.11.2011, 12:28
    #37506567
Stepler
Stepler
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Удалить все рисунки (фигуры) в файле Экселя
Всем СПАСИБ большой, буду пробовать...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Период между сообщениями больше года.
02.12.2014, 17:31
    #38822865
Марина-МСК
Марина-МСК
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Удалить все рисунки (фигуры) в файле Экселя
Serge 007, спасибо, спасибо!!!
Шестилетняя война с экселем выиграна!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Удалить все рисунки (фигуры) в файле Экселя / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]