Я вот тоже поделюсь опытом, вчера захожу в комнату и ребенок вперился в планшет на расстоянии 20 см, это реально ппц глазам через пол года. Хотя сам провожу по 16 часов за компом и стараюсь отходить от него частенько, но все таки больше просто правильно за ним сидя. И своим детям постоянно говорю, моргайте чаще, никогда не будут болеть глаза. Чего и вам советую.
А вообще статья хорошая. Я был у истоков ее написания и комментирования. Для тех людей которым все не нравиться, напишите свое исповедование, и мы тогда тоже будем критиковать, это делать проще всего.
Господа, будьте более учтивы, суть статьи в том, чтоб ребенку уделяли больше внимания, а не то, как строят графики и цифры в мире!..
Алгоритм может и хороший, но теперь у меня каждый день часами крутиться синхронизация, при этом получить ссылку на файл просто нереально. Раньше было лучше.
И сделайте наконец-то возможность выбора начальной папки.
А что именно Вас интересует? Особо если честно не заморачивались, функционал в таблицах понемногу растет, хотя довольно многого не хватает. Но впринципе решить можно все.
Здравствуйте!
Да конечно можно.
В екселе это делается так:
=ДВССЫЛ(СЦЕПИТЬ(ПОДСТАВИТЬ(АДРЕС(1; ЧИСЛСТОЛБ(A1:E1);4);1;"");1)) — выведет данные из ячейки Е1
Ну а дальше уже делайте с ней что необходимо.
Для GD вариант будет такой:
INDIRECT(CONCATENATE(SUBSTITUTE(ADDRESS(1;COLUMNS(A1:Z1);4);1;"");1)) — если в GD например 8 столбцов, то мы получим значение ячейки H1
Но как выяснилось использовать данную формулу можно только как самостоятельную часть, т.е.
например формула =SUM(A1;INDIRECT(CONCATENATE(SUBSTITUTE(ADDRESS(1;COLUMNS(A1:Z1);4);1;"");1))) сложит А1+Н1
но не сработает в случае =SUM(A1:INDIRECT(CONCATENATE(SUBSTITUTE(ADDRESS(1;COLUMNS(A1:Z1);4);1;"");1))) сложения диапазона А1: Н1
Для того чтоб вернуть ее к жизни нужно нашу большую формулу поместить в массив, т.е. заключить ее в круглые фигурные скобки {}
=SUM(A1:{INDIRECT(CONCATENATE(SUBSTITUTE(ADDRESS(1;COLUMNS(A1:Z1);4);1;"");1))})
Удачи!
Спасибо за отзыв.
Целью статьи было небольшое погружение в google JS хотя подобных функций в spredsheet действительно не хватает.
С другой стороны, ограничение по времени работы скриптов и их лимитированное количество запусков заставляет задумываться над более продвинутыми способами, но я уверен, что подобное решение будет востребовано теми, кому не нужны большие объемы и кто просто хочет узнать немного больше о возможных способах решения задач.
Сам же по возможности стараюсь решать такие вопросы в excel, в Spreeadsheet когда других вариантов не остается.
Спасибо за вашу тулзу, будем осваивать.
по ресселерам может быть все, что угодно, как кто договаривается в зависимости от объемов мы не знаем и отталкиваемся от официальной информации на сайтах панелей.
никто не мешает ресселеру купить на год, а продавать по месячно клиентам.
Как пример: www.isplicense.ru/services/ispsystem/ispmanager/
поковырявшись в запросах GD не нашел я что-то там команду union или ее аналог.
Есть pivot но при написании запроса пока что выдает ошибку, хотя выдавать не должен.
Возможно плохо смотрел, но пока…
Может кто помочь?
Благодаря любимому форуму planetaexcel, вот ответ на Ваш вопрос, для excel правда.
Sub t()
Dim sCon$, rs As Object, cn As Object
Dim sSQL$
Set rs = CreateObject(«ADODB.Recordset»)
Set cn = CreateObject(«ADODB.Connection»)
Select Case CLng(Split(Application.Version, ".")(0))
Case Is < 12
sCon = «Provider=Microsoft.Jet.OLEDB.4.0;Data Source=» & ThisWorkbook.FullName _
& ";Extended Properties="«Excel 8.0;HDR=Yes;IMEX=1»";"
Case Is >= 12
sCon = «Provider=Microsoft.ACE.OLEDB.12.0;Data Source=» & ThisWorkbook.FullName _
& ";Extended Properties="«Excel 12.0;HDR=Yes;IMEX=1»";"
End Select ' thnx R Dmitry
sSQL = «SELECT [N], [Дата], [Откуда], -1, [Вид расхода], [Сумма]» _
& " FROM [Лист1$A1:F8] WHERE [Откуда]>""""" _
& " UNION" _
& " SELECT [N], [Дата], [Куда], 1, [Вид расхода], [Сумма]" _
& " FROM [Лист1$A1:F8] WHERE [Куда]>""""" _
& " ORDER BY [N]"
cn.Open sCon
Set rs = cn.Execute(sSQL)
[a30].CopyFromRecordset rs
End Sub
есть один минус у данной формулы, ей нужны еще минимум 2 колонки, для самой формулы и для названия помимо строк результатов. И 2, если в диапазоне присутствует пустая строка, то она тоже появляется в результатах. Но спасибо за подсказку.
А вообще статья хорошая. Я был у истоков ее написания и комментирования. Для тех людей которым все не нравиться, напишите свое исповедование, и мы тогда тоже будем критиковать, это делать проще всего.
Господа, будьте более учтивы, суть статьи в том, чтоб ребенку уделяли больше внимания, а не то, как строят графики и цифры в мире!..
И сделайте наконец-то возможность выбора начальной папки.
Да конечно можно.
В екселе это делается так:
=ДВССЫЛ(СЦЕПИТЬ(ПОДСТАВИТЬ(АДРЕС(1; ЧИСЛСТОЛБ(A1:E1);4);1;"");1)) — выведет данные из ячейки Е1
Ну а дальше уже делайте с ней что необходимо.
Для GD вариант будет такой:
INDIRECT(CONCATENATE(SUBSTITUTE(ADDRESS(1;COLUMNS(A1:Z1);4);1;"");1)) — если в GD например 8 столбцов, то мы получим значение ячейки H1
Но как выяснилось использовать данную формулу можно только как самостоятельную часть, т.е.
например формула =SUM(A1;INDIRECT(CONCATENATE(SUBSTITUTE(ADDRESS(1;COLUMNS(A1:Z1);4);1;"");1))) сложит А1+Н1
но не сработает в случае =SUM(A1:INDIRECT(CONCATENATE(SUBSTITUTE(ADDRESS(1;COLUMNS(A1:Z1);4);1;"");1))) сложения диапазона А1: Н1
Для того чтоб вернуть ее к жизни нужно нашу большую формулу поместить в массив, т.е. заключить ее в круглые фигурные скобки {}
=SUM(A1:{INDIRECT(CONCATENATE(SUBSTITUTE(ADDRESS(1;COLUMNS(A1:Z1);4);1;"");1))})
Удачи!
Целью статьи было небольшое погружение в google JS хотя подобных функций в spredsheet действительно не хватает.
С другой стороны, ограничение по времени работы скриптов и их лимитированное количество запусков заставляет задумываться над более продвинутыми способами, но я уверен, что подобное решение будет востребовано теми, кому не нужны большие объемы и кто просто хочет узнать немного больше о возможных способах решения задач.
Сам же по возможности стараюсь решать такие вопросы в excel, в Spreeadsheet когда других вариантов не остается.
Спасибо за вашу тулзу, будем осваивать.
VLOOKUP(критерий_поиска; массив; индекс; порядок_сортировки)
однако опять же имеет ограничения по количеству ее применений.
Если не разберетесь, пишите, консультирую.
никто не мешает ресселеру купить на год, а продавать по месячно клиентам.
Как пример: www.isplicense.ru/services/ispsystem/ispmanager/
Есть pivot но при написании запроса пока что выдает ошибку, хотя выдавать не должен.
Возможно плохо смотрел, но пока…
Может кто помочь?
Sub t()
Dim sCon$, rs As Object, cn As Object
Dim sSQL$
Set rs = CreateObject(«ADODB.Recordset»)
Set cn = CreateObject(«ADODB.Connection»)
Select Case CLng(Split(Application.Version, ".")(0))
Case Is < 12
sCon = «Provider=Microsoft.Jet.OLEDB.4.0;Data Source=» & ThisWorkbook.FullName _
& ";Extended Properties="«Excel 8.0;HDR=Yes;IMEX=1»";"
Case Is >= 12
sCon = «Provider=Microsoft.ACE.OLEDB.12.0;Data Source=» & ThisWorkbook.FullName _
& ";Extended Properties="«Excel 12.0;HDR=Yes;IMEX=1»";"
End Select ' thnx R Dmitry
sSQL = «SELECT [N], [Дата], [Откуда], -1, [Вид расхода], [Сумма]» _
& " FROM [Лист1$A1:F8] WHERE [Откуда]>""""" _
& " UNION" _
& " SELECT [N], [Дата], [Куда], 1, [Вид расхода], [Сумма]" _
& " FROM [Лист1$A1:F8] WHERE [Куда]>""""" _
& " ORDER BY [N]"
cn.Open sCon
Set rs = cn.Execute(sSQL)
[a30].CopyFromRecordset rs
End Sub
Пример забыли указать, вот и возникают вопросы.
Я когда ухожу от компа всегда сворачиваю все документы. Чтоб дете часом не залезло.
Мой метод отдельный док с формулами, из которого можно нарыть все что необходимо