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

Страницы: 1 2 След.
Пропала таблица Excel, Пропала таблица Excel
 
#
09.02.2026 13:31:58
Цитата
написал:
Помогите пожалуйста
Вкладка "Вид" > кнопка "Разделить"

Упсс... и не посмотрел... а вопросу то уже более 10-ти лет
Изменено: and_evg - 09.02.2026 13:34:13
 
Перейти    
Как макросом выполнить F2+Enter для диапазона ячеек с текстом/есть ли этому замена?
 
#
05.02.2026 12:46:07
Цитата
написал:
Не, я пробовал, так не работает
Хммм... А у меня в офисе 2007 Вот так:
Изменено: and_evg - 05.02.2026 12:50:09
 
Перейти    
Как макросом выполнить F2+Enter для диапазона ячеек с текстом/есть ли этому замена?
 
#
05.02.2026 07:15:01
Это лечится установкой формата "Обычный" на столбец "H"
Такое происходит, если в ячейке больше 255 символов и установлен формат "Текстовый"

И да, похоже не только на столбец "H"...
Изменено: and_evg - 05.02.2026 07:17:41
 
Перейти    
Не работает файл с макросами
 
#
29.11.2025 12:21:09
Может вот это?
Изменено: and_evg - 29.11.2025 12:25:41
 
Перейти    
Как формулой вытащить первые два символа из времени
 
#
29.08.2025 13:48:29
Добрый день
так?
=ЧАС(A1)
 
Перейти    
макрос для открытия выпадающего списка кнопкой, не открывает выпадающий список
 
#
27.08.2025 08:01:56
Добрый день.
В последнем файле макрос пустой, но если туда вставить код из сообщения, то все работает
 
Перейти    
Объединение данных из ячеек для последующего копирования в 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))
Ограничение только одно: в ключевых столбце и строке (где находится "СметыШапка") должен быть только текст, в противном случае (если числа) "ЯЯЁЁЯЯ" заменить на очень большое число
 
Перейти    
Страницы: 1 2 След.
Наверх