Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
VBA Изменения в файле Господа прошу помощи. Думаю для тех кто "шарит" это не составит труда. Просто вижуал бейсик знаю довольно поверхностно, тем более в конкретном случае. Есть файлик во вложении, в нем простая табличка. Мне нужен макрос который будет при открытии файла выводить окошко скажем msgbox с надписью о том напротив какой фамилии были последние изменения и следующую за ней фамилию например: msgbox... https://www.cyberforum.ru/ vba/ thread1439332.html VBA Пошаговое копирование текста из массива
Добрый день. Подскажите,пожалуйста, по такому вопросу: есть массив данных на одном листе ( a1:g6), который нужно скопировать на другой лист в последнюю свободную ячейку начиная с колонки б, а в колонку А вставить сегодняшнюю дату и перед этим отфильтровать массив в автофильтре (по опред. значению) и вставить формулу в колонку Н. Sub CopyToD() With Worksheets("sheet2") ...
VBA Создание презентации из графических файлов https://www.cyberforum.ru/ vba/ thread1439283.html
Всем привет! Есть файлы jpg по 10 шт в папке, нужно создать презентацию из этих файлов, так что бы слайды вверху назывались именем папки, а файлы картинок располагались по 4 шт. на каждом слайде. Тоесть с одной папки должно выйти два слайда, в первом будет 4 картинки, а в остальных двух по 3. И вверху этий слайдов должно быть название папки. Кто то может подсказать?
VBA Создание книги по нажатию гиперссылки https://www.cyberforum.ru/ vba/ thread1439263.html
Добрый день. Подскажите возможно ли создавать такую гиперссылку что при переходе по ней, создавалась книга, и происходили некие действия записанные в отдельной функции. В частности открытие другой книги копирование из нее листа в созданную книгу, но это я знаю как сделать. Меня интересует как создать такую гиперссылку.
VBA Перенос данных excel -excel на разные листы
Доброго времени суток. Возникла небольшая проблема: Переношу данные из книги в книгу, но в каждой книге по 3 листа, а данные переносятся только в тот лист в котором задействован макрос или нажата кнопа. Дак вот, сам вопрос: что дописать, что бы не приходилось использовать 3 кнопки или прожимать 3 макроса, а сделать выбор листа в самом коде? 'строка на которую грешу... Cells(i, 2) =...
VBA Сабклассинг. Общее Popup меню для всех форм проекта https://www.cyberforum.ru/ vba/ thread1439161.html
Возможно ли создать своё Popup меню, общее для всех TextBox'ов проекта, находящихся на разных формах? В пределах одной формы я умею это делать. Хотелось бы универсальный класс, чтобы можно было его юзать в любых формах. Или проще свой ActiveX написать? :)
VBA Как и куда сохранить текст из текстового поля https://www.cyberforum.ru/ vba/ thread1439135.html
Добрый день! Подскажите как сделать. Есть текстовое поле с текстом по умолчанию. Нужно, чтобы при изменении этого поля введенный новый текст по нажатию кнопки становился текстом по умолчанию одним словом сохранялся.
Построение графиков по точкам средствами Excel VBA
Есть задача построить график по двум колонкам Excel файла (в моем случае они задаются программно). Строится график с маркерами. Нужно чтобы отображалась зависимость значений одной колонки (ось х соответственно) от другой (ось у). при попытке построения программа выдает не один график, а два. Sub Main() Dim XL1 = New Application XL1.Visible = True Dim t =...
VBA Как экспортировать картинки (все или самую большую), если "anchor" у них попадает на одну и ту же ячейку? Есть скрипт (см. вложение) Tips_Macro_Save_Object_As_Picture.xls - он бодро сохраняет все картинки из excel-файла и даже с названием ячейки, все круто, проблема в том, что в файле встречаются картинки, которые своим свойством oObj.TopLeftCell.Address находятся на одной и той же ячейке. Вопрос - как бы их все-таки вытягивать все, напр. прибавляя к ним какой-то номерной индекс, а еще лучше по... https://www.cyberforum.ru/ vba/ thread1438798.html VBA Слияние таблиц Дано 2 таблицы c одинаковым идентификатором, нужно объединить их в одну. Проблема в том, что в одной таблице 1 идентификатору соответствует одна строка, а во второй таблице на 1 идентификатор можно приходиться 30-50 строк. Пример во вложении, на Sheet1 исходные данные, на Sheet2 - что нужно получить. Также в приведенном примере указано небольшое количество данных, на самом же деле в одной... https://www.cyberforum.ru/ vba/ thread1438752.html
VBA Нужно перевести с паскаля на VBA
uses crt; const n=2; var d1,d2,e,x,y,h1,h2,u1,u2:real; a:array of real; b:array of real; i,j,k:integer; function f1:real; begin f1:=((x*x)+(y*y)-5*x+1);
VBA Ошибка: Нельзя установить свойство ScrollRow класса Window https://www.cyberforum.ru/ vba/ thread1438601.html
Добрый день. Для повседневной обработки большого объема данных применяется простой макрос. Макрос отлично работает, но посередине процесса выскакивает ошибка Run-time error 1004: Нельзя установить свойство ScrollRow класса Window. Помогите, пожалуйста, понять в чем дело, и как устранить эту ошибку. Columns("G:H").Select Range("H1").Activate
3218 / 967 / 223
Регистрация: 29.05.2010
Сообщений: 2,086
06.05.2015, 18:32 0
Excel

