Обращаюсь за помощью к форумчанам. В файле 3 страницы: Лист1 (из которого берутся данные), контакт (куда нужно выгрузить отобранные записи) и фразы (которые служат для негативного отбора записей). Список фраз может в процессе работы пополняться, поэтому подумал, что загрузка фраз в массив будет правильным решением. Опыта работы с массивами нет. Просмотр форума по первым 3 страницам по массивам мне дал мало информации., возможно не знаю, на что обратить внимание. Нужно каждую строку Листа1 (записей может быть до 3 тысяч) по полю Контакты сравнить с массивом загруженных фраз. Если фраза встречается в записи, то такая запись не должна попадать на страницу «контакт». На странице "контакт" должны попадать записи с фамилиями. При работе не пойму, как совместить два цикла (перебор массива и записей Листа1, и поэтому получил сообщение «Next without For». Подскажите, что исправить?
Здравствуйте, знатоки! искал, но не нашел топиков про создание и использование мер в гугл таблицах. Наподобие мер в Power Pivot. Например: DISTINCTCOUNT() есть ли такая возможность в гугл таблицах?
Необходимо автоматизировать задачу макросами в Excel. Потом потребуется на рабочем месте конвертировать в Calc LibreOffice, такое требование администрации. Может самому удастся сделать конвертацию или с вашей помощью. задачу позже уточню
Здравствуйте, знатоки! Где регулируется отображение разрядности чисел в Power BI? http://joxi.ru/ZrJjn8BTMD3W3r в значениях и других местах не нашел ))
Здравствуйте, знатоки! Пожалуйста помогите решить задачу. Есть строка, в двух ячейках которой имеются некие значения ①и ②. По первому значению нужно найти в другой таблице (справочнике) строку, а в найденной строке найти второе значение. Уже по второму значению нужно найти третий параметр (стажевую группу) ③
чувствую, что тут матрица должна быть, но с матрицами никогда не работал. или ПОИСКПОЗ как-то использовать. Подтолкните к решению. Заранее благодарю!
Здравствуйте, коллеги! Пытаюсь в MS Query из поля с "Фамилия Имя Отчество" получить "Фамилия И.О." Пока смог только разделить столбец на три столбца и из каждого получить нужный фрагмент текста. Не могу вставить пробел и/или точку, т.к. введение знаков конкатенации & + вызывает ошибку. Подскажите решение.
Здравствуйте, знатоки! есть таблица со столбцами даты и времени поступления пациента и даты и времени операции. Разницу предоперационной подготовки я подсчитал, как дробную часть формата суток и времени. Помогите превратить полученную разницу в часы в десятичном формате (часы, как целые числа, а минуты как дробная часть)
Уважаемые форумчане, только открыл для себя PowerBI Desktop/ Хочу использовать формулу Столбец = find(" ";[№ участка];2) по аналогии с формулой Эксель НАЙТИ(" ";A2;2) и получаю сообщение "В заданном тексте не найден искомый текст, переданный в функцию "FIND". Ищу пробел во второй позиции. В синтаксисе не вижу ошибки. Если не трудно, поправьте меня .
написал формулу поиска значения, но работает только для первого поиска : =ЕСЛИ(ПОИСК("общей";A7)>1;1500;ЕСЛИ(ПОИСК("терапевт";A7)>1;2200;ЕСЛИ(ПОИСК("педиатр";A7)>1;900;3300)))
Здравствуйте, уважаемые знатоки! Кто сталкивался с такой проблемой и как ее решить. Запросом MS Excel 2016 (офис 365) формирую и загружаю таблицу с числовыми полями (в PQ специально задаю формат нужных полей на числовое). Потом делаю сводную таблицу, которая считает количество значений. Меняю параметры полей значений с Количество на Сумма. Дает ноль.
Пытаюсь скопировать таблицу в новую для примера на форуме и… О чудо! Сумма начинает работать. Что за болезнь и как лечить?
Загрузил созданную запросом данные. (Запрос создает доп столбец Возраст, как разницу между датой рождения и датой события, причем формат данных вновь созданного столбца - десятичное число). Загружаются, новый столбец (поле ВозрастСмерти) отображается, но при создании сводной таблицы этот столбец (поле) не отображается. В чем может быть причина? Проблема сохраняется после перезагрузки ноутбука
Здравствуйте, уважаемые эксперты! Прошарив форум, наткнулся на похожую тему с вопросом, что функция ПОЛУЧИТЬ.ДАННЫЕ.СВОДНОЙ.ТАБЛИЦЫ работает для обычной сводной таблицы с переменной (ссылкой на ячейку) и выдает результат #ССЫЛКА! при использовании Power Query (https://www.planetaexcel.ru/forum/index.php?PAGE_NAME=message&FID=1&TID=81819&am...) но ответа не нашел
не подскажете, почему не удается правильно поменять ссылку? ВОзможно ошибка в синтатксисе, т.к. не силен в нем: =ПОЛУЧИТЬ.ДАННЫЕ.СВОДНОЙ.ТАБЛИЦЫ("[Measures].[Сумма по столбцу Предъявленная сумма к оплате]";Лист4!$B$3;"Отделение"; "[СпрОтделенийСоздать].[Отделение].&[Гинеколо]";"[АОБ2_2018 2].[Дата выписки (Месяц)]";"[АОБ2_2018 2].[Дата выписки (Месяц)].&[янв]")
пробовал менять отдельные элементы, такое выражение работает только для строк: =ПОЛУЧИТЬ.ДАННЫЕ.СВОДНОЙ.ТАБЛИЦЫ("[Measures].[Сумма по столбцу Предъявленная сумма к оплате]";Лист4!$B$3;"Отделение"; $A4;"[АОБ2_2018 2].[Дата выписки (Месяц)]";"[АОБ2_2018 2].[Дата выписки (Месяц)].&[янв]")
но со столбцами ([Дата выписки (Месяц)]) не могу разобраться
Здравствуйте, эксперты! есть список операций с временем начала операции в текстовом формате (01:12). нужно сделать отчет по количеству операций по часам суток. Думаю применить сводную таблицу. Использую MS Query для преобразования времени начала операции. Если в MS Query найти час начала операции,то в сводной таблице не могу использовать в качестве заголовков столбцов. Нужно как-то представить час в формате 01:12, чтобы час начала операции последовательно отразился в будущей сводной таблице в формате 01, а то получится 1 (час), 10 (час), 11 и т.д. потом 2 час, 3 час
НЕ подскажете, как имена вкладок в книге вывести в текстовый файл (сделать список вкладок)? Уже сделал вручную, но интересно, есть ли способ , как то автоматизировать данную задачу.
Опрос файлов в папке, обработка, перенос результатов в другой файл (больницы), Работа: Опрос файлов в папке, обработка, перенос результатов в другой файл (больницы)
в формулах обнаружил для себя ранее не встречавшееся использование знака @, например: ЕСЛИ([@заезд]>$A$1;"Бронь";... или =[@Столбец3]+1. Подскажите, где почитать. В поиске на форуме знак @ не отображается
поискал на форуме по ключевым словам "Отрезки дат" безрезультатно. Подскажите, как сделать, чтобы при вводе начала и конца отрезка закрашивались временные отрезки на шкале времени?
Здравствуйте! первый раз обращаюсь за платной помощью. хочу попробовать. Нужно сделать сводный отчет из имеющихся. сумма оплаты - 1000 руб. Оплата через вебмани мне затруднительна, т.к. пользовался один раз и было сложно разобраться. Перевод на банковскую карту из Казахстана в РФ ни разу не пробовал. во всяком случае обычный банковский перевод вполне возможен. Описание и задача во вложении https://cloud.mail.ru/public/FrA7/AFPdr9t3r
Здравствуйте, всех присутствующих с Днем Победы 2017! помогите разобраться с объектной переменной, если есть время в предпоследней строке возникает сообщение "error 13: Type mismatch". Не понимаю, где туплю (( Лист1 реально существует
Код
Sub SvodZp()
'Суммирование зарплаты по программам
Dim BookSource As Workbook
Dim wsListSource As Worksheet
Dim wsListTarget As Worksheet
Dim sListTarget As String 'имя вкладки сводного файла мишени
Dim sListSource As String 'имя вкладки файла источника
Dim sFileSourcePath As String
Dim sFileSourceName As String
Dim iCodeMedorg As Integer 'код медорганизации
Dim sNameMedorg As String
Dim iRowTarget, iRowSource As Integer
Dim iRowBudgetProg As Integer
Dim iSpecific, iSpecificS As Integer
Dim sBudgetProg As String
Dim sngBudgetProgItogo As Single
sFileSourcePath = ThisWorkbook.Path
sFileSourcePath = Left(sFileSourcePath, InStrRev(sFileSourcePath, "\"))
sFileSourceName = Dir(sFileSourcePath & "*.xls")
iRowBudgetProg = 3 'Бюджетные программы кроме сметы
Set wsListTarget = ThisWorkbook.Worksheets(Лист1)
wsListTarget.Activate
Здравствуйте, уважаемые форумчане, просматривал достаточно долго темы, которые могли бы мне помочь в решении вроде бы такой типовой задачи: Мы получаем довольно много плохо структурированных файлов, в которой хотелось бы автоматизировать поиск строки содержащей слово "Итого", в этой строке найти последний заполненный столбец. Данные из этого столбца запомнить и перенести на отдельную вкладку ... На форуме нашел, как найти последнюю заполненную ячейку. А вот по задаче - найти строку со словом "Итого" сложнее. Я так представляю, что нужно использовать ПОИСК или НАЙТИ в каждой ячейке примерного диапазона размером 50*50, начиная с А1. "Итого" может стоять в разных колонках. Задача усложняется тем, что после форматированной линией или сеткой могут реквизиты подписантов (правда без линий сетки таблицы). Полагал, что можно использовать форматирование таблиц в виде сетки, но ничего не нашел. Иногда встречается несколько таблиц со словом ИТОГО, но это можно рассматривать как возможную вариацию, решаемую общим решением. Что посоветуете?
Ранее Workbooks.Open работал. После долгого перерыва вернулся к макросам, и почему то не идет. Прошу помощи в строке "Set BookSource = Workbooks.Open(sFileSourcePath & sFileSourceName)". Там находит ошибку "Run-time error '1004': Method 'Open' of object 'Workbooks' failed"
Код
Sub OprosFiles()
'Опрос файлов в папке
Dim BookSource As Workbook
Dim ListSource As Worksheet
Dim ListTarget As Worksheet
Dim iRowSource As Integer
Dim iRowTarget As Integer
Dim sFileSourcePath As String
Dim sFileSourceName As String
Dim sFileNameBrief As String 'переменная для имени файла
Set ListTarget = ActiveSheet
'Set ListTarget = ThisWorkbook.ActiveSheet
If ThisWorkbook.ActiveSheet.Cells(2, 1) <> "" Then
Call MsgBox("Перечень файлов уже создан!", vbCritical)
Exit Sub
Else
iRowTarget = 2
sFileSourcePath = ThisWorkbook.Path
sFileSourcePath = Left(sFileSourcePath, InStrRev(sFileSourcePath, "\"))
sFileSourceName = Dir(sFileSourcePath & "*.xls")
Do While sFileSourceName <> ""
Set BookSource = Workbooks.Open(sFileSourcePath & sFileSourceName)
Set ListSource = BookSource.Worksheets("имя")
ListTarget.Activate
'Записываем код медорганизации
ListTarget.Cells(iRowTarget, 1) = ListSource.Cells(iRowSource, 5)
'Записываем краткое название медорганизации
ListTarget.Cells(iRowTarget, 2) = ListSource.Cells(iRowSource, 4)
'Записываем имя файла медорганизации
ListTarget.Cells(iRowTarget, 3) = sFileNameBrief
iRowTarget = iRowTarget + 1
BookSource.Close (False)
sFileSourceName = Dir
Loop
End If
End Sub
Изменено: Сергей Ким - 04.05.2017 08:35:56(не использовал кнопку <...>)
в ячейке А1 стоит некое численное значение. в ячейках А2:А5 тоже стоят некие численные значения. Как описать макросом вычитание из А1 суммы(А2:А5) и полученное значение снова ввести в А1 Я так понимаю, что нужно сначала найти численное значение суммы(А2:А5) и потом это значение вычесть из А1 (чтобы избежать циклической ссылки) полученное значение снова записать в А1. Наверное здесь уместно использовать R1C1, но плохо представляю, как это делать. Помогите пожалуйста
Получаю "#ЗНАЧ!" вместо нужного "Истина/Ложь" в выражении "=ПОИСК("округ";A2)>0" что делаю не так? или обрабатывать "#ЗНАЧ!"? Если в искомой ячейке стоит "округ", то формула работает Посоветуйте, пожалуйста!