Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » and_evg
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1
Объединение данных из ячеек для последующего копирования в Word
 
#
04.06.2025 07:38:03
Добрый день.
Если правильно понял
=B2&C2&D2
 
Перейти    
Нумерация страниц
 
#
04.06.2025 06:52:55
Добрый день.
А через колонтитулы не?
Всего страниц &[Страниц]. Страница № &[Страница]
 
Перейти    
Расчет времени работы бригады
 
#
03.06.2025 12:46:46
Добрый день
=H5*495*24
 
Перейти    
Копирование значений формул и вставка их в соседнюю ячейку (VBA)
 
#
31.05.2025 11:23:52
Добрый день.
Как то так.
Код
Dim mycel As Range
For Each mycel In Worksheets("Лист1").Range("A3:A10")
    mycel.Offset(0, 1).Value = mycel.Value
Next
 
Перейти    
Файл занимает большой объём памяти
 
#
04.12.2024 07:50:58
очень много графических объектов
Испрвляем:
1.   Переименовать файл.XLSM в ZIP
2. Открыть ZIP файл в   проводнике (или архиваторе), удалить внутри ZIP файла папку XL\DRAWINGS и   сохранить архив
3. Переименовать ZIP файл   обратно в XLSM
 
Перейти    
Пустая ячейка считается за 0, Нужно сравнить два числа в разных столбцах
 
#
31.10.2024 15:18:03
Если правильно понял
=МАКС('ТЕКУЩИЕ РЕЗУЛЬТАТЫ'!C2:D2)
 
Перейти    
Расчет прибыли в бизнесе с разной суммой вложений, не совсем про эксель...
 
#
17.10.2024 08:58:24
Возвращаем каждому то, что он вложил 800 и 200, а остаток 1000 делим в соответствии с долями в бизнесе на 600 и 400
 
Перейти    
Изменение режима вычислений
 
#
16.10.2024 15:30:26
Попробуйте вставить в модуль книги надстройки:
Код
Private Sub Workbook_Open()
    Application.Calculation = xlCalculationAutomatic
End Sub
тогда будет всегда открываться в атематическом режиме
 
Перейти    
не могу найти где еще могут быть заблокированы макросы
 
#
31.07.2024 13:46:42
Причина скорее всего в этом:
 
Перейти    
Поиск в выпадающих списках таблицы
 
#
31.07.2024 12:17:50
Добрый день.
Попробуйте вот это. (не помню где взял)
 
Перейти    
Изменение макроса поиска последней заполненной ячейки на постоянную ячейку.
 
#
04.06.2024 09:57:39
Если правильно понял то весь код заменить на:
Код
ActiveSheet.range("H1").value=Me.ListBox_Dishes.Value
 
Перейти    
Добавить новое поле в карту XML
 
#
26.07.2021 18:38:47
Цитата
doober написал:
Открываете архиватором файл excel
Это конечно да... но 300 и более раз...
Изменено: and_evg - 26.07.2021 18:39:58
 
Перейти    
Добавить новое поле в карту XML
 
#
26.07.2021 17:10:20
Дааа... похоже, что при 390 просмотров, ни одного варианта выхода нет ?
 
Перейти    
Добавить новое поле в карту XML
 
#
23.07.2021 19:20:58
Думал, что
Код
Dim xmldoc = new DOMDocument
Dim xmlDoc As MSXML.DOMDocument
Set xmlDoc = New DOMDocument
поможет, но так как
Код
xmlDoc.load(<path>)

где: path – путь доступа к XML документу: к конкретному файлу на диске, а мне нужно к схеме встроенной в файл XLS, то я встал в ступор...
 
Перейти    
Добавить новое поле в карту XML
 
#
23.07.2021 15:40:47
Всем доброго времени суток.
Столкнулся со следующей задачей:
Имеется некоторое количество XLS файлов со встроенной картой XML, настроены сопоставления (связи и ссылки).
По сути это формирование электронного счета-фактуры в формате XML, для загрузки в систему электронного документооборота.
Необходимо в данные карты добавить определенное количество дополнительных полей.

