Не могу удалить textbox в excel

Text Box. Delete Метод

Определение

Удаляет динамически созданный объект TextBox из рабочего листа, а затем удаляет его из коллекции ControlCollection. Deletes a dynamically created TextBox from the worksheet and removes it from the ControlCollection.

Возвращаемое значение

Примеры

Пример кода, демонстрирующий использование этого метода, см. в разделе Microsoft.Office.Tools.Excel.Controls.Button.Delete . For a code example that demonstrates how to use this method, see Microsoft.Office.Tools.Excel.Controls.Button.Delete. Все элементы управления в Microsoft.Office.Tools.Excel.Controls пространстве имен имеют функционально эквивалентный Delete метод. All controls in the Microsoft.Office.Tools.Excel.Controls namespace have a functionally equivalent Delete method.

Комментарии

Этот метод следует использовать только с TextBox , который создается программно во время выполнения. This method should only be used with a TextBox that is created programmatically at run time. Исключение возникает при вызове этого метода для объекта TextBox , который добавляется на лист во время разработки. An exception is thrown if you call this method on a TextBox that is added to the worksheet at design time.

Рисунок 2. Выбор чекбоксов

Вставив в Excel скопированную таблицу с сайта – расписание электричек, поездов, расписание уроков и тому подобное, зачастую видели различные элементы управления, которые засоряли таблицу (Рис.1). Избавиться от них очень хочется, но как это сделать быстро?

Рисунок 1. Лишние чекбоксы в таблице Excel

Рисунок 1. Лишние чекбоксы в таблице Excel

Для того, чтобы удалить «чекбоксы» (Рис.1) из таблицы Excel, нужно воспользоваться функцией «Выделить группу ячеек» из группы «Найти и выделить».

Рисунок 2. Выбор чекбоксов

Рисунок 2. Выбор чекбоксов

В открывшемся окне нужно выбрать пункт «Объекты» и нажать ОК.

Рисунок 3. Выбор чекбоксов и других объектов

Рисунок 3. Выбор чекбоксов и других объектов

После этого нужно нажать кнопку «Delete» на клавиатуре для удаления. Кнопка «Удалить» в риббоне будет неактивна!

Как удалить TextBox

Ldhimik

Дата: Четверг, 31.08.2017, 11:11 |
Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 44


Репутация:

0

±

Замечаний:
0% ±


Excel 2010

Не могу найти макрос для полного удаления TextBox
фаил выложить не могу размер большой из за TextBox

 

Ответить

iMrTidy

Дата: Четверг, 31.08.2017, 13:22 |
Сообщение № 2

Группа: Пользователи

Ранг: Участник

Сообщений: 85


Репутация:

14

±

Замечаний:
0% ±


NO

Ldhimik, что значит полного?
Если TextBox, создан через дизайнер, то кодом его не удалить, но можно скрыть. Если же элемент создан кодом, то удалить можно так:
[vba]

Код

Option Explicit

Private Sub UserForm_Click()

Dim i As Integer

i = 0
While i < Me.Controls.Count
    If Me.Controls(i).Name = «txtText» Then
        Me.Controls.Remove i
    End If
    i = i + 1
Wend

End Sub

[/vba]


Вышенаписанное мной не является истиной, но лишь моя точка зрения, которая скорее всего ошибочна.

Сообщение отредактировал iMrTidyЧетверг, 31.08.2017, 13:22

 

Ответить

Ldhimik

Дата: Четверг, 31.08.2017, 15:25 |
Сообщение № 3

Группа: Пользователи

Ранг: Новичок

Сообщений: 44


Репутация:

0

±

Замечаний:
0% ±


Excel 2010

Все нашел !!!
[vba]

Код

Sub DeleteAllTextBox()
Dim oSh As Shape
For Each oSh In ActiveSheet.Shapes
oSh.Delete
Next oSh
End Sub

[/vba]

 

Ответить

Ldhimik

Дата: Четверг, 31.08.2017, 15:26 |
Сообщение № 4

Группа: Пользователи

Ранг: Новичок

Сообщений: 44


Репутация:

0

±

Замечаний:
0% ±


Excel 2010

Тема закрыта

 

Ответить

AndreTM

Дата: Четверг, 31.08.2017, 17:13 |
Сообщение № 5

Группа: Друзья

Ранг: Старожил

Сообщений: 1762


Репутация:

498

±

Замечаний:
0% ±


2003 & 2010

