Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

_Boroda_>> Re: Макрос формирования новой таблицы


Профессиональные приемы работы в Microsoft Excel

Выпуск 46
от 2011-11-25

Подписчиков: 6002

Рассылка сайта "Профессиональные приемы работы в Microsoft Excel"

Основные разделы сайта
Статьи
Форум

Новости сайта в формате RSS
Новые сообщения форума в формате RSS
Читать в Яндекс.Ленте

Порекомендуйте нашу рассылку друзьям

Обратная связь
Поддержка
(форум рассылки)

Наши рассылки:

Рассылки Subscribe.Ru
Православные:
Ежедневные библейские чтения
Смоленский календарь
Для выздоравливающих алкоголиков и наркоманов
Книга "День за днем"
Книга "24 часа в сутки"
Ежедневные размышления анонимного алкоголика
Самообразование:
"Профессиональные приемы работы в Microsoft Excel"

Наши сайты

Профессиональные приемы работы в Microsoft Excel
Excel от новичка до эксперта

bonifatiy.narod.ru
В помощь выздоравливающим алкоголикам и наркоманам

Собор Смоленских святых. Жития, иконы, календарь памятных дат Смоленской епархии.

StudentTools.Narod.Ru Для тех, кто любит учиться

Наши друзья

VBAtips.ru -
подсказки и решения на VBA

wordexpert.ru
Профессиональная работа с текстом

planetaexcel.ru
Когда заешь - все просто

Новые сообщения форума "Профессиональные приемы работы в Microsoft Excel"



_Boroda_>> Re: Макрос формирования новой таблицы
2011-11-17 00:21 http://forum.msexcel.ru/profiles/boroda-u12234.html
А так?


lsg>> Блокирование в статусной строке системных сообщений
2011-11-17 10:15 http://forum.msexcel.ru/profiles/lsg-u16533.html
Уважаемы форумчане,
Мне очень нужно заблокировать системные сообщения, которые появляются в статусной строке с правой стороны.  например, при открытии больших файлов комп виснет и пользователь видит сообщения: "открытие файла ...", "Расчет....%" и т.д.
Команда Application.StatusBar = "" очищает сообщения в статусной строке только с левой стороны, а   с правой - нет.
Помогите, пожалуйста.


kbsa>> как отвязаться от прямых ссылок типа "лист!СтрокаСтолбец" &
2011-11-17 10:37 http://forum.msexcel.ru/profiles/kbsa-u112614.html
День добрый.

Как бы сделать так, что бы получить сумму по интересующей позиции по всей книге не прибегая к суммированию конкретных ячеек на конкретных листах?
т.е. есть наименование позиции, она встречается в произвольных ячейках на других листах, и что хуже всего может там встречаться по нескольку раз. т.е. дать ячейке имя нельзя, так как их несколько не только в книге, но и на листе. Да еще в добавок кол-во и наименование листов постоянно меняется.

Более подробное описание в прикрепленной таблице.

извеняюсь за сумбурную подачу вопроса, старался как мог...
в макросах, к сожалению, не силен


Serge 007>> Re: Связать данные и выставить оценку!!
2011-11-17 13:21 http://forum.msexcel.ru/profiles/serge_007-u25260.html
А если немного "причесать" табличку и заменить Вашу формулу определения групп на нормальную, то так (см. вложение).

Mart222>> Re: Связать данные и выставить оценку!!
2011-11-17 13:21 http://forum.msexcel.ru/profiles/mart222-u74687.html
Немного по другому.

KuklP>> Re: Блокирование в статусной строке системных сообщений
2011-11-17 15:51 http://forum.msexcel.ru/profiles/kuklp-u39713.html
Если ей не надо ничего отображать, просто скройте ее.
Application.DisplayStatusBar = False

Snekich>> Функция по замене букв текста на другие символа (аналогично переводу в транслит)
2011-11-17 16:59 http://forum.msexcel.ru/profiles/snekich-u112201.html
КРАТКО:
Нужна функция.
В функции прописан набор символов, например "абвгдеёжз"
И другой набор символов, например "123456789"
И функция переделывала бы текст, который состоит из первого набора символов, в текст который состоит из второго набора символов соответственно.
Например исходный текст "беда", а результат "2651".

ПОДРОБНО:
В одной ячейке есть текст в кириллице.
Например, "Мама мыла раму."
Как в другой ячейке получить этот текст в однобитном UTF ?
Для приведенного примера будет что-то наподобии:
"D0 9C D0 B0 D0 BC D0 B0 20 D0 BC D1 8B D0 BB D0 B0 20 D1 80 D0 B0 D0 BC D1 83."

Есть словарь как кириллицу (и прочее) в UTF перевести
словарь

Собственно нужную "выдержку" из этого словаря с скопировал отдельно в файл.
Плюс в файле есть функция по переводу текста в транслит.
Думаю перевод в UTF будет похожим, но в силу своего небольшого опыта я не знаю как переделать эту функцию.

Может что-то наподобии (эта не работает, надо ...

Sanyaiwlev>> Возможно ли сделать такое? из Excell в Word
2011-11-17 19:32 http://forum.msexcel.ru/profiles/sanyaiwlev-u112682.html
Добрый день!
Вопрос в следующем: есть таблица с данными в экселе, необходимо из определённых её ячеек вытащить данные и вставить в нужные поля в Ворд. На рисунках я пометил эти необходимые поля овалами разных цветов.
Возможно ли автоматизировать такой процесс полностью? или частично? Подскажите пожалуйста.

Shartist>> Re: Помогите с макросом для следующей задачи (добавление списка новой продукции)...
2011-11-17 19:47 http://forum.msexcel.ru/profiles/shartist-u111731.html
Да, конечно, без примера тут никак, тем более для макроса, где очень важно расположение ячеек.
Если значения в списках на листе 1 нет дубликатов, то можно обойтись и формулой проверки, потом поставить фильтр на второй столбец (на значение добавить) и скопировать значения из первого столбца в список на листе2


Спасибо большое за идею. Пока помогает. Просто списки толком не готовы, чтобы представить для примера да и корректироваться будут. Мне нужно было на простом примере сам принцип действия или макрос, который я бы потом подкорректировала. Рада любой идее, так что, еще раз спасибо.

Mailo>> Re: Макрос формирования новой таблицы
2011-11-17 21:15 http://forum.msexcel.ru/profiles/mailo-u92982.html
А так?
А так все отлично.
Есль еще одна маленькая просьба.Не принципиально, но хотелось бы автоматизировать еще одну скучную задачку.В нашей таблице Akt_sverki в столбцах G,H,I значения часто бывают пустые(если клиент не оплатил работу).Но высвечиваются они как "0".А в столбце H вообще высвечивается как 12:00:00 AM(так как фармат ячейки"дата").А хотелось бы ,что бы если эти ячейки были не заполнены, то в ячейках не высвечивались нули, а было пусто.То есть ,как я понимаю,в конце макроса надо дописать код,который проверял бы значения в столбцах G,H,I и если они = 0, то удалять собержимое ячейки.Ну или я слишком мудрю)Может есть и проще способ,но вот беда-он мне не ведом))))
Буду очень вам признателен,если поможите в решении и этой задачи.
Спасибо.
ЗЫ:для наглядности и большей ясности прекрепляю файл с образцом.См. лист Akt_sverki