Выделить ячейку с числом во втором столбце, если данное число есть также в первом столбце - VBA - Ответ 7578247

06.05.2015, 18:32. Показов 1661. Ответов 2
Метки (Все метки)

Лучший ответ Сообщение было отмечено North_Flame как решение

Решение

Пример бы для проверки.
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
Sub CompareColumn()
    Dim a(), i&
    a = ActiveSheet.UsedRange.Value
    With CreateObject("Scripting.Dictionary")
        For i = 1 To UBound(a, 1)
            .Item(a(i, 1)) = i
        Next
        For i = 1 To UBound(a, 1)
            If .exists(a(i, 2)) Then Cells(i, 2).Interior.Color = vbYellow
        Next
    End With
End Sub


Вернуться к обсуждению:
Выделить ячейку с числом во втором столбце, если данное число есть также в первом столбце VBA
1
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
06.05.2015, 18:32
Готовые ответы и решения:

В ячейке Е1 часть слова которую нужно найти и если есть то выделить эту ячейку со строкой в столбце С
Sub Поиск() ' Dim МестоПоиска As String Dim ЧтоИщем As String For i = 1 To 3 МестоПоиска =...

Как объединить ячейки во втором столбце при совпадении значений в первом столбце
Здравствуйте. Помогите плиз. В таблице есть повторяющиеся значения в первом столбце (код товара)...

По значению в первом столбце найти значение во втором столбце и перенести его на лист "Перечень" в столбец 11
Добрый день! Только начинаю изучение VBA, прошу помочь оптимизировать пример кода для случая:...

Как выделить цветом значения в столбце, которые содержатся в другом столбце другого листа
Как выделить цветом значения в столбце , которые содержатся в другом столбце другого листа ?

2
06.05.2015, 18:32
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
06.05.2015, 18:32
Помогаю со студенческими работами здесь

Очистить ячейку в столбце, если значение 0
Помогите. Есть столбец, протяженностью несколько тысяч строк. В нем попадается цифра 0. ...

Как найти в столбце А значение, если удовлетворяет критериям то в столбце Б пишем результат
Здравствуйте! Всем отличных выходных!!! Помогите, если не сложно. Большой Квадрат - ЕСЛИ...

Разработать алгоритм вычисления выражения,заданного в первом столбце,введя функцию пользователя, описанную во втором столбце
Подпрограммы простейших функций Разработать алгоритм вычисления выражения,заданного в первом...

Двухмерные массивы. Рассчитать среднюю температуру в первом столбце и среднюю во втором столбце
Здравствуйте. Мне нужна программа, в которой используются двухмерные массивы. Массив должен...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru