Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
VBA Как работать с большой таблицей если диапазон значений располагается не по столбцам, а по строкам https://www.cyberforum.ru/ vba/ thread2482713.html
Есть огромная таблица с данными. В первом столбце значения, которые выбираются, при этом в другой ячейке, должен появится выпадающий список значений находящихся в одной строке с этим значением.
VBA Создание диаграммы
Есть у меня задание в котором после создания базы строится диаграмма, дело в том что делал я её через запись макроса, т.к. с vba вообще не знаком. На диаграмме надо указать кому и чему соответствуют показатели. Ниже будет код самой диаграммы, и я ещё даю архив с самим заданием, данный берутся для диаграммы с листа база, который заполняется при запуске формы на странице меню. Пожалуйста...
VBA Программно работать с recent file list в PowerPoint Программно работать с recent file list в PowerPoint https://www.cyberforum.ru/ vba/ thread2482364.html VBA Макрос копирования ячеек со сложным условием Пытался поменять тему в прошлой теме, так как она не отражает всего действия. Делаю форму чтобы данные с листа "Form", переносились по кнопке в лист, созданный на основе листа "AEC", это сделать еще могу, но не хватает сообразительности чтобы сделать так, чтобы: 1. Создается новый лист (это сделано по кнопке в правой части, макрос "Newact"), соответственно остальное надо продолжать в нем. ... https://www.cyberforum.ru/ vba/ thread2482266.html
VBA Перенос ячеек из листа на лист, не затрагивая остальные строки
Здраствуйте! Делаю форму чтобы данные с листа "Form", переносились по кнопке в лист, созданный на основе листа "AEC", это сделать еще могу, но не хватает сообразительности чтобы сделать так, чтобы: 1. Создается новый лист (это сделано по кнопке в правой части, макрос "Newact"), соответственно остальное надо продолжать в нем. 2. С листа "Form", столбец "А", начиная с ячейки "А20" (эта часть...
VBA Перенести все порции данных из Excel в Word-таблицу https://www.cyberforum.ru/ vba/ thread2482173.html
Здравствуйте. Есть столбец A в Excel. В нём порции данных по 4 строки. Данные формируются макросом из выгрузки. Как перенести все порции данных в Word таблицу в например в третий столбец? Перенос 4 ячейки excel в одну word, потому что интересует перенос по строкам в одной ячейке. Добавлено через 1 минуту сколько порций данных - известно после обработки макросом
VBA Сравнить два столбца в двух разных файлах MS Excel Добрый день ув.форумчане! Нужна ваша помощь. Передо мной стоит задача написать макрос который сравнит два столбца в двух разных файлах excel(я). Начальство сказало писать на VBA, а я с ним и не работал-то ни разу. Сама задача: Есть два файла excel с абсолютно одинаковой структурой, таблицы с данными находятся на первых листах файлов (Лист1). Надо сравнить столбец 'F' Документа1, в... https://www.cyberforum.ru/ vba/ thread2482134.html VBA VBA: выбор пользователем и запись пути сохранения файла через переменную
Пытаюсь реализовать идею: пользователь через стандартный блок выбора папки для сохранения выбирает путь, а переменная в коде записывает этот путь в стандартном формате: "C:\Documents\Создаваемые документы", чтобы потом этой переменной оперировать в другом макросе (с помощью передаваемого аргумента). Насколько это реально?\ Прошу вас помочь с такой задачкой (знакома с макросами всего 3 дня)....
VBA Что не так с этим кодом? https://www.cyberforum.ru/ vba/ thread2482065.html
Код должен производить pacчeт траектории движeния капель щелока в excel. В vba к сожалению практически ничего не понимаю. Dim M(20, 20) Dim N(20, 20) Print "T=" Input T Print "T1=" INPUT T1
VBA Вывести содержимое бинарного файла в msg Box, кракозябрами https://www.cyberforum.ru/ vba/ thread2481991.html
Всех приветствую, задача следующая - Есть файл с расширением .so мне нужно из этого файла взять всё содержимое , даже без кодировки можно кракозябрами, и главное что бы записать в любой текст бокс , что бы я мог найти определённое слово в содержимой, в этом файле есть как и кракозябры так и слова которые читаются, при попытке вывести содержимое в Msg Box выводит не весь код а всего лишь 5...
VBA Макросы в верхнее меню
Добрый день. Поставили задачу написать несколько макросов и вынести их в отдельную вкладку на верхней панели. Макросы сделал, а вот с меню возникли проблемы. 1) С помощью этого кода добавляю макросы на панель. В результате эти кнопки добавляются в существующее меню "Надстройки", а не в новое. Причем, если создавать через Файл-Параметры-Настроить ленту, то там можно выделить что угодно в...
VBA Макрос отправляющий данные в БД Access не отрабатывает из-за большого количества данных https://www.cyberforum.ru/ vba/ thread2481903.html
Добрый день, Просьба подсказать, есть ли ограничения у VBA по количеству отправляемых данных в столбцы БД? Если делать процедуру короче (укорачивать отправляемые данные), то отрабатывает, можно ли как то решить данную проблему (Ошибка синтаксиса в инструкции Insert Into) без разбивки
371 / 269 / 93
Регистрация: 18.11.2015
Сообщений: 997
15.07.2019, 10:42 0

Проблемка с VBA Excel - VBA - Ответ 13719721

15.07.2019, 10:42. Показов 1215. Ответов 28
Метки (Все метки)

Ответ

Цитата Сообщение от Hellrizer Посмотреть сообщение
Cells(a, 2) = Sheets("Модель").Cells(a, 9)
Такое указание ячеек означает:
ячейке (a, 2) текущего (активного) листа присвоить значение из такой же строки, 9 столбца листа "Модель".

Добавлено через 4 минуты
Насколько я понял Вам нужно то-то типа так:
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub CommandButton3_Click()
    aAll = Sheets("Модель").Cells.SpecialCells(xlLastCell).Row
b = 22
    For a = 2 To aAll
    If Sheets("Модель").Cells(a, 9) <> "" Then
        Cells(b, 2) = Sheets("Модель").Cells(a, 9)
        Cells(b, 101) = Sheets("Модель").Cells(a, 9)
        Cells(b, 28) = Sheets("Модель").Cells(a, 10)
        Cells(b, 31) = Sheets("Модель").Cells(a, 11) & " " & Sheets("Модель").Cells(a, 12) & "Х" & Sheets("Модель").Cells(a, 13)
        Cells(b, 43) = Sheets("Модель").Cells(a, 15)
        Cells(b, 47) = Sheets("Модель").Cells(a, 16)
b=b+1
    End If
    Next a
End Sub


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

Vba excel windows и vba excel Mac Os - Макинтош корявит шрифт
Всем привет, столкнулся с такой ситуацией. Макросы написаны на Excel 2016 Windows. Когда файл...

Небольшая проблемка с VBA под Word
Есть шаблон вордовского файлика, в нем находиться текст и таблица со столбцами: пп,ФИО,должность и...

VBA парсер выдает ошибку vba excel Run-time error '-2147319783 (80028019) и "microsoft ожидает пока другое приложение за
Добрый день, делаю свой первый парсер. Выдает ошибку vba excel Run-time error '-2147319783...

Функциия excel в функции excel на vba
С помощью мастера записи матросов получил следующую функцию ActiveCell.FormulaR1C1 = &quot;=IFERROR...

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

Vba экспорт в excel по vba-фильтру
Работает VBA-фильтр, как сделать экспорт выбранных данных в Excel по средствам кнопки. Прошу о...

VBA запросы в excel vba
Здравствуйте, Есть два запроса на выборку. Необходимо сохранить запросы в excel: 1 запрос на 1...

Импорт таблицы Excel в БД Access через VBA через кнопку в Excel
Форумчане, помогите, пожалуйста с кодом макроса в excel. Задача состоит в следующем:в файле...

VBA в Excel
Не могли бы вы помочь создать макрос в Excel, который бы выделял цветом в документе все...

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