Ответить
  • Gustaf Senior Member
    офлайн
    Gustaf Senior Member

    5923

    20 лет на сайте
    пользователь #13267

    Профиль
    Написать сообщение

    5923
    # 26 декабря 2007 15:57

    Подскажите, может ли Эксель нужный мне график нарисовать:

    В одном столбце, с 1 по 100 строку идет перечень повторяющихся значений из справочника, например:

    "Значение1","Значение3","Значение2", "Значение3", "Значение1", "Значение2" и т.п.

    Надо построить чарт (диаграму), в котором было бы указано, что по строкам 1-100 , "Значение1" - указано столько-то раз, "Значение2" - столько-то раз, "Значение3" столько-то раз и т.п.

    Не всегда правда приносит пользу – надо ещё подумать, как сказать эту правду, и нужно ли её вообще говорить
  • KSIva Senior Member
    офлайн
    KSIva Senior Member

    12173

    20 лет на сайте
    пользователь #15360

    Профиль
    Написать сообщение

    12173
    # 26 декабря 2007 16:13

    Gustaf, Данные/Сводная таблица... - делаешь сводную таблицу, а затем по ней можешь строить любой график. Либо сразу выбирай сводную диаграмму...

    Вечно молодой, вечно пьяный...
  • Gustaf Senior Member
    офлайн
    Gustaf Senior Member

    5923

    20 лет на сайте
    пользователь #13267

    Профиль
    Написать сообщение

    5923
    # 26 декабря 2007 16:23

    Понял, спасибо.

    Не всегда правда приносит пользу – надо ещё подумать, как сказать эту правду, и нужно ли её вообще говорить
  • LarryMusa Neophyte Poster
    офлайн
    LarryMusa Neophyte Poster

    4

    16 лет на сайте
    пользователь #115243

    Профиль
    Написать сообщение

    4
    # 26 декабря 2007 17:25

    Вот набросал формулу. Оптимизируй сам.

    В А1 - начальная дата, в А2 - конечная.

    Считает количество четвергов. Для пятниц нужно 4 заменить на 5.

    =ЦЕЛОЕ((A2-A1+ДЕНЬНЕД(A1;2)-ДЕНЬНЕД(A2;2)-7)/7)+Ч(ДЕНЬНЕД(A1;2)<=4)+Ч(ДЕНЬНЕД(A2;2)>=4)

    Спасибо, KSIva!

    В этой формуле ошибки нет, как в случае

    =ЦЕЛОЕ((A2-A1)/7) :)

    Выручил :super:

  • Vitalik Senior Member
    офлайн
    Vitalik Senior Member

    2818

    21 год на сайте
    пользователь #6505

    Профиль
    Написать сообщение

    2818
    # 12 февраля 2008 08:36

    В макросах не силен, подскажите, как это можно реализовать?

    У меня есть стандартные слова, которые надоедает вводить в определенные ячейки.

    Думаю можно сделать кнопки какие-нибудь

    кнопка 1 - нажимаю, в ячейку вводится слово бмв

    кнопка 2 - нажимаю - ауди

    и т.д.

  • Zwalker Senior Member
    офлайн
    Zwalker Senior Member

    1915

    22 года на сайте
    пользователь #3119

    Профиль
    Написать сообщение

    1915
    # 12 февраля 2008 09:22

    Переходим в редактор VB - Alt-F11.

    Вводим следующие макросы:

    Sub Макрос1()

    ActiveCell.FormulaR1C1 = "БМВ"

    End Sub

    Sub Макрос2()

    ActiveCell.FormulaR1C1 = "АУДИ"

    End Sub

    Закрываем редактор VB

    Правый клик на любой панели инструментов. Выбираем пункт "настройка".

    Переходим на закладку "команды"

    Выбираем категорию "макросы"

    В окне команды перетаскиваем кнопку "настраиваемая кнопка" на любую панель по вкусу.

    Правый клик по созданной кнопке и выбираем пункт "Назначить макрос"

    Назначаем кнопке макрос "Макрос1".

    Повторить для других кнопок.....

    Friends come and go, but enemies accumulate.
  • Vitalik Senior Member
    офлайн
    Vitalik Senior Member

    2818

    21 год на сайте
    пользователь #6505

    Профиль
    Написать сообщение

    2818
    # 12 февраля 2008 18:31

    Zwalker, спасибо! Именно то, что я хотел! :beer:

  • Rusya Senior Member
    офлайн
    Rusya Senior Member

    887

    17 лет на сайте
    пользователь #105161

    Профиль
    Написать сообщение

    887
    # 12 февраля 2008 20:28
    Vitalik:

    Zwalker, спасибо! Именно то, что я хотел! :beer:

    +к сказанному можно еще назначить горячую кнопку, реально помогает если очень не хочется отвлекаться на мышку

    "наказание выдается за нарушение, а не за его последствия" (М. Маси) +5 сек максимум!
  • Vitalik Senior Member
    офлайн
    Vitalik Senior Member

    2818

    21 год на сайте
    пользователь #6505

    Профиль
    Написать сообщение

    2818
    # 12 февраля 2008 23:05

    А как бы сделать еще, что бы не только на моем компе работало.

    Скажем в документ засунуть. Иначе прихожу не другой комп, а там этих кнопок нет...

  • Yuri_K Senior Member
    офлайн
    Yuri_K Senior Member

    6125

    22 года на сайте
    пользователь #4604

    Профиль
    Написать сообщение

    6125
    # 5 марта 2008 17:45

    Смешную задачку помогал решить... Была табличка раскрашенная в разные цвета (цвет фона ячейки). Надо было на основе цвета фона сделать выборку. Короче условное форматирование наоборот - бывает-же такое... Сделал на скриптах. Формулой цвет фона помоему не достать?

  • KSIva Senior Member
    офлайн
    KSIva Senior Member

    12173

    20 лет на сайте
    пользователь #15360

    Профиль
    Написать сообщение

    12173
    # 5 марта 2008 18:10
    Yuri K.:

    Формулой цвет фона помоему не достать?

    С помощью формул не достать. Все что можно достать обеспечевает функция ЯЧЕЙКА. Специфическая она такая.

    Подобные вопросы и мне предлагали решить, в итоге придумывали другие способы пометить ячейки. :)

    Вечно молодой, вечно пьяный...
  • Vitalik Senior Member
    офлайн
    Vitalik Senior Member

    2818

    21 год на сайте
    пользователь #6505

    Профиль
    Написать сообщение

    2818
    # 5 марта 2008 22:08

    а с моим вопросом что можно сделать?

  • Yuri_K Senior Member
    офлайн
    Yuri_K Senior Member

    6125

    22 года на сайте
    пользователь #4604

    Профиль
    Написать сообщение

    6125
    # 6 марта 2008 10:27

    KSIva, ЯЧЕЙКА это из другой оперы - она формат отображает. А тут форматирование (которе к HTML части ближе)

  • KSIva Senior Member
    офлайн
    KSIva Senior Member

    12173

    20 лет на сайте
    пользователь #15360

    Профиль
    Написать сообщение

    12173
    # 6 марта 2008 11:09 Редактировалось KSIva, 1 раз.
    Vitalik:

    А как бы сделать еще, что бы не только на моем компе работало.

    Скажем в документ засунуть. Иначе прихожу не другой комп, а там этих кнопок нет...

    Vitalik:

    а с моим вопросом что можно сделать?

    Vitalik, литературу по Excel.

    Вид/Панели инструментов/Настрока/Вложить.

    Вечно молодой, вечно пьяный...
  • Yuri_K Senior Member
    офлайн
    Yuri_K Senior Member

    6125

    22 года на сайте
    пользователь #4604

    Профиль
    Написать сообщение

    6125
    # 6 марта 2008 12:04

    Явно не мне адресованно.

  • KSIva Senior Member
    офлайн
    KSIva Senior Member

    12173

    20 лет на сайте
    пользователь #15360

    Профиль
    Написать сообщение

    12173
    # 6 марта 2008 12:36

    Yuri K., литературу нужно читать всем, жалко, что толковой не так уж много... :)

    Вечно молодой, вечно пьяный...
  • Vitalik Senior Member
    офлайн
    Vitalik Senior Member

    2818

    21 год на сайте
    пользователь #6505

    Профиль
    Написать сообщение

    2818
    # 6 марта 2008 12:39

    Yuri K., ну не мне же.. :D

    KSIva, спасибо! Вечером буду пробовать. :super:

  • Yuri_K Senior Member
    офлайн
    Yuri_K Senior Member

    6125

    22 года на сайте
    пользователь #4604

    Профиль
    Написать сообщение

    6125
    # 6 марта 2008 15:31
    KSIva:

    Yuri K., литературу нужно читать всем, жалко, что толковой не так уж много...

    Энное количество страниц назад - советовал тоже самое. Только начинает казаться что в пору самому книжку по Excel писать - как жизнь подбрасывает новую задачку...

  • Vitalik Senior Member
    офлайн
    Vitalik Senior Member

    2818

    21 год на сайте
    пользователь #6505

    Профиль
    Написать сообщение

    2818
    # 6 марта 2008 17:10

    Sub Макрос1()

    ActiveCell.FormulaR1C1 = "БМВ"

    End Sub

    Sub Макрос2()

    ActiveCell.FormulaR1C1 = "АУДИ"

    End Sub

    С этим все понятно. Подскажите, пожалуйста, как можно модифицировать этот вариант.

    Сделать, что бы при нажатии кнопки на БМВ, а затем АУДИ, информация накапливалась, а не затиралась.

    Пример, нажал БМВ, АУДИ - в строке получилось: БМВ, Ауди.

  • Yuri_K Senior Member
    офлайн
    Yuri_K Senior Member

    6125

    22 года на сайте
    пользователь #4604

    Профиль
    Написать сообщение

    6125
    # 6 марта 2008 17:57

    Ну наверное так

    ActiveCell.FormulaR1C1 = ActiveCell.FormulaR1C1 + ", АУДИ"