Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Другие темы раздела
VBA Простой макрос фильтра по столбцам Excel https://www.cyberforum.ru/ vba/ thread1922047.html
Добрый день. В документе мне необходимо при открытии применить фильтр на столбец, значения должны быть больше нуля. Вот что я навоял, но не работает. Sub Auto_Open() Range("A").AutoFilter Field:=1, Criteria1:>0 End Sub
не получается задать переменную как только что открытый workbook VBA
добрый день! макрос открывает файлы (путь указывает пользователь через диалоговое окно), затем присваивает файлу имя и работает дальше код: fileToOpen = Application.GetOpenFilename() Set WB2 = Workbooks.Open(fileToOpen) некоторые файлы открываются без проблем, а некоторые почему то не воспринимаются программой (в окне locals WB2 = Nothing, fileToOpen определяется верно) файлы одного и...
VBA Макрос Excel для автоматической сортировки при открытие документа Доброго времени суток уважаемые форумчане. У меня есть документ в Excel с очень большой таблицей. В модуле общей книги существует след код Private Sub Workbook_Open() ActiveSheet.Unprotect "rootvolkuz" ActiveSheet.EnableOutlining = True ActiveSheet.Protect Password:="rootvolkuz", Contents:=True, Scenarios:=True, UserinterfaceOnly:=True ActiveSheet.EnableAutoFilter = True... https://www.cyberforum.ru/ vba/ thread1921850.html VBA Кнопка удаления записи https://www.cyberforum.ru/ vba/ thread1921835.html
Есть кнопка которая совершает поиск и удаляет строку. Пытаюсь дописать код так что бы удаленную строчку он записывал на отдельный лист, и с последующим удалением каждое новая строчка записывалась на новой строке, а не просто перезаписывалась. Прощу помочь мне. Буду признателен Private Sub CommandButton1_Click() For i = 2 To 250 For j = 1 To 110 Sheets("Результат").Cells(i, j) = "" ...
VBA Массовое отключение всех макросов, кроме одного
Доброе утро, уважаемые форумчане. Помогите решить проблему. У меня в файле есть несколько макросов. Возникла необходимость - быстро отключить все макросы в книге, а при необходимости - также быстро - все макросы опять включить. Но как это сделать, если макрос "включения-отключения" должен остаться работать? Макросов в книге очень много (я приложил только два).
VBA Перемещение на другой лист данных Здравствуйте, подскажите, пожалуйста, как изменить код, чтобы он перемещал данные из столбцов не на первую строку, а на ту, которую укажу я (например на 4)? https://www.cyberforum.ru/ vba/ thread1921822.html
VBA Вывод на экран количество строк в таблице. Что не так? https://www.cyberforum.ru/ vba/ thread1921775.html
Function Колво () Dim count As Long count = DCount("Клиенты") MsgBox count, vbOKOnly = 0, "Количество клиентов" End Function Что может быть проще?! Но почемуто не работает. Кричит: Argument not optional И что я сделал не так?
VBA перенос строк из столбца в соседний на ячейку выше с автоудалением строки донара
Во вложении есть что из чего должно получиться хотелось бы через формулу получить решение для саморазвития чтобы понять пути решения.
VBA Type mismatch (error 13) при записи файла в папку Здравствуйте, уважаемые формучане! Помогите разобраться, сам в VBA на уровне интуиции При записи файла в папку, которая указывается выбором из ComboBox, выскакивает type mismatch (error 13) код с ошибкой If CreateObject("Scripting.FileSystemObject").FolderExists("F:\Folder\Folder2" & ComboBox1.Value & "" & name_folder(0)) Then Раньше макрос работал нормально, что могло случиться не... https://www.cyberforum.ru/ vba/ thread1921676.html VBA Excel: как программно запретить вывод автофигуры на печать? https://www.cyberforum.ru/ vba/ thread1921513.html
Всем привет! Подскажите, пожалуйста, как у создаваемой программно автофигуры поставить свойство "не выводить на печать"? В ручную, допустим, это делается снятием соответствующей галки на вкладке "Размер и свойства / Свойства" А если фигуры создаются программно, при этом мы заранее не знаем, сколько их будет? Вот такой код, например (файл тоже прилагаю): Sub rty() Dim Temp As Variant ...
VBA Не работает условие IF
Помогите, плиииз, советом: я применила код к своей базе данных. он мне ищет номера торгов. Но почему-то в определённый момент затирает результаты поиска первых номеров. то есть сначала он вставляет первый номер (куда надо), потом находит второй (записывает его куда надо), а первый при этом удаляет. Хотя при поиске номера ячеек не пересекаются. Подозреваю, что пишу в If что-то не так. Dim...
VBA из Word в Excel ( The remote server machine does not exist or is unaviable ) Добрый день! Задача - вытащить таблицу и определенный текст из документа Word и вставить в ячейку Excel. sub тест () Dim myWord As Word.Application Dim docSource As Word.Document orderFile = "C:\1.doc" Set myWord = CreateObject(Class:="Word.Application") https://www.cyberforum.ru/ vba/ thread1921466.html
6922 / 2832 / 543
Регистрация: 19.10.2012
Сообщений: 8,645
24.02.2017, 18:01 0

Итоги в конце таблицы и преобразование в число данных - VBA - Ответ 10148881

24.02.2017, 18:01. Показов 1286. Ответов 12
Метки (Все метки)

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

Решение

P.S. И не надо никуда ходить...

Добавлено через 1 минуту
Можно не привязываться, раз уже стоите
Visual Basic
1
Sheets("Итоги").[A1].CurrentRegion.Copy ActiveSheet.[A1].End(xlDown)(2)


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

Как в отчёте Access сделать так, чтобы итоги появлялись только в конце, а не после каждой записи?
Как в отчёте Access сделать так, чтобы итоги появлялись только в конце, а не после каждой записи?

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

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

Преобразование таблицы с многоуровневой структурой данных - VBA
Всем доброго времени суток! Подскажите, пожалуйста, как решить задачу преобразования уровней из 1С...

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

Итоги у таблицы формы автоматом с отбором
зДРАВСТВУЙТЕ, ЕСТЬ ТАБЛИЦА ФОРМЫ, В НЕЙ СТОИТ ОТБОР, И СЧТИАЮТСЯ итоги по этой таблице. но...

Преобразование данных из строки в отрицательное число
Здравствуйте! Имеется ряд строк типа -498.67469 нужно преобразовать в число для дальнейшей...

Продублировать итоги первой таблицы на остальных листах
Добрый день! Есть такая ситуация, на первом листе имеется таблица-родоначальник (к примеру табл...

Преобразование данных из даты в число или наоборот
Здравствуйте. Возникла проблема: из экселя в базу аксесс загружается таблица, в которой есть...

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