Видимо, это были не совсем «натуральные текстбоксы»…

Хотя да, ActiveX’ы — они такие, лезут, понимаешь ли, в коллецию шейпов :)


Skype: andre.tm.007
Donate: Qiwi: 9517375010

Сообщение отредактировал AndreTMЧетверг, 31.08.2017, 17:36

 

Ответить

KuklP

Дата: Четверг, 31.08.2017, 17:25 |
Сообщение № 6

Группа: Проверенные

Ранг: Старожил

Сообщений: 2369


Репутация:

486

±

Замечаний:
0% ±


2003-2010

Почему? ActiveX TexBox удалится с листа таким макросом. Отож спешить не надо, iMrTidy :)

Цитата

3. Кратко, но ёмко опишите задачу в теле поста. ВСЕГДА прикладывайте файл-пример, кроме тех случаев, когда вопрос носит общий характер и не касается конкретно Вашего файла. Темы касающиеся конкретного файла, но без приложенного примера, будут закрываться или удаляться.


Ну с НДС и мы чего-то стoим! kuklp60@gmail.com
WM Z206653985942, R334086032478, U238399322728

 

Ответить

iMrTidy

Дата: Четверг, 31.08.2017, 21:08 |
Сообщение № 7

Группа: Пользователи

Ранг: Участник

Сообщений: 85


Репутация:

14

±

Замечаний:
0% ±


NO

KuklP, что сказать, рискнул с предположением, и риск не оправдался. С другой стороны, иногда складывается впечатление, что у людей все поисковые системы заблокированы, и вот только этот сайт и работает…


Вышенаписанное мной не является истиной, но лишь моя точка зрения, которая скорее всего ошибочна.

 

Ответить

K-SerJC

Дата: Пятница, 01.09.2017, 07:53 |
Сообщение № 8

Группа: Проверенные

Ранг: Обитатель

Сообщений: 487


Репутация:

86

±

Замечаний:
0% ±


Excel 2013

иногда складывается впечатление, что у людей все поисковые системы заблокированы

спросить и ждать ответ всегда легче, чем этот самый ответ искать самому…
почти народная мудрость :-)


Благими намерениями выстелена дорога в АД.

 

Ответить

Есть ли уловки для удаления нескольких текстовых полей в книге? Удаление каждого текстового поля по одному занимает много времени. На самом деле, есть несколько способов быстро удалить все текстовые поля:

  • Удалите все текстовые поля или другие объекты на активном листе с помощью функции Перейти
  • Удалите все текстовые поля на активном листе с кодом VBA
  • Удалите все текстовые поля на активном листе, выбранных листах или книге с помощью удобной функции

Удалите все текстовые поля или другие объекты на активном листе с помощью функции Перейти

1. Нажмите F5 or Ctrl + G для отображения Перейти к диалога, а затем нажмите Особый.., см. снимок экрана:

2. В выскочившем Перейти к специальному диалоговое окно, выберите Объекты, А затем нажмите OK кнопка, см. снимок экрана:

3. И все объекты на текущем листе были выбраны сразу, см. Снимок экрана:

4. Затем вам просто нужно нажать кнопку Удалить нажмите клавишу на клавиатуре, чтобы удалить все эти текстовые поля, а также другие объекты.

Внимание: Этот метод не только удалит все текстовые поля, но и удалит все виды фигур на активном листе, включая изображения, клипы, фигуры, SmartArt, диаграммы и т. Д.


Удалите все текстовые поля на активном листе с кодом VBA

Иногда вам может потребоваться удалить только текстовые поля, но оставшиеся другие формы, такие как диаграммы, изображения, макрос VBA будет хорошим выбором для удаления всех текстовых полей только на активном листе, выполните следующие действия:

1. Удерживайте ALT + F11 ключи, и он открывает Microsoft Visual Basic для приложений окно.

2. Нажмите Вставить > Модули, и вставьте следующий макрос в Модули окно.

Код VBA: удалить все текстовые поля с текущего рабочего листа:

Sub DeleteAllTextBoxes()
ActiveSheet.TextBoxes.Delete
End Sub

3, нажмите F5 ключ для запуска этого макроса, и удаляются только текстовые поля в текущем листе, см. снимки экрана:


Удалите все текстовые поля на активном листе, выбранных листах или книге с помощью удобной функции

Kutools for Excel‘s Удалить иллюстрации и объекты может помочь вам удалить только текстовые поля на активном листе, выбранных листах или всей книге, не затрагивая другие фигуры.