Snekich>> Re: Функция по замене букв текста на другие символа (аналогично переводу в транслит)
2011-11-17 21:26 http://forum.msexcel.ru/profiles/snekich-u112201.html
Public Function ToUTF(ByVal txt As String) As String
iRussianLower$ = "абвгдеёжзийклмнопрстуфхцчшщъыьэюя"
iTranslit = Array("", _
"d0 b0 ", "d0 b1 ", "d0 b2 ", _
"d0 b3 ", "d0 b4 ", "d0 b5 ", _
"d1 91 ", "d0 b6 ", "d0 b7 ", _
"d0 b8 ", "d0 b9 ", "d0 ba ", _
"d0 bb ", "d0 bc ", "d0 bd ", _
"d0 be ", "d0 bf ", "d1 80 ", _
"d1 81 ", "d1 82 ", "d1 83 ", _
"d1 84 ", "d1 85 ", "d1 86 ", _
"d1 87 ", "d1 88 ", "d1 89 ", _
"d1 8a ", "d1 8b ", "d1 8c ", _
"d1 8d", "d1 8e ", "d1 8f ")

Dim result$, char$, newChar$, charIndex%
For i% = 1 To Len(txt)
char = Mid(txt, i, 1)
charIndex = InStr(1, iRussianLower, char, vbTextCompare)
If (charIndex >= 1) Then
newChar = iTranslit(charIndex)
Else
newChar = char
End If
result = result & newChar
Next i
ToUTF$ = result
End Function

Ошибку исправил. Если есть более удобные вырианты, то давайте обсудим

_Boroda_>> Re: Макрос формирования новой таблицы
2011-11-17 21:59 http://forum.msexcel.ru/profiles/boroda-u12234.html
используйте [url=http://msexcel.ru/content/view/116/2/]условное_форматирование[/url] (столбец G) или формат ячейки (столбец Н)

reader2007>> Re: Координаты мах точки полиноминального тренда
2011-11-17 22:37 http://forum.msexcel.ru/profiles/reader2007-u111418.html
То что надо, большое спасибо!!!!

Snekich>> Re: Возможно ли сделать такое? из Excell в Word
2011-11-17 22:52 http://forum.msexcel.ru/profiles/snekich-u112201.html
думаю, это можно как-то попробовать через метки в ворде (присвоить имя).
Знаю есть программы, которые автоматом вставляют в документы в ворде информацию при помощи заранее раставленных меток.


machodg>> Re: Получение значение формулы без записи ее в ячейку
2011-11-17 22:57 http://forum.msexcel.ru/profiles/machodg-u16265.html
Огромное спасибо!!
Во всем разобрался
Использую этот код в цикле:

Sub EXP()
    Sheets("Sheet2").Select
    r1 = Sheets("Sheet1").Cells(5, 1).End(xlDown).Row
    r2 = Sheets("Sheet2").Cells(5, 1).End(xlDown).Row
    With Sheets("Sheet1"): Set c = .Range(.[A5], .[A5].End(xlDown)): End With
   
    For i = 5 To r2 Step 1
      Cells(i, 3) = WorksheetFunction.SumIf(Range("Sheet1!$A$5:$A$" & r1), Evaluate("$A" & i), Range("Sheet1!$D$5:$D$" & r1))
      a = Evaluate("IF(Sheet1!" & c.Address & "=Sheet2!A" & CStr(i) & ",IF(Sheet1!" & c.Offset(, 1).Address & "=Sheet2!$F" & _
           CStr(i) & ",Sheet1!" & c.Offset(, 2).Address & "))")
      Cells(i, 4) = Application.Sum(a)
    Next i
   
End Sub

Работает прекрасно
Желаю всем удачи

Wasilic>> Re: Макрос формирования новой таблицы
2011-11-17 23:35 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Сервис > Параметры > Вид  > Нулевые значения -снять галку.
Разве не подходит?

Wasilic>> Re: Функция по замене букв текста на другие символа (аналогично переводу в транслит)
2011-11-18 00:53 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Не занимался я этим, но вижу такой вариант.

Mart222>> Re: Возможно ли сделать такое? из Excell в Word
2011-11-18 07:26 http://forum.msexcel.ru/profiles/mart222-u74687.html
Выдержка из вордовского хелпа:

Когда нужно создать динамическую связь между содержимым данного документа и содержимым книги Excel, вставьте это содержимое как объект. В отличие от процедуры обычной вставки содержимого (нажатием клавиш CTRL+V) вставка его как связанного или внедренного объекта позволяет работать с ним в исходной программе.

1.Откройте документ Word и лист Excel, содержащий данные, из которых нужно создать связанный или внедренный объект.
2.Переключитесь в Excel и выделите необходимый полный лист, диапазон ячеек или диаграмму.
3.Нажмите сочетание клавиш CTRL+C.
4.Переключитесь в документ Word и щелкните то место, где эти данные должны быть отображены.
5.На вкладке Начальная страница в группе Буфер обмена щелкните стрелку в группе Вставить, а затем выберите пункт Специальная вставка.




Snekich>> Re: Функция по замене букв текста на другие символа (аналогично переводу в транслит)
2011-11-18 07:30 http://forum.msexcel.ru/profiles/snekich-u112201.html
Не занимался я этим, но вижу такой вариант.
Кстати хороший вариант, главное универсальный.

Snekich>> Ошибка при загрузке данных из Веба если сайт не существует. Как пропустить?
2011-11-18 08:01 http://forum.msexcel.ru/profiles/snekich-u112201.html
Есть макрос:

Sheets("Name").Select
        With ActiveSheet.QueryTables.Add(Connection:="URL;" & Sheets("Ссылки").Range("A1"), Destination:=Range("В1"))
.Name = "PRO"
        .FieldNames = True
        .RowNumbers = False
        .FillAdjacentFormulas = False
        .PreserveFormatting = True
        .RefreshOnFileOpen = False
        .BackgroundQuery = True
        .Refreshstyle="xlInsertDeleteCells"
        .SavePassword = False
        .SaveData = True
        .AdjustColumnWidth = True
        .RefreshPeriod = 0
        .WebSelectionType = xlSpecifiedTables
        .WebFormatting = xlWebFormattingNone
        .WebTables = "2"
        .WebPreFormattedTextToColumns = True
        .WebConsecutiveDelimitersAsOne = True
        .WebSingleBlockTextImport = False
        .WebDisableDateRecognition = False
        .WebDisableRedirections = False
        .Refresh BackgroundQuery:=False
    End With

Если адрес указанный в ячейке Sheets("Ссылки").Range("A1") не существует, то макрос...

sma80>> Re: как отвязаться от прямых ссылок типа "лист!СтрокаСтолбец" &
2011-11-18 08:45 http://forum.msexcel.ru/profiles/sma80-u110219.html
По мне так в примере не хватает исходных данных, хотя бы примерно как на других листах располагается информация..

FUGA>> Re: Связать данные и выставить оценку!!
2011-11-18 09:14 http://forum.msexcel.ru/profiles/fuga-u112320.html
Парни!!! Ето чудо какое-то!! Мир EXCEL оказывается гораздо шире, в моём представлении это было проще, всё работает, Каждый пример хорош по своему!!!! Огромное Вам спасибо)))

Aqil_f>> Re: Копирование данных с помощью макроса в другую книгу
2011-11-18 09:29 http://forum.msexcel.ru/profiles/aqilf-u14854.html
   Я проверил и на 2003. Разница только в том что, 1-раз макрос нормально работает. Когда 2-й раз запускаеш макрос "испортится" Itoq.xls. Если копировать Itoq.xls заного на этой папку, тогда макрос нормально работает.

ShAM>> Re: Ошибка при загрузке данных из Веба если сайт не существует. Как пропустить?
2011-11-18 09:30 http://forum.msexcel.ru/profiles/sham-u106530.html
Код:
On Error Resume Next
Не подойдет?


bzzzu>> Re: Автоматический вывод спарклайнов в excel 2010 с помощью vba
2011-11-18 10:00 http://forum.msexcel.ru/profiles/bzzzu-u85011.html
Продолжу тему.
Макрос который при изменении сводной таблицы выводит новые спарклайны работает отлично.
Возникла проблема с удалением старых спарклайнов, а точнее с нахождением их местоположения.

Файл прилагается, код для удаления рабочий и закомментирован, так как не знаю как найти Sp1.

[code]Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
    Application.ScreenUpdating = False

a = 4
c = WorksheetFunction.CountA([4:4])
r = Range("A" & Rows.Count).End(xlUp).Row

    'Sp1 = Range(...).Address

    'With ActiveSheet.PivotTables("СводнаяТаблица3")
    '    If Target.Columns(2).Column = .TableRange2.Columns(2).Column Then
    '    Sp1.Select
    '    Selection.SparklineGroups.ClearGroups
    '    End If
    'End With

c = WorksheetFunction.CountA([4:4])
r = Range("A" & Rows.Count).End(xlUp).Row
   
Set sg = Range(Cells(a + 1, c + 1), Cells(r, c + 1))
b = Range(Cells(a + 1, 2), Cells(r, c)).Address

Set slg = sg.SparklineGroups.Add(XlSparkType.xlSparkColumn, b)
Rang...

Snekich>> Re: Ошибка при загрузке данных из Веба если сайт не существует. Как пропустить?
2011-11-18 10:03 http://forum.msexcel.ru/profiles/snekich-u112201.html
Код:
On Error Resume Next
Не подойдет?


On Error GoTo Next1
Sheets("Name").Select
        With ActiveSheet.QueryTables.Add(Connection:="URL;" & Sheets("Ссылки").Range("A1"), Destination:=Range("В1"))
.Name = "PRO"
        .FieldNames = True
        .RowNumbers = False
        .FillAdjacentFormulas = False
        .PreserveFormatting = True
        .RefreshOnFileOpen = False
        .BackgroundQuery = True
        .Refreshstyle="xlInsertDeleteCells"
        .SavePassword = False
        .SaveData = True
        .AdjustColumnWidth = True
        .RefreshPeriod = 0
        .WebSelectionType = xlSpecifiedTables
        .WebFormatting = xlWebFormattingNone
        .WebTables = "2"
        .WebPreFormattedTextToColumns = True
        .WebConsecutiveDelimitersAsOne = True
        .WebSingleBlockTextImport = False
        .WebDisableDateRecognition = False
        .WebDisableRedirections = False
        .R...

kbsa>> Re: как отвязаться от прямых ссылок типа "лист!СтрокаСтолбец" &
2011-11-18 10:46 http://forum.msexcel.ru/profiles/kbsa-u112614.html
На других листах данные в произвольном прядке, но везде сохраняются наменования столбцов, т.е. столбец "А" пустой, "В" наименование, "С" позиц. обознач., "D" кол-во на изделие, "Е" кол-во на заказ.

Valll>> Re: Palo-server
2011-11-18 11:01 http://forum.msexcel.ru/profiles/valll-u28591.html
Пожалуйста, какие возможности у PALO!
В чём его преимущество перед консолидацией?
В чём его преимущество перед Сводной таблицей?
В чём его преимущество перед MS Query?

Есть ли задачи (какие) где PALO, единственный инструмен реализации?

Спасибо.

Sanyaiwlev>> Re: Возможно ли сделать такое? из Excell в Word
2011-11-18 11:33 http://forum.msexcel.ru/profiles/sanyaiwlev-u112682.html
нееет, вы не так меня поняли видимо. В ворде есть как бы шаблон (или как это назвать не знаю) т.е. то что повторяется и идёт вниз:
ФИО ...
дата ...
адрес ...

ФИО ...
дата ...
адрес ...

ФИО ...
дата ...
адрес ...

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


Vladimir Shatk>> Re: Автоматический вывод спарклайнов в excel 2010 с помощью vba
2011-11-18 11:44 http://forum.msexcel.ru/profiles/vladimir_shatk-u111859.html
Может вот так подойдет?
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
    Dim sp1 As SparklineGroup
    Application.ScreenUpdating = False

a = 4
c = WorksheetFunction.CountA([4:4])
r = Range("A" & Rows.Count).End(xlUp).Row
    For Each sp1 In Range(Cells(a, 1), Cells(r, Columns.Count)).SparklineGroups
        sp1.Delete
    Next
    'sp1= Range(...).Address

    'With ActiveSheet.PivotTables("ÑâîäíàÿÒàáëèöà3")
    '    If Target.Columns(2).Column = .TableRange2.Columns(2).Column Then
    '    Sp1.Select
    '    Selection.SparklineGroups.ClearGroups
    '    End If
    'End With

c = WorksheetFunction.CountA([4:4])
r = Range("A" & Rows.Count).End(xlUp).Row
   
Set sg = Range(Cells(a + 1, c + 1), Cells(r, c + 1))
b = Range(Cells(a + 1, 2), Cells(r, c)).Address

Set slg = sg.SparklineGroups.Add(XlSparkType.xlSparkColumn, b)
Range(Cells(a + 1, c + 1), Cells(r, c + 1)).SparklineGroups.Item(1).Points.Highpoint.Visible = True
Range(Cells(a + 1, c + 1), Cells(r, c ...

Wasilic>> Re: Копирование данных с помощью макроса в другую книгу
2011-11-18 11:54 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Проверьте еще раз именно эти файлы.

Не забудьте поменять расширение в макросах XLS  на XLSX
или проверте сразу на 2003-м.

Виктория Зуева>> Re: Вставка строк (с сохранением формулы) со смещением общего итога вниз
2011-11-18 12:05 http://forum.msexcel.ru/profiles/buka3-u2668.html
Вариант для исходного примера:
Формула для ячейки I25 (картинка)

=СУММ($H$9:ДВССЫЛ("R[-1]C[-1]"Подмигивающий)



Wasilic>> Re: как отвязаться от прямых ссылок типа "лист!СтрокаСтолбец" &
2011-11-18 12:10 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Так выложите пример с данными на 3-х, 4-х листах.
А то, пишите что в произвольном порядке и утверждаете что в одноименных
столбцах. А нам это видно? Или Вам это трудно?

ShAM>> Re: Ошибка при загрузке данных из Веба если сайт не существует. Как пропустить?
2011-11-18 13:14 http://forum.msexcel.ru/profiles/sham-u106530.html
Цитировать
На конце Next1: двоеточие надо ставить?
Да.

Цитировать
Range("В1")
менялись в соответствии со значением i
Range("В" & i) попробуйте (если правильно понял).


kbsa>> Re: как отвязаться от прямых ссылок типа "лист!СтрокаСтолбец" &
2011-11-18 13:21 http://forum.msexcel.ru/profiles/kbsa-u112614.html
Исправляюсь.

Aqil_f>> Re: Копирование данных с помощью макроса в другую книгу
2011-11-18 14:30 http://forum.msexcel.ru/profiles/aqilf-u14854.html
Спасибо,  Wasilic.
Сейчас все правильно работает.

Только в реальном файле струкруры немного другое (02.xls) и надо копировать только те записи где столбец "А" не пусто.

Извиняюсь что сначало не написал об этом.

 

 
 


Snekich>> Проверка данных из Веба на соответствие заданному условию без вставки их на лист
2011-11-18 15:47 http://forum.msexcel.ru/profiles/snekich-u112201.html
Есть несколько тысяч интернет страниц с однотипными таблицами состоящими из 5 столбцов и 2 строк (включая заголовок).
В 5 столбце содержится текст.

Есть макрос, который загружает таблицу по заданному адресу в Ексель в диапазон С1:G2 (5 столбцов, 2 строки).

Sub FindAdress()
On Error Resume Next
    Sheets("Поиск").Select
    With ActiveSheet.QueryTables.Add(Connection:="URL;" & Sheets("Ссылки").Range("F" & i), Destination:=Range("C1"))
        .Name = "Faind"
        .FieldNames = True
        .RowNumbers = False
        .FillAdjacentFormulas = False
        .PreserveFormatting = True
        .RefreshOnFileOpen = False
        .BackgroundQuery = True
        .Refreshstyle="xlInsertDeleteCells"
        .SavePassword = False
        .SaveData = True
        .AdjustColumnWidth = True
        .RefreshPeriod = 0
        .WebSelectionType = xlSpecifiedTables
        .WebFormatting = xlWebFormattingNone
        .WebTables = "46"
        .WebPreFormattedTextToColumns = True
        .WebConse...

lsg>> Re: Блокирование в статусной строке системных сообщений
2011-11-18 16:09 http://forum.msexcel.ru/profiles/lsg-u16533.html
Спасибо! Улыбка

lacrima88>> подскажите как рассчитать вариацию, дисперсию
2011-11-18 16:20 http://forum.msexcel.ru/profiles/lacrima88-u112809.html
помогите решить задачу по эконометрике   
Представлены данные о годовом располагаемом доходе (DPI) и расходах на потребление (C).

DPI     2508    2572   2408   2522   2700   2531   2390   2595   2524   2682
C         2406    2464   2336   2281   2641   2385   2297   2416   2460   2549

Рассчитать средние значения, вариацию, дисперсию DPI  и C.
Оценить взаимную зависимость DPI  и C, рассчитав коэффициенты ковариации и корреляции, дать их интерпретацию.
Рассчитать коэффициенты линейной регрессии. В Exel построить графики зависимости C от DPI  и линию линейной регрессии.
за ранее спасибо!

sma80>> Re: как отвязаться от прямых ссылок типа "лист!СтрокаСтолбец" &
2011-11-18 16:34 http://forum.msexcel.ru/profiles/sma80-u110219.html
Как-то ваш файлик второй только запутывает, не особо понятно куда и чего надо суммировать:)
Посмотрите, сделала просто по вашему описанию и по первому файлику, может подойдет. Условия расчета - лист, в котором данные сводятся должен стоять первым, а суммирование идет из всех листов, кроме этого первого.

Mailo>> Re: Макрос формирования новой таблицы
2011-11-18 18:26 http://forum.msexcel.ru/profiles/mailo-u92982.html
Сервис > Параметры > Вид  > Нулевые значения -снять галку.
Разве не подходит?
Действительно подходит.спасибо

Wasilic>> Re: Копирование данных с помощью макроса в другую книгу
2011-11-18 19:33 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Цитировать
Извиняюсь что сначало не написал об этом.
И я не телепат Улыбка

voleg>> Сводные таблицы и базы данных: PivotReports
2011-11-19 08:22 http://forum.msexcel.ru/profiles/voleg-u112925.html
Привет.
Разработал приложение PivotReports

Позволяет:
∙   Настроить соединение с базами данных OLEDB: MSSQL, Oracle, MySql, Access и т.д. Указать SQL запрос.
∙   Сгенерировать сводную таблицу, настроить несколько ее видов и далее их использовать для аналитики.
∙   Поддерживается OLAP таблицы.

Сайт: http://pivotreports.com
Буду рад услышать отзывы.

Snekich>> Как загрузить несколько файлов TXT, введя настройки только 1 раз?
2011-11-19 08:32 http://forum.msexcel.ru/profiles/snekich-u112201.html
Есть не более 12 *.txt файлов (фин.отчетность за каждый месяц)
Каждый представляет из себя некую "шапку" и таблицу под ней с отчетностью.
 
Выбор файлов и загрузку первого файла я знаю как сделать.

А как сделать так, что бы при загрузке в ексель первого файла он спрашивал настройки загрузки (окошко, где выбираешь как разбивать по столбцам), а последующие файлы загружались автоматически по таким же настройкам?
(каждый файл на отдельной странице)

Эти настройки хранятся в строке:
       .TextFileFixedColumnWidths = Array(1, 7, 1, 24, 1, 30, 1, 6, 1, 18, 1, 18, 1, 18, 1, 18, 1, _
        18, 1, 18, 1, 18, 1, 18, 1, 18, 1, 18, 1, 18, 1, 18, 1)

Вот как в первом файле их выбрать вручную и "распространить" на остальные файлы?


P.S.

предполагаю, что нужно задать переменную и настройки произвести так:
.TextFileFixedColumnWidths = MyFixed
Это уже сделал в приложенном файле.

Только как теперь остается вопрос, как вызвать окошко, в котором разбивается текст на столбцы и записать результата этого...

sergo44441>> Re: изменение источника данных сводной таблицы
2011-11-19 08:36 http://forum.msexcel.ru/profiles/sergo44441-u3995.html
А как быть в 2007 версии?
Приложу пример. методика очень важна.

Smarty_kazan>> Ежемесячное обновление с другого файла.
2011-11-19 09:03 http://forum.msexcel.ru/profiles/smartykazan-u110305.html
Добрый день.

Никак не могу решить задачу и в то же время проблему.это ежемесячное обновление множества файлов с одного файла.
Выкладываю пример.там показал что да как.
Спасибо за помощь и отклик, заранее.

Serge 007>> Re: изменение источника данных сводной таблицы
2011-11-19 10:00 http://forum.msexcel.ru/profiles/serge_007-u25260.html
А как быть в 2007 версии?
Тёзка, мастер сводных работает одинаково во всех версиях Excel Улыбка

ЗЫ В xlsx его предварительно необходимо вывести на ПБД: Настройка ПБД - Все команды - мастер сводных таблиц и диаграмм.

Valll>> Re: Сводные таблицы и базы данных: PivotReports
2011-11-19 12:07 http://forum.msexcel.ru/profiles/valll-u28591.html
У меня нет слов... я захлёбываюсь... Потрясная штука! Молодец!


Это значит менеджер сможет подключиться к своему интернет-магазину (MySQL) и анализировать данные в он-лайн режиме?

А можно напроситься на такое...

В таблице Эксель в ячейке А1 имеется число 1000. В ячейке А2=2000.
При открытии этого файла с таблицей, макрос находящийся в этом файле, отправляет через интернет на мой сервер следующую информацию:

1. Содержимое ячейки А1
2. Содержимое ячейки А2
3. IP-адрес отправителя
4. Дата/время открытия файла
5. Дата/время закрытия файла


На сервере надо сделать соответствующую базу данных MySQL и простенький сайтик, на котором бы в таблице показывалась бы текущая информация. Ну и статистики немного: откуда IP, сколько сейчас загружено файлов, По содержимому ячеек.

Да, естественно, что владелец знает о наличие макросов в файле, защита от макровимрусов сброшена, и к интернету он подключён. Но вот все служебные сообщения при стыковке с сервером надо нейтрализовать.

Так...

Alexandr1>> Re: поиск по базе данных
2011-11-19 17:00 http://forum.msexcel.ru/profiles/alexandr1-u71912.html
Спасибо, возможно макрос действительно Ваш, ведь брал его с этого форума

mykky mykky>> Помогите настроить Мастер шаблонов в Excel 2010
2011-11-19 18:30 http://forum.msexcel.ru/profiles/nikolay-u1124.html
Всем привет!

В Excel 2003 была надстройка Мастер шаблонов. Та самая, что связывала документ с базой данных Excel. Она называлась "Wztemplt.xla".

Как использовать эту надстройку в Excel 2010? У меня эффект такой. Если шаблон создать в Excel 2003, он работает в 2010. При создании шаблона в Excel 2010, он его СОЗДАЕТ. Но при сохранении файла в базу данных записей не добавляет.
Поснимал все параметры безопасности, -- ничего не поменялось.

В чем может быть проблема? Какие есть идеи?

Всем спасибо.

Snekich>> Re: Как загрузить несколько файлов TXT, введя настройки только 1 раз?
2011-11-19 18:58 http://forum.msexcel.ru/profiles/snekich-u112201.html
Нашел способ.
Первый файл надо открыть вот так и получим две переменные с нужными настройками

Dim MyFixed(), MyColumn()
For Each x In ActiveSheet.QueryTables
    x.Delete
Next
If Application.Dialogs(xlDialogImportTextFile).Show Then
    With ActiveSheet.QueryTables(1)
        MyColumn = .TextFileColumnDataTypes
        MyFixed = .TextFileFixedColumnWidths
    End With
Else: MsgBox "Не выбран"
End If

mykky mykky>> Re: Помогите настроить Мастер шаблонов в Excel 2010
2011-11-19 20:06 http://forum.msexcel.ru/profiles/nikolay-u1124.html

Еще раз привет всем знатокам Excel!
Дополнительно к вопросу.
Создавал файлы и в старом, и в новом форматах.
В 2010-м отключил безопасность, всю!!!
Установил надстройку. активировал. она есть.
Создаю шаблон в 2010-м. все нормально.
Создаю по шаблону документ, сохраняю. В этот момент должно появиться окно записи в базу. Окна нет.
Открываю этот шаблон в 2003-м -- тоже не работает. Просто сохраняет файл.

создаю шаблон в 2003-м. Работает.
Открываю этот шаблон в 2010-м. все работает, база обновляется.

И что где перенастроить, - непонятно. Задрало, откровенно говоря...

Какие есть идеи?

Всем спасибо.

Serge 007>> Re: Помогите настроить Мастер шаблонов в Excel 2010
2011-11-19 21:40 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Какие есть идеи?
Вы знаете, я шаблонами не пользуюсь, а с надстройками (не xla, а xlam) проблем нет.
Так что мыслей по этому поводу нет, написал потому как никто вроде не отвечает...

ЗЫ Да и на планете не отвечают тоже...

morpher>> Re: именительный >> дательный
2011-11-19 22:58 http://forum.msexcel.ru/profiles/morpher-u112841.html

Нашел вариант такой http://www.morpher.ru/Products/XLL/ но за него хотят денег.

Как автор этого решения предлагаю первым 10 обратившимся надстройку для склонения ФИО и должностей совершенно БЕСПЛАТНО (для личного использования).  Заполните форму на странице http://morpher.ru/Contacts.aspx, укажите промо-код "PROTRICKS1111" и вашу версию Excel.



Serge 007>> Re: именительный >> дательный
2011-11-19 23:08 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Как автор этого решения предлагаю первым 10 обратившимся...
Чё-то мне такой развод не нравится. Тему закрываю.

mykky mykky>> Re: Помогите настроить Мастер шаблонов в Excel 2010
2011-11-20 05:23 http://forum.msexcel.ru/profiles/nikolay-u1124.html
Да ото ж... Молчат на "планете"...
Улыбка

Все равно спасибо за участие.
Улыбка Улыбка

Samson>> Автоматический переход с одной ячейки на определенную другую
2011-11-20 13:20 http://forum.msexcel.ru/profiles/samson-u112287.html
Всем привет,

Каким образом возможно осуществить автоматический переход  после заполнения с одной ячейки на определенную другую.

Например: стою на А11, заполнил А11 и нажал Enter, далее происходит автоматический переход не на А12(например), а по заданию на G22, далее заполняю G22, Enter и попадаю например на С33, и так далее.
Т.е. прыжки происходят с определенных ячеек на  конкретные другие.



Serge 007>> Re: Автоматический переход с одной ячейки на определенную другую
2011-11-20 13:45 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Либо макросом, либо заблокировав ячейки на которые не нужно попадать.

Samson>> Re: Автоматический переход с одной ячейки на определенную другую
2011-11-20 13:54 http://forum.msexcel.ru/profiles/samson-u112287.html
всё по макросам на одноименный форум ?!

Samson>> Автоматический переход с одной ячейки на определенную другую
2011-11-20 13:56 http://forum.msexcel.ru/profiles/samson-u112287.html
Всем привет,

Каким макросом возможно осуществить автоматический переход  после заполнения с одной ячейки на определенную другую.

Например: стою на А11, заполнил А11 и нажал Enter, далее происходит автоматический переход не на А12(например), а по заданию на G22, далее заполняю G22, Enter и попадаю например на С33, и так далее.
Т.е. прыжки происходят с определенных ячеек на  конкретные другие.

Перенесено из раздела "Проекты VBA"
_Boroda_


_Boroda_>> Re: Автоматический переход с одной ячейки на определенную другую
2011-11-20 15:32 http://forum.msexcel.ru/profiles/boroda-u12234.html
всё по макросам на одноименный форум ?!
Все не так строго. Вашу тему из раздела по макросам перенес сюда.

Посмотрите вложенный файл. В первом листе список адресов для прыжков, во втором - сами скАчки.

a11769729>> Лист Excel на рабочем столе (типа актив десктоп) как сделать?
2011-11-20 16:01 http://forum.msexcel.ru/profiles/a11769729-u113116.html
Лист Excel на рабочем столе (типа актив десктоп) как сделать?

Samson>> Re: Автоматический переход с одной ячейки на определенную другую
2011-11-20 19:01 http://forum.msexcel.ru/profiles/samson-u112287.html
Благодарю, _Boroda_ !!!



bzzzu>> Re: Автоматический вывод спарклайнов в excel 2010 с помощью vba
2011-11-21 09:14 http://forum.msexcel.ru/profiles/bzzzu-u85011.html
Спасибо большое)
Работает)  Веселый