Вопрос: Каким образом, либо добавить эти поля во встроенную карту, либо заменить эту карту на актуальную.
Но при этом, так как таких файлов (шаблонов) достаточное количество нужно что бы при данных манипуляциях не слетали ни сопоставления ни связи со ссылками.

Подскажите в какую сторону копать.
Крос
 
Перейти    
Данные в каждой из объединенных ячеек
 
#
04.06.2019 14:07:27
Цитата
Юрий М написал:
никаких макросов, а работает
Создаем чистый файл, заполняем две ячейки, выделяем их, запускаем макрос (который в другой книге), сохраняем данный новый файл в xlsx (без макросов), закрываем, открываем и ...
 
Перейти    
Данные в каждой из объединенных ячеек
 
#
04.06.2019 13:58:18
Цитата
Юрий М написал:
автор интересуется,
не как это работает без макросов, а
Цитата
Илья Николаев написал:
кто-нибудь знает о подобных возможностях,
Что касается
Цитата
Илья Николаев написал:
КАК?! Такое смог сделать человек с уровнем владения
То, допустим что данный макрос оформлен как надстройка, либо в личной книге макросов и на панель инструментов выведена соответствующая кнопка, то....
 
Перейти    
Данные в каждой из объединенных ячеек
 
#
04.06.2019 13:46:56
Цитата
Юрий М написал:
Вы даёте ссылки на варианты с макросами.
Так эти макросы можно запустить применительно к любому выделению (в любом файле)
А вот вариант Dark1589, более реалистичен если учесть:
Цитата
Илья Николаев написал:
"Я вот сюда тыкаю, и оно считает!""
 
Перейти    
Данные в каждой из объединенных ячеек
 
#
04.06.2019 13:31:03
Добрый день.
посмотрите тут: http://www.excelworld.ru/forum/3-43-1 и тут http://www.excelworld.ru/forum/3-44-1
 
Перейти    
Какой формулой правильно вставить нумерацию страниц в одной из ячеек?
 
#
13.11.2018 15:03:14
Код
=ПРАВСИМВ(ЯЧЕЙКА("имяфайла");1)
 
Перейти    
Найти номер строки по дате с помощью find, Ошибка object variable or with block variable not set
 
#
19.10.2018 07:59:57
Вообще то лучше
Код
Dim rCell As Range
Set rCell = ActiveWorkbook.Worksheets(1).Range("A2:A" & row_end_copy).Find(end_date)
row_start_copy = rCell .Row
 
Перейти    
Вычисление данных по номеру недели, Подсчет количества данных в рамках заданной недели
 
#
19.10.2018 07:55:58
Добрый.
Файл с примером, помог бы в решении...
 
Перейти    
Найти номер строки по дате с помощью find, Ошибка object variable or with block variable not set
 
#
19.10.2018 07:53:33
попробуйте вместо:
Цитата
KindyakovEA написал:
row_start_copy = ActiveWorkbook.Worksheets(1).Range("A2:A" & row_end_copy).Find(end_date).Row
вот это
Код
Set row_start_copy = ActiveWorkbook.Worksheets(1).Range("A2:A" & row_end_copy).Find(end_date).Row
 
Перейти    
Формула для динамического именованого диапазона, меняется количество строк и столбцов
 