Примечание:Чтобы применить это Удалить иллюстрации и объекты, во-первых, вы должны скачать Kutools for Excel, а затем быстро и легко примените эту функцию.

После установки Kutools for Excel, пожалуйста, сделайте так:

1, Нажмите Кутулс > УдалитьУдалить иллюстрации и объекты, см. снимок экрана:

2. В Удалить иллюстрации и объекты диалоговое окно, проверьте Текстовые поля вариант, а затем укажите область, из которой вы хотите удалить текстовые поля, см. снимок экрана:

3, Затем нажмите OK. И все текстовые поля будут удалены сразу на активном листе, выбранных листах или всей книге в соответствии с выбранными вами параметрами.

Tips: Kutools for Excel‘s Иллюстрации и объекты функция может помочь нам удалить все диаграммы, линии, изображения, автофигуры, умные рисунки, текстовые поля, связанные объекты OLE и встроенные объекты OLE на активном листе, выбранном листе или на всех листах текущей книги по мере необходимости.  Нажмите, чтобы узнать больше…


Больше относительных статей:

  • Удалить все изображения или другие объекты в Excel
  • Если вы хотите удалить все изображения из Microsoft Excel, выбор каждого изображения и удаление их по одному может занять много времени. Следующие приемы могут облегчить вам работу по удалению всех изображений.
  • Удалить все изображения в диапазоне ячеек
  • Если на вашем листе есть несколько изображений, теперь вы хотите удалить некоторые из них в указанном диапазоне, как вы быстро с этим справитесь?
  • Удалить все скрытые строки или столбцы в Excel
  • Если у вас есть большая книга с большим количеством скрытых строк и столбцов, и теперь скрытые данные недоступны, вы хотите удалить их все. Как можно было их быстро удалить?
  • Быстрое удаление нескольких пустых столбцов в Excel
  • Иногда, когда вы импортируете данные в Microsoft Excel из какого-либо источника, такого как веб-страница, CSV, текст и т. Д., С ними может быть много пустых столбцов. Удаление каждого пустого столбца по одному должно занимать много времени. Поэтому некоторые из нас ищут простые способы решения этой проблемы. В этой статье собраны несколько хитрых советов, которые помогут вам быстро удалить несколько пустых столбцов.

Лучшие инструменты для работы в офисе

Kutools for Excel Решит большинство ваших проблем и повысит вашу производительность на 80%

  • Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма …
  • Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон
  • Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы… Предотвращение дублирования ячеек; Сравнить диапазоны
  • Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор …
  • Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое …
  • Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии
  • Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом …
  • Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF
  • Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.

вкладка kte 201905


Вкладка Office: интерфейс с вкладками в Office и упрощение работы

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!

офисный дно

На работе один из сотрудников выполняет дефектовку, и присылает девочкам в сметно-договорном отделе файл Excel с это дефектовкой. Зовут меня девочки как-то раз и показывают этот файл… Таблица на 1 лист формата А4, а весит — 50 мегабайт!!!

Файлы чуть меньшего размера им этот сотрудник слал и раньше, а в этот раз файл не пролез в почту, и сотрудник отправил его через облако, тут, как говорится, терпение и лопнуло.

Открыв файл я немного подофигел. Внутри в одном из столбцов практически в каждой ячейке помимо самого текста были вставлены и элементы формы — textbox.

И ничего бы страшного, но выделив один из этих элементов я увидел что его порядковый номер 3762… Теперь стало понятно откуда растут уши у размера файла. В этом файле были тысячи textbox. Вручную удалять весь этот срач — мартышкин труд. Поэтому я немного потеребил VBA и сообразил макрос.

Sub DeleteAllTextboxies()

  Dim i As Long

  With ActiveSheet.Shapes
    For i = .Count To 1 Step -1

      If .Item(i).Type = msoTextBox Then 
        .Item(i).Delete
      End If

    Next i
  End With

End Sub

Создаем модуль, вставляем туда код, запускаем, ждем пока вс обработается, проверяем что все почистилось, удаляем модуль. На этом и всё 🙂 Не забываем сохранить почищенный файл.

ЗЫ — скрипты в MSO — зло. Так же как и формы. Ужасно-костыльное решение с приветом из 90-х.
Поделиться ссылкой:

You can add, copy, or delete text boxes in your Microsoft Office applications. A text box lets you add text anywhere in your file. For example, you can create pull quotes or sidebars that call attention to important information. For Word, see Add, copy, or remove a text box in Word.