yurs>> При выделении ячейки поиск значения в списке. Как?
2011-11-21 10:02 http://forum.msexcel.ru/profiles/yurs-u113230.html
Есть проблема. Как реализовать ?
Таблица с имеющимся товаром. Это первые несколько столбцов.Надо сделать след.
несколько столбцов ,отдельных от первых ,в виде списка,где строка как запись базы данных.
И при выделении строки в первых столбцах содержимое ячейки сравнивалось с записями списка и список открывал бы нужную запись.Можно такое сотворить ?
Пример. Первые столбцы - название, номер,цена,штук в наличии.
След. столбцы (список) - название, производитель,реквизиты.
При выделении строки в первых столбцах из списка в след. столбцах выбиралась бы запись,где название совпадало бы с названием из выделенной строки.

ShAM>> Re: При выделении ячейки поиск значения в списке. Как?
2011-11-21 10:21 http://forum.msexcel.ru/profiles/sham-u106530.html
Цитировать
Есть проблема. Как реализовать ?
Таблица с имеющимся товаром...
А у других такой проблемы нет. Нет таблицы - нет проблем.


Mart222>> Re: Возможно ли сделать такое? из Excell в Word
2011-11-21 14:39 http://forum.msexcel.ru/profiles/mart222-u74687.html
Возможно все таки это нужно? Имеем таблицу в Экселе и ссылки на нее в Вордовском доке, при измении исходной таблицы, данные по ссылке автоматически обновляются. Чтобы заработало, необходимо при первом запуске Вордовского дока обновить связи: Кнопка Офис - Подготовить - Изменить ссылки на файлы - Сменить источник - Указать путь к Экселевскому доку с исходной таблицей.

