|
|
Другие темы раздела | |
VBA Вставить формулу в Excel из формы Проблема смешная, конечно. Пытаюсь вставить строку с формулой во внедренный файл excel'я: xld1.Range("t27").Value2 = "=ЛЕВСИМВ(A1;НАЙТИ(" & Chr(34) & Chr(32) & Chr(34) & ";A1;1)+1)&" & Chr(34) & Chr(46) & Chr(34) & "&ПСТР(A1;НАЙТИ(" & Chr(34) & Chr(32) & Chr(34) & ";A1;НАЙТИ(" & Chr(34) & Chr(32) & Chr(34) & ";A1;1)+1)+1;1)&" & Chr(34) & Chr(46) & Chr(34) Вылетает в ошибку:... https://www.cyberforum.ru/ vba/ thread2704324.html |
VBA Регулярные выражения (до/после определенного символа) Всем привет! В основном VBA использую в CDR, с регулярными выражениями практически не сталкивался, по этому есть вопрос. Мне нужно текст строки слева до символа "#" в переменную 1, текст той же строки справа до символа "#" в переменную 2, текст строки между символами "#" в переменную 3. Пример сроки: "25#000235#город" Не подскажите, как паттерн такой составить?, Спасибо! |
VBA Проблемы с четностью/нечетностью Sub VBA () Dim x As Single, a As Single x = InputBox("Введите значение x") А = InputBox("Введите значение А") If -2 < x And x < 2 And АMod2 = 0 Then y = 5 * x ElseIf -2 < x And x < 2 And АMod2 = 1 Then y = 10 * x ElseIf 3 < x And x < 5 And АMod2 = 0 Then y = 2 * x https://www.cyberforum.ru/ vba/ thread2704158.html | VBA Как унаследовать класс из c# У меня есть класс в библиотеке c# Мне нужно наследовать этот класс в VBA Возможно ли это сделать? Если да, то подскажите как Буду благодарен примерам. https://www.cyberforum.ru/ vba/ thread2704054.html |
Измение ключа ячейки при добавление строк выше VBA Добрый день! Подскажите возможна ли такая реализация: к кнопке привязан макрос с якорной ссылкой на ячейку, допустим, . Можно ли изменить ключ ячейки на количество добавленных строк выше данной ячейки?. Например добавил 2 новых строки и ключ изменился с А255 на А257. Заранее благодарю). Если поделитесь кодом, то буду очень признателен. |
VBA Вставить строки через цикл
https://www.cyberforum.ru/ vba/ thread2703951.html Приветствую! Нужно, чтоб макрос вставлял 11 строк через каждые 30 в таблице с неограниченным количество строк Пробовал так Sub vstavka() a = 0 Dim lastrow As Long lastrow = Cells(Rows.Count, 1).End(xlUp).Row i = lastrow / 30 For r = 1 To i |
VBA Отбор уникальных значений
https://www.cyberforum.ru/ vba/ thread2703947.html Доброго дня. Во вложенном файле 4 поля с данными. Из них нужно сделать одно поле, содержащее только уникальные данные из вышеуказанных полей. На малом кол-ве записей работает нормально. Но в реальности в каждом поле порядка 700 000 записей. Еще ни разу не дождался, чтобы код отработал, нервов не хватает. Может кто подскажет, как обработать большой массив данных? Спасибо Sub qqq() |
Преобразование структуры столбца VBA Добрый день! Необходимо преобразовать структуру листа к следующему порядку: ИЕ РМ КР Перечисленные данные выводятся в столбец D. На лист данные выводятся хаотично. Может вывестись только одно значение, например "ИЕ" или два и т.д. Если вывелось только одно значение, то необходимо вставить строки с другими значениями. Например, вывелось одно значение "РМ", значит необходимо вставить выше... |
VBA Кроссворд в PowerPoint c VBA
https://www.cyberforum.ru/ vba/ thread2703723.html Здравствуйте! Пытаюсь сделать кроссворд интерактивный, но не разобраться вот в чём:(2 слайд) не работает форма для вопросов 2-9, 1 еще виден в режиме просмотра, а остальные это как копия 1. Я написала код для нескольких форм вопросов, но всё-равно почему-то не получается. Может вообще что-то с кодом не так, посмотрите, пожалуйста. |
VBA Макрос, сравнивающий два файла Всем привет, может кто даст макрос сравнивающий два файла, нужно сопоставить два столбца, столбец K со столбцом T и если различия выделить цветом https://www.cyberforum.ru/ vba/ thread2703604.html |
Проверка ячейки что это число VBA Здравствуйте ,дорогие форумчане ! Хотел проверить введено ли число в ячейке , но выдает ошибку . Не могли бы вы объяснить из-за чего она возникает . Спасибо ! Sub Test() For i = 2 To 7 If IsNumeric(Cells(i, "B")) Then MsgBox "Ячейка " & i & " неправильно введена" Else: End If Next i End Sub |
VBA Заполнение формы данными из строки
https://www.cyberforum.ru/ vba/ thread2703557.html Здравствуйте! Вопрос такой: Есть код в модуле листа, который, при двойном клике на ячейку в столбце А, запускает форму (Sales): Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Not Intersect(Target, Range("A1:A10000")) Is Nothing Then Call ShowSales Cancel = True End If End Sub |
0 / 0 / 0
Регистрация: 07.12.2019
Сообщений: 24
|
|
30.09.2020, 15:27 [ТС] | 0 |
Excel Макросы в старой версии excel плохо работают в новых версиях excel (2007 и выше) - VBA - Ответ 1487649330.09.2020, 15:27. Показов 2443. Ответов 13
Метки (Все метки)
Ответ
Burk
Varlam1414, когда переходишь на лист результата, то там в ячейке D200 стоит формула =ВПР(A200;E184:F197;2;1) и она выдает ошибку #Н/Д, которая возникает тогда, когда первый параметр (А200 и там у вас 0) меньше минимального значения первого столбца таблицы. А ошибка, вследствие этого, возникает в строке O2_T = Cells(216, 11) + Cells(200, 4) Если вас не затруднит, то почитайте описание ВПР. Если вы надеетесь, что запустив чужую программу вы получите нужный результат, то не всегда. А открывается файл нормально на 7. Добавлено через 5 минут Кстати, что означает, с точки зрения программирования, ПЛОХО РАБОТАЮТ? Да, нашел эту ошибку. Но когда открыл в excel 2003 - это значение само подставилось 817 и все посчиталось без ошибок. Но зато в excel 2003 (Как и в 2007 )возникает другая ошибка. Когда пытаешься добавить новый город в справочник с другой широтой или изменить широту существующего города на другу - возникает ошибка: Вернуться к обсуждению: Макросы в старой версии excel плохо работают в новых версиях excel (2007 и выше) VBA
0
|
30.09.2020, 15:27 | |
Готовые ответы и решения:
13
Где находится опция "Добавить интерактивность" в Excel 2007 и более новых версиях? Адаптировать файл Excel от старой версии (2003) к новой (2016) Не работают VBA макросы Excel Определение новых клиентов в клиентской базе (Excel 2007) |
30.09.2020, 15:27 | |
30.09.2020, 15:27 | |
Помогаю со студенческими работами здесь
0
Как заставить работать макросы, написанные в excel 2003, для коррекции данных в word 2007? Реализовать проверку текущей версии программы и оповещение пользователя о новых версиях Макросы на копирование данных из нескольких файлов excel в один файл excel Формулы Excel 2007. Глюк в Excel 2007-? Перевод макросов Excel 2007 для работы в Excel 2016 Excel 2007 - стандартное меню в стиле Excel 2000 (2003, XP) |