Add a text box

To learn how to add a text box, select an application from the drop-down list.

  1. On the Insert tab, in the Text group, click Text Box.

    Text Box button in the Text group

  2. In the worksheet, click and drag to draw the text box the size that you want.

  3. To add text, click inside the box and type or paste your text.

    Notes: 

    • To format text in the text box, select the text, and then use the formatting options in the Font group on the Home tab.

      Options in the Font group

    • To position the text box, click it, and then when the pointer becomes crossed arrows (Four-headed arrow), drag the text box to a new location.

    • You can also change or remove a border from a text box or shape.

Top of page

  1. Click in the body of an open email message.

  2. On the Insert tab, in the Text group, click Text Box, and then click Draw Text Box.

    Text Box menu in the Text group

  3. Click and drag in the message body to draw a text box the size that you want.

  4. To add text, click inside the box and type or paste your text.

    Notes: 

    • To format text in the text box, select the text, and then use the formatting options in the Basic Text group on the Message tab.

      Options in the Basic Text group

    • To position the text box, click it, and then when the pointer becomes a Four-headed arrow, drag the text box to a new location.

    • To control how text wraps around the box, click Layout Options Layout Options button, and then select an option from the list.

      Text box layout options

    • You can also change or remove a border from a text box or shape.

Top of page

  1. On the Insert tab, in the Text group, click Text Box.

    Text Box button in the Text group

  2. Click in the presentation, and then drag to draw the text box the size that you want.

  3. To add text, click inside the box and type or your paste text.

If you aren’t using a mouse

  1. Press Alt+N to go to the Insert tab.

  2. Use the arrow keys to move to the Text Box button.

  3. Press Ctrl+Enter to add the text box to your slide, then type your text.

    Notes: 

    • To format text in the text box, select the text, and then use the formatting options in the Font group on the Home tab.

      Options in the Font group

    • To position the text box, click it, and then when the pointer becomes a Four-headed arrow, drag the text box to a new location.

    • You can also change or remove a border from a text box or shape.

Top of page

  1. In a project with a Gantt chart, click the Format tab and click Drawing.

  2. Click Text Box, and then drag in the Gantt chart to draw the text box to the size you want.

  3. To add text, click inside the box and type or paste your text.

    Notes: 

    • To format text in the text box, select the text, click the Task tab, and use the formatting options in the Font group.

    • You can also change or remove a border from a text box or shape.

Copy a text box

  1. Click the border of the text box that you want to copy.

  2. Press Ctrl+C.

    Note: Make sure the pointer is on the border of the text box, not inside it. If the pointer is inside, pressing Ctrl+C will copy the text, not the text box.

  3. Select a location and press Ctrl+V to paste the text box.

Delete a text box

  • Click the border of the text box that you want to delete, and then press Delete.

    Note: Make sure the pointer is on the border of the text box and not inside it. If the pointer is inside the box, pressing Delete will delete the text inside the text box, not the box.

Add a text box

To learn how to add a text box, select an application from the drop-down list.

  1. On the Insert tab, in the Text group, click Text Box.

    The Text group on the Insert tab in the Excel 2010 ribbon.

  2. Click in the worksheet, and then drag to draw the text box the size that you want.

  3. To add text to a text box, click inside the text box, and then type or paste text.

    Notes: 

    • To format text in the text box, select the text, and then use the formatting options in the Font group on the Home tab.

      The Font group on the Home tab in the Excel 2010 ribbon.

    • To position the text box, click it, and then when the pointer becomes a Four-headed arrow, drag the text box to a new location.

    • You can also change or remove a text box or shape border.

Top of page

  1. Click in the body of an open email message.

  2. On the Insert tab, in the Text group, click Text Box, and then click Draw Text Box.

    Text Box menu in the Text group

  3. Click and drag in the message body to draw a text box the size that you want.

  4. To add text, click inside the box and type or paste your text.

    Notes: 

    • To format text in the text box, select the text, and then use the formatting options in the Basic Text group on the Message tab.

      Options in the Basic Text group

    • To position the text box, click it, and then when the pointer becomes a Four-headed arrow, drag the text box to a new location.

    • To control how text wraps around the box, click Layout Options Layout Options button, and then select an option from the list.

      Text box layout options

    • You can also change or remove a border from a text box or shape.