Wasilic>> Re: При выделении ячейки поиск значения в списке. Как?
2011-11-21 18:28 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Можно такое сотворить ?
Попробуем, если прочитаете правила форума.

abb269>> разделитель csv в MS Query
2011-11-21 20:48 http://forum.msexcel.ru/profiles/abb269-u110088.html
Здравствуйте,
Есть такая вот проблема. Есть два больших файла csv с разделителями ";". Нужно сделать простенький sql-запрос к этим данным, который вполне по силам MS Query.
Но микросовтовский текстовой драйвер понимает исключительно разделитель ",".
Нет ли какого-то изящного решения по скармливанию драйверу точки с запятой?
Заранее спасибо

Bolshoiman>> вычесть из целого числа процент
2011-11-22 08:55 http://forum.msexcel.ru/profiles/bolshoiman-u26486.html
Здравствуйте! Извините за такой вопрос - вылетают из головы простые движения-- Требуется : 500 - 12% - 5% = 418
Не помню как реализовать в программе. Спасибо заранее!


iron priest>> Re: вычесть из целого числа процент
2011-11-22 09:06 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
=500*(1-12%)*(1-5%)

voleg>> Re: Сводные таблицы и базы данных: PivotReports
2011-11-22 09:27 http://forum.msexcel.ru/profiles/voleg-u112925.html
Цитировать
Это значит менеджер сможет подключиться к своему интернет-магазину (MySQL) и анализировать данные в он-лайн режиме?

Да, если открыт доступ к Mysql и поставлен odbc connector http://www.mysql.com/downloads/connector/odbc/
по умолчанию в винде нет драйвера подключения к mysql.

Думаю отправлять напрямую в базу будет сложно. лучше отправлять на страницу с параметрами, например http://host/service.cgi?open_time=01.01.2011&Cell1=100&Cell2=200 а страница(скрипт) сам вставит в базу то что нужно. т.е. программирование на VBA будет минимальным

trututu>> функция ОТБР и работа с датами
2011-11-22 10:02 http://forum.msexcel.ru/profiles/trututu-u113380.html
Доброго времени суток!

Был бы очень благодарен если бы кто-нибудь помог бы решить пару проблем,так как в экселе я не эксперт,а бьюсь уже целый день.

Trading Journal - мой вариант.
Forex Trade Progress - вариант журнала часть вещей которого я хотел бы видеть в своём журнале.

1.Чем можно было бы заменить функцию ОТБР так как по всей видимости она не может отбросить цифры после запятой в вычислениях.Я уже попытался но ответ выдаётся не правильный.(Файл Trading Journal - мой вариант,можно посмотреть List2,столбец F )Значения должны быть как в  фаиле Forex Trade Progress(Raw Data - столбец G)

2.Я хотел бы что бы значения которые заносились в мой журнал в List1 в столбцах O и Q(Profit /Loss in $ и Profit Loss in Pips)затем согласно датам заносились бы в List2.
То есть что бы у меня был отчёт какая у меня прибыль в конце дня(List2 столбец G),конце недели(List2 столбец P) и месяца(List2 столбец Y)

и так же с колличеством пипсов которые будут сумироватся в конце дня и добавлятся когда законч...

Stopp>> Поиск значений при неполном совпадении ячеек
2011-11-22 16:51 http://forum.msexcel.ru/profiles/stopp-u113433.html
Добрый вечер всем!
У меня такая задачка, которая терзает меня уже не первый месяц и отнимает немало времени) Помогите кто чем может Улыбка
Дано:
1. таблица, в которой фамилия (не просто фамилия, а тут же пояснения), расшифровка и сумма.
2. таблица фамилий (причем написание не идентичное первой таблице)
Необходимо:
Во второй таблице, напротив каждой фамилии написать значения из 4 столбика первой таблицы. Если Фамилия повторяется, то написать в виде: "значение1" и "значение2"

В прикрепленном файле все данные и что должно получиться есть.
Надеюсь на вас. Заранее спасибо!

more>> Закрепить некоторые строки при фильтровании
2011-11-22 16:55 http://forum.msexcel.ru/profiles/more-u110415.html
Здравствуйте!
Интересует такой вариант: можно ли как-то закрепить некоторые строки (в моем примере - выделенные,т.е. заголовки разделов и итоги), чтоб они продолжали отображаться после фильтации? Чтоб структура оставалась первоначальной, только отображались данные по выбранным с помощью фильтра отделам?
И в идеале, чтоб итоги тоже пересчитывались только по тем суммам, которые отображены в фильтруемой ячейке Улыбка Т.е. при выборе Отдела1 Итого по виду деятельности 1 было равно сумме данных только по этому отделу?...
 