#
18.10.2018 12:51:46
Большое спасибо всем откликнувшимся!
Цитата
БМВ написал:
=OFFSET(СметыШапка;;;COUNTA(INDEX($1:$32767;;COLUMN(СметыШапка)))-1;COUNTA(INDEX($1:$32767;ROW(СметыШапка))-1)
работает, но урезает по одной строчке и одному столбцу (лишнее "-1") вот так работает:

Код
=СМЕЩ(СметыШапка;;;СЧЁТЗ(ИНДЕКС($1:$32770;;СТОЛБЕЦ(СметыШапка)));СЧЁТЗ(ИНДЕКС($1:$32770;СТРОКА(СметыШапка))))

Но есть ограничения: колонка с "СметыШапка" перед таблицей и после должна быть пустая, то же самое касается строки с "СметыШапка". Также в указанных строках и столбцах не болжно быть разрывов таблицы
Цитата
Сергей написал:
=СметыШапка:ИНДЕКС(1:1048576;ПОИСКПОЗ("ЯЯЁЁЯЯ";ДВССЫЛ(СЖПРОБЕЛЫ(ЛЕВСИМВ(ПОДСТАВИТЬ(ЯЧЕЙКА("адрес";СметыШапка);"$";"         ";2);4))&":"&СЖПРОБЕЛЫ(ЛЕВСИМВ(ПОДСТАВИТЬ(ЯЧЕЙКА("адрес";СметыШапка);"$";"         ";2);4)));1);ПОИСКПОЗ("ЯЯЁЁЯЯ";ДВССЫЛ(СТРОКА(СметыШапка)&":"&СТРОКА(СметыШапка));1))
Данная формула не работает, к сожалению при вычислении столбцов в адресе остаются лишние пробелы. Но спасибо за идею. В результате чего появилось следующее:
Код
=СметыШапка:ИНДЕКС($1:$32770;ПОИСКПОЗ("ЯЯЁЁЯЯ";ДВССЫЛ(ЛЕВСИМВ(АДРЕС(1;СТОЛБЕЦ(СметыШапка);2);ПОИСК("$";АДРЕС(1;СТОЛБЕЦ(СметыШапка);2))-1)&":"&ЛЕВСИМВ(АДРЕС(1;СТОЛБЕЦ(СметыШапка);2);ПОИСК("$";АДРЕС(1;СТОЛБЕЦ(СметыШапка);2))-1));1);ПОИСКПОЗ("ЯЯЁЁЯЯ";ДВССЫЛ(СТРОКА(СметыШапка)&":"&СТРОКА(СметыШапка));1))
Ограничение только одно: в ключевых столбце и строке (где находится "СметыШапка") должен быть только текст, в противном случае (если числа) "ЯЯЁЁЯЯ" заменить на очень большое число
 
Перейти    
Формула для динамического именованого диапазона, меняется количество строк и столбцов
 
#
17.10.2018 15:39:41
Цитата
Сергей написал:
надеюсь В7 это и есть известный верхний левый угол
В данном случае да. Но в файле другого пользователя она может находится например и в ячейке В8, у третьего в A1 и т.д., но при этом она (данная ячейка) всегда поименована как "СметыШапка"
 
Перейти    
Формула для динамического именованого диапазона, меняется количество строк и столбцов
 
#
17.10.2018 15:31:29
Цитата
БМВ написал:
умная таблица и на этом все
К сожалению нет.... Офис как 2007 так и 2003. а на машинах с 2003-им не хотелось бы их .
 
Перейти    
Формула для динамического именованого диапазона, меняется количество строк и столбцов
 
#
17.10.2018 15:29:02
Цитата
Сергей написал:
чет брет какой то
Цитата
and_evg написал:
имени "СметыШапка"
Имелось ввиду именованная ячейка и имя у данной ячейки (в данном случае) "СметыШапка"
 
Перейти    
Формула для динамического именованого диапазона, меняется количество строк и столбцов
 
#
17.10.2018 15:16:47
Цитата
vikttur написал:
Где эта информация?
Ориентироваться по имени "СметыШапка"
 
Перейти    
Формула для динамического именованого диапазона, меняется количество строк и столбцов
 
#
17.10.2018 15:11:21
Цитата
vikttur написал:
Если угол известен, то и расположение известно. Или все-таки неизвестно?
Ну да, верно, угол известен. В данном случае он помечен именем "СметыШапка"
Изменено: and_evg - 17.10.2018 15:14:01
 
Перейти    
Формула для динамического именованого диапазона, меняется количество строк и столбцов
 
#
17.10.2018 15:02:28
Добрый день.
Столкнулся вроде как с небольшой проблемой. Необходимо через диспетчер имен обозначить именованный динамический диапазон.
Вроде бы как и знаю формулы СМЕЩ(), СЧЕТЗ(), ИНДЕКС(), ПОИСКПОЗ(), ПРОСМОТР(), но не соображу как прикрутить к конкретной задаче.
Нюанс весь в том, что:
  1. данный диапазон  "плавающий", т.е. может располагаться в любом месте листа
  2. известен только его крайний левый верхний угол
  3. может изменяться как количество строк, так и количество столбцов.
Заранее спасибо
 
Перейти    
Страницы: 1
Наверх