Top of page

  1. On the Insert tab, in the Text group, click Text Box.

    The Text group on the Insert tab in the PowerPoint 2010 ribbon.

  2. Click in the presentation, and then drag to draw the text box the size that you want.

  3. To add text to a text box, click inside the text box, and then type or paste text.

    Notes: 

    • To format text in the text box, select the text, and then use the formatting options in the Font group on the Home tab.

      The Font group on the Home tab in the PowerPoint 2010 ribbon.

    • To position the text box, click it, and then when the pointer becomes a Four-headed arrow, drag the text box to a new location.

    • You can also change or remove a text box or shape border.

Top of page

Copy a text box

  1. Click the border of the text box that you want to copy.

  2. On the Home tab, in the Clipboard group, click Copy The Copy button..

    Make sure that the pointer is not inside the text box, but rather on the border of the text box. If the pointer is not on the border, pressing Copy will copy the text inside the text box and not the text box.

  3. On the Home tab, in the Clipboard group, click Paste.

    The Clipboard group on the Home tab.

Delete a text box

  • Click the border of the text box that you want to delete, and then press DELETE.

    Make sure that the pointer is not inside the text box, but rather on the border of the text box. If the pointer is not on the border, pressing DELETE will delete the text inside the text box and not the text box.

Add a text box

To learn how to add a text box, select an application from the drop-down list.

  1. On the Insert tab, in the Text group, click Text Box.

    Excel Ribbon Image

  2. Click in the worksheet, and then drag to draw the text box the size that you want.

  3. To add text to a text box, click inside the text box, and then type or paste text.

    Notes: 

    • To format text in the text box, use the formatting options in the Font group on the Home tab.

      Excel Ribbon Image

    • To position the text box, click it, and then when the pointer becomes a Four-headed arrow, drag the text box to a new location.

    • You can change or remove a border from a text box or shape or add a fill or effect to a shape or text box.

Top of page

  1. In an e-mail message, on the Insert tab, in the Text group, click Text Box, and then click Draw Text Box.

    Outlook Ribbon Image

  2. Click in the e-mail message, and then drag to draw the text box the size that you want.

  3. To add text to a text box, click inside the text box, and then type or paste text.

    Notes: 

    • To format text in the text box, use the formatting options in the Font group on the Format Text tab.

      Outlook Ribbon Image

    • To position the text box, click it, and then when the pointer becomes a Four-headed arrow, drag the text box to a new location.

    • You can change or remove a border from a text box or shape or add a fill or effect to a shape or text box.

    • If you have drawn multiple text boxes, you can link them together so that text will flow from one box to another. Click one of the text boxes and then under Text Box Tools, on the Format tab, in the Text group, click Create Link.

      Text Box Tools Format tab image

Top of page

  1. On the Insert tab, in the Text group, click Text Box.

    PowerPoint Ribbon Image

  2. Click in the presentation, and then drag to draw the text box the size that you want.

  3. To add text to a text box, click inside the text box, and then type or paste text.

    Notes: 

    • To format text in the text box, use the formatting options in the Font group on the Home tab.

      PowerPoint Ribbon Image

    • To position the text box, click it, and then when the pointer becomes a Four-headed arrow, drag the text box to a new location.

    • You can change or remove a border from a text box or shape or add a fill or effect to a shape or text box.

Top of page

Copy a text box

  1. Click the border of the text box that you want to copy.

  2. Right-click and select Copy from the menu.

    Make sure that the pointer is not inside the text box, but rather on the border of the text box. If the pointer is not on the border, pressing Copy will copy the text inside the text box and not the text box.

  3. Place your cursor where you want the copied text box to be, right-click, and then click Paste.

    The Clipboard group on the Home tab.

Delete a text box

  • Click the border of the text box that you want to delete, and then press DELETE.

    Make sure that the pointer is not inside the text box, but rather on the border of the text box. If the pointer is not on the border, pressing DELETE will delete the text inside the text box and not the text box.

  • To delete multiple check boxes at the same time, hold down CTRL, and click the border of each text box in turn, and then press DELETE.

  • To delete a text box but save the text inside it, select the text inside the text box, and then press CTRL+C to copy the text onto the clipboard before you delete the text box.

Понравилась статья? Поделить с друзьями:
  • Не могу удалить microsoft word 2007
  • Не могу увеличить высоту строки в excel
  • Не могу убрать цвет ячейки в excel
  • Не могу убрать цвет заливки в excel
  • Не могу убрать цвет выделения текста в word