_Boroda_>> Re: Закрепить некоторые строки при фильтровании
2011-11-22 17:03 http://forum.msexcel.ru/profiles/boroda-u12234.html
Это же у Вас сводная таблица, вставленная значением. Просто используйте её в обычном виде.

Mart222>> Re: Поиск значений при неполном совпадении ячеек
2011-11-23 05:31 http://forum.msexcel.ru/profiles/mart222-u74687.html
Примитивно, но работает (см. вложение).
Не совсем понятно это - " Если Фамилия повторяется, то написать в виде: "значение1" и "значение2" "

Valll>> Неслучайное случайное число
2011-11-23 07:56 http://forum.msexcel.ru/profiles/valll-u28591.html
Новая проблема - это хорошо забытая старая... Грустный

Вообщем, давным-давно сделал я игру рулетка на Экселе. В алгоритме применялась функция случайного числа, вот её формула:
Chislo = Fix(Rnd() * (51 - 1) + 1)

Так вот, что я заметил: включаешь прокрутку рулетки первый раз - получай 13 чёрное, второй - 12 красное, третий 10 чёрное... Далее отслеживать перестал. Потом, то ли усидчивость моя сбивается, то ли Эксель... вроде крутит случайно... Выгружаю файл с игрой, запускаю опять... и как в известном произведении: тройка, семёрка, туз... - всё повторяется. Естественно, что переменные я нигде не сохраняю. Это так, на заметку - имейте ввиду. Подмигивающий

Valll>> Диапазон дат в сводной таблице
2011-11-23 08:04 http://forum.msexcel.ru/profiles/valll-u28591.html
Имеется исходная таблица: Дата, сумма, Клиент, Дебет, Кредит. Нужно посчитать оборот за период с...по... Создаю сводную таблицу на основе исходной. Но!!! Сводная таблица не берёт за ранее отфильтрованный список  - она всё равно берёт ВСЕ данные таблицы... Ладно, взяли... Начинаем проектировать Сводную... В поля Строк - ставим Клиентов, В поля Столбцы - ставим по очереди или вместе : Дебет-Кредит. А вот дату выводим в поля СТРАНИЦ! И что получаем? Что раскрыв дату я вижу 1000 дат за три года!!! Бред полный! Мне то нужно посмотреть данные, допустим за квартал или другой "кривой" отрезок времени, а Эксель просит УБРАТЬ галочки с 900 дат и оставить 100 нужных!!! Пробовал как-то макросом это дело причесать - куда там! Эксель тупо выводит в длинный столбец ВСЕ даты в виде отдельной строки!!! Никакие варианты дать команду с... по... не прошли! Это действительно такая проблема или я чего не понимаю? Уточняю, ДАТЫ ДОЛЖНЫ быть в области страниц!

Так нормально?

Почти нормально. При...

more>> Re: Закрепить некоторые строки при фильтровании
2011-11-23 09:41 http://forum.msexcel.ru/profiles/more-u110415.html
на самом деле таблица, конечно, не такая, это упрощенный вариант, столбцов намного больше, около 70... а с заголовками, состоящими из объединений, _сводные_ таблицы работать отказываются в принципе... тем более, это единственная таблица, для сводной просто нет источника...

Aqil_f>> Re: Копирование данных с помощью макроса в другую книгу
2011-11-23 09:50 http://forum.msexcel.ru/profiles/aqilf-u14854.html
СПАСИБО, Wasilic. Все нормально работает. Но,

1. Программа удаляет все столбцы из ITOQ.XLS, а надо удалять толко те столбцы которые копируется. Эти столбцы заранее известно и не меняется, допустим, 1,2,3,5,6,9,15 столбцы.

2. Данные копируется каждый раз в конец файла в ITOQ.XLS, а надо копировать каждые данные на "свое место".

3. И еще, файлы очень большые, и поэтому программа работает очень дольго, где-то 5 минут. Как-то можно оптимизировать этот макрос?

itman>> Re: Palo-server
2011-11-23 10:53 http://forum.msexcel.ru/profiles/itman-u102919.html
Пожалуйста, какие возможности у PALO!
В чём его преимущество перед консолидацией?
В чём его преимущество перед Сводной таблицей?
В чём его преимущество перед MS Query?

Есть ли задачи (какие) где PALO, единственный инструмен реализации?

Спасибо.
PALO = OLAP сервер, не единственный, но с хорошим функционалом в бесплатной редакции.

Valll>> Re: Диапазон дат в сводной таблице
2011-11-23 11:13 http://forum.msexcel.ru/profiles/valll-u28591.html
Прикладываю файл

_Boroda_>> Re: Диапазон дат в сводной таблице
2011-11-23 11:24 http://forum.msexcel.ru/profiles/boroda-u12234.html
А почему Вы обязательно хотите дату в поле "Страницы" засунуть?

_Boroda_>> Re: Неслучайное случайное число
2011-11-23 11:25 http://forum.msexcel.ru/profiles/boroda-u12234.html
А вопрос-то какой?


Stopp>> Re: Поиск значений при неполном совпадении ячеек
2011-11-23 11:53 http://forum.msexcel.ru/profiles/stopp-u113433.html
спасибо! все работает!
а более изящного решения нет?) как-то очень громоздко получилось.
У меня порядка 100 фамилий, совпадений до 5...

Valll>> Re: Диапазон дат в сводной таблице
2011-11-23 12:13 http://forum.msexcel.ru/profiles/valll-u28591.html
Так надо. Я правильно понимаю, что у вас тоже не получается? Мне просто надо понять - это только у меня или действительно так невозможно?

Можно конечно дату и в строки засунуть (там как не странно фильтры на дату стоят), но тогда таблица будет таких размеров, что и миллиона строк не хватит...

Mart222>> Re: Поиск значений при неполном совпадении ячеек
2011-11-23 12:36 http://forum.msexcel.ru/profiles/mart222-u74687.html
При ста фамилиях конечно будет достаточно громоздко. Как вариант можно попробовать использовать формулы массива, тогда не нужны будут использованные переходы, либо составлять макрос по перебору значений и формированию строк доходов.


На сегодня все. До встречи на следующей неделе.


В избранное