Поиск
Автор: Лидия Кунакова. Здравствуйте! При написании кода инициализции формы возникают ошибки 13 и 9.
Нужно вывести значения из области ячеек (е7:е28) листа (название листа указано в текстбоксе 7) в комбобоксе.
Файл не пропускает система безопасности, поэтому могу приложить только макрос.
Помогите, пожалуйста, а то не нашла на просторах интернета, все что более менее можно использовать пробовала, меняла типы данных, но что то никак, думаю что причина в VLookup.
Private Sub UserForm_Initialize() ...
Изменен: 20.10.2022
Читать сообщение на форуме или сайте.Автор: DNail. Есть столбец с маркой оборудования, есть столбец с моделями этого оборудования, есть столбец с количеством и столбец с серией оборудования. Нужно осуществить поиск по марке и моделе оборудования с получением результата по количеству и серии. Используя при этом TextBox/ComboBox. Пример ниже
Изменен: 20.01.2022
Читать сообщение на форуме или сайте. ... решить проблему с разблокировкой проекта VBA в Excel 2010. А теперь ... .SendKeys "~", True
VBProj.VBE.SelectedVBComponent.Activate
End Sub
И ... скрыть все меню во вкладке VBA:
Private Sub UserInterfaceVBE()
Dim iCommandBar ...
For Each iCommandBar In Application.VBE.CommandBars
iCommandBar.Enabled = False
Next ...
For Each iWindow In Application.VBE.Windows
iWindow.Visible = False ' iWindow ...
Изменен: 17.08.2019
Читать сообщение на форуме или сайте.Автор: Kompas13. Суть проблемы:
Есть макрос который обрабатывает данные, при этом он создаёт таблицу с определённым именем(Таблица1) и к ней обращается, производит действия и манипуляции с ней.
Когда все манипуляции закончены надо что бы он переименовывал её в то значение, которое находится в ячейке А1. (каждый раз там будет соврешенно другое название).
Делать это в ручную каждый раз - не айс.
Заранее благодарен.
Изменен: 06.03.2019
Читать сообщение на форуме или сайте. ... Sub
Мой первый опыт в vba, прошу сильно не орать..
1 ...
Изменен: 22.07.2016
Читать сообщение на форуме или сайте.Автор: Андрей Фетисов. Здравствуйте уважаемые форумчане,
Помогите, пожалуйста, дописать условие, если при переборе критериев для расширенного фильтра, данные есть, то тогда создавать лист:Sub Filter()
Worksheets.Add.Name = "раос_гп_291_4000" 'Создание нового листа
Worksheets("Ввод").Range("A5:O33").AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Worksheets("Лист1").Range("S13:V14"), _
CopyToRange:=Worksheets("раос_гп_291_4000 ...
Изменен: 13.05.2016
Читать сообщение на форуме или сайте.Автор: eldiyas. Добрый день.
С vba работаю не так давно и ...
Изменен: 13.04.2016
Читать сообщение на форуме или сайте.