УРОК 4. Пишем код полностью с нуля / Как работать с макросами в Excel?

แชร์
ฝัง
  • เผยแพร่เมื่อ 14 ต.ค. 2024
  • 25-27 апреля проводим конфенцию по Excel и Power BI уже в 4й раз.
    Подробности по ссылке:
    akademia-excel...
    ========================================================================
    Наша задача научиться писать свои макросы. На уроке пройдём все этапы написания макроса с нуля. Запишем код, который будет создавать новый лист и записывать туда информацию о пользователе и актуальной дате.
    1:25 - Создание модуля
    2:07 - Меняем размер шрифта
    2:39 - Пишем макрос
    3:17 - Структура макроса
    4:00 - Оформление кода макроса (Комментарии)
    5:46 - Синтаксис языка VBA. Подсказка методов и свойств
    8:25 - Запись значений в ячейки нового листа
    11:15 - Имя пользователя (Aplication.UserName)
    13:14 - Ввод текущей даты
    14:02 - Пошаговое выполнение записанного макроса
    16:48 - Добавляем красный цвет шрифта и заливку
    20:53 - Анонс следующего урока
    Это хороший пример, чтоы показать как происходит весь процесс в общем, узнать структуру кода, его составные части, элементы, научиться пошаговому выполнению, чтобы свести к минимуму количество ошибок.
    ↓↓↓ Ещё больше полезной информации и помощи ↓↓↓
    Сайт: akademia-excel.ru/
    Группа ВК: akademia...
    Страница FB: / yakushman
    Бесплатные вебинары: webinar.akademia-excel.ru/
    Хотите получать больше лайфхаков по Excel? Подписывайтесь на наш телеграм: t.me/+fuzKX9xk...

ความคิดเห็น • 105

  • @valeriagertsik1901
    @valeriagertsik1901 11 หลายเดือนก่อน

    Спасибо за такой шикарный урок!

  • @mila-qh6tv
    @mila-qh6tv 2 ปีที่แล้ว +2

    Спасибо, очень просто и понятно вы обьясняете. Сразу понятна логика инструментов.

  • @zhamilya.k
    @zhamilya.k 3 ปีที่แล้ว +3

    Спасибо за урок, очень интересно и понятно

  • @СтасК-б8ж
    @СтасК-б8ж 4 ปีที่แล้ว +5

    Всё очень понятно, доступно!
    СПАСИБО ВАМ !

  • @kukizubr
    @kukizubr 2 ปีที่แล้ว +1

    Молодец мужик очень интересно

  • @АртёмВахитов-з7р
    @АртёмВахитов-з7р 4 ปีที่แล้ว +2

    Спасибо! Помогли разобраться с макросами! Очень хорошо понятно! Супер!

  • @bolottorobekov9162
    @bolottorobekov9162 5 ปีที่แล้ว +7

    спасибо! очень отличный урок.на высшем уровне.

    • @АлексейСоков-ь8и
      @АлексейСоков-ь8и 3 ปีที่แล้ว

      Хах, даже коммент написан как код: с разделением свойств "очень отличный урок" и "на высшем уровне" через точку 😄

  • @kenjjut
    @kenjjut ปีที่แล้ว

    обучение на высшем уровне tanks

  • @Irinuschkaa
    @Irinuschkaa ปีที่แล้ว +1

    Спасибо

  • @МаринаБелеткова
    @МаринаБелеткова 2 ปีที่แล้ว +1

    Класс, спасибо, вспомнила молодость)

  • @GloryTokarev
    @GloryTokarev 3 ปีที่แล้ว +3

    Лайк однозначно!!!

  • @Niesse
    @Niesse ปีที่แล้ว

    Супер. жаль что только сейчас нашел это видео

  • @Студент610
    @Студент610 4 ปีที่แล้ว +2

    Огромное спасибо за ваши видео

  • @vitaliugasuzuki9605
    @vitaliugasuzuki9605 5 ปีที่แล้ว +4

    Благодарю за старания! Жду новые видео!

  • @ГалинаАлександровнаПолищук

    Спасибо! Все понятно.

  • @electronik1489
    @electronik1489 3 ปีที่แล้ว

    Офигенное всё просто аж спина закружилась и мозги опухоли. Этот урок как раз для самых начинающих чайников. Я макросы добавляю двумя действиями. Ищу даташит компанента, переношу размеры в Sprint Layout, и на этом весь АПЛИКЕЙШЕН. Это исправно работает уже два года. А в твоём уроке я насчитал, что только слово макрос ты озвучил 96 раз, остальные слова 214 я просто язык поломаю. С нетерпением жду других проектов.

    • @AkademiaExcel
      @AkademiaExcel  3 ปีที่แล้ว +1

      Вы первый, кто посчитал сколько раз за видео я говорю слово макрос:)

  • @АртурНестерук-ж2й
    @АртурНестерук-ж2й 4 ปีที่แล้ว +2

    Благодарю!

  • @Nortropb2
    @Nortropb2 5 ปีที่แล้ว +4

    Еще раз спасибо за курс! Единственное замечание - для новичков нужно особенное внимание уделить на значение символа "=" и отличие понятий равно и присвоить.

    • @Rice0987
      @Rice0987 3 ปีที่แล้ว +3

      Оно потом на интуитивном уровне выравнивается. Да и компилятор не пропустит лишнего знака.

  • @altynaiorozbaeva2235
    @altynaiorozbaeva2235 5 ปีที่แล้ว +1

    Спасибо большое

  • @Ogorodnik55
    @Ogorodnik55 5 ปีที่แล้ว +7

    Спасибо! Очень понятный урок. А существует ли какой-нибудь список-справочник по служебным словам, свойствам и т.д. с переводом и описанием действий при вводе этих слов. Сказывается незнание английского языка.

    • @ОлександрСолопай
      @ОлександрСолопай 5 ปีที่แล้ว +9

      Существует. Откройте редактор VBA, в нем View>Object Browser(F2) и увидите полную объектную модель VBA Excel. По любому семейству, классу, свойству, методу, событию, константе можно получить справку по F1. Увы на родном аглицком. Кроме того, придется изучить и сам VB, основы ООП. Литературу можно найти в инете. Пугает, конечно, зато когда вкурите все это, поймете, насколько мощная штука VBA. Например, из макроса в Word (тоже VBA, только объектная модель другая) можно запустить Excel, создать в нем книгу (по-умолчанию или по шаблону), создать в ней таблицу, сохранить и/или отобразить. И это далеко не предел...

  • @ДёнисИнкогнито-г4ф
    @ДёнисИнкогнито-г4ф 2 ปีที่แล้ว

    👍👍👍

  • @sergoamv-7301
    @sergoamv-7301 หลายเดือนก่อน

    Подскажите, пожалуйста а где 3 урок?

  • @РустамУмуржанов
    @РустамУмуржанов 5 ปีที่แล้ว +2

    Здравствуйте! Как можно вбить свои символы, например: сменить при нажатии макрос напечатанные буквы на прописные буквы (написанные своими руками), но только в вроде. Спасибо!

  • @ВадимУльмасов
    @ВадимУльмасов 3 ปีที่แล้ว

    Здравствуйте, при написании worksheet ставлю точку, далее некого выплывающего списка нет

  • @fanfernavigator
    @fanfernavigator 3 ปีที่แล้ว

    Очень много проскакивает терминов из объектно ориентированного программирования. Знаком с этим ну очень, очень поверхностно и только благодаря этим крохотным знаниям не испытываю трудностей с пониманием видео.

  • @mikhailzibrov6568
    @mikhailzibrov6568 4 ปีที่แล้ว +2

    Подскажите, если F8 не позволяет выполнить макрос пошагово, как выполнить пошагово без кнопки f8?

    • @lait6621
      @lait6621 3 ปีที่แล้ว

      Debug - Step Into

  • @Vonuxa
    @Vonuxa 4 ปีที่แล้ว +2

    А кнопка старт?

  • @jastli887
    @jastli887 7 ปีที่แล้ว +1

    Добрый день!
    А можно сделать так чтобы макросы работали на всех новых книгах который создаются?
    Спасибо!

    • @jastli887
      @jastli887 7 ปีที่แล้ว

      Академия Excel ок. ждем! спасибо!

  • @АлисаЯкубова-п5т
    @АлисаЯкубова-п5т 3 ปีที่แล้ว +1

    у меня не работает F8 (( и вообще не могу разобраться с запуском пошагового выполнения, help!

  • @kajsasifjar7729
    @kajsasifjar7729 5 ปีที่แล้ว +2

    в vba excel 2017 этого выпадающего списка совйств после worksheets. нет. Его можно где-то включить?

    • @Rice0987
      @Rice0987 4 ปีที่แล้ว

      Добавьте ТОЧКУ после worksheets. :)

  • @АлександрФилиппов-ч1о
    @АлександрФилиппов-ч1о 6 ปีที่แล้ว +1

    Подскажите как сделать, чтобы ячейки принимали размер текста. У меня получается, что в слове "пользователь" видно только "пользова", а дальше идет имя пользователя. и дата из-за этого выглядит ####

    • @Rice0987
      @Rice0987 4 ปีที่แล้ว +2

      ActiveCell.EntireColumn.AutoFit

  • @АлексейСмирнов-е2в
    @АлексейСмирнов-е2в 2 ปีที่แล้ว

    А как узнать что какое свойство означает ?

  • @АнастасияРожанская-ю6щ
    @АнастасияРожанская-ю6щ 4 ปีที่แล้ว

    Интересное видео. Два вопроса. Откуда взять инфу новичку про vb b rgb. И второй, про пошаговое выполнение макроса. Почему он может возвращать к предыдущему этапу и так и застрял на двух этапах при включении F8

    • @Rice0987
      @Rice0987 4 ปีที่แล้ว +1

      С нуля книжки читать нудно, тем более, когда описываемым примерам поначалу не видишь применения. Поэтому используйте запись макросов и проходите по каждому рядку записанного кода, чтобы понять, что он делает. Синтаксис VBA настолько интуитивен, что через пару недель/месяц вы сможете писать макросы под свои задачи.

  • @AleksK4au
    @AleksK4au 4 ปีที่แล้ว +1

    Спасибо \(@.@)/

  • @rovshanabbasov8293
    @rovshanabbasov8293 5 ปีที่แล้ว +2

    здраствуйте. Уважаемые я не как не смог поставить апостроф

    • @sparkn100
      @sparkn100 3 ปีที่แล้ว

      надо перейти на раскладку - английский язык, и нажать кнопку "э"

  • @AlexanderUSSR1922
    @AlexanderUSSR1922 3 ปีที่แล้ว

    А почему автор рекомендует писать названия макросов латиницей?

  • @sparkn100
    @sparkn100 3 ปีที่แล้ว

    С 15 минуты F8 что-то с ней не так. Кто знает, если можно попроще?

  • @BARAHOLKA.
    @BARAHOLKA. 3 ปีที่แล้ว

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

    • @BARAHOLKA.
      @BARAHOLKA. 3 ปีที่แล้ว

      @@AkademiaExcel Благодарю! Где-то стало понятней из просмотра следущего урока, он примерно об этом

  • @ромкаромка-з6у
    @ромкаромка-з6у 6 ปีที่แล้ว +1

    а если я закрыл вкладки слева в редакторе,ток как их открыть??подскажите плиз

    • @Rice0987
      @Rice0987 4 ปีที่แล้ว

      Ctrl+R, F4

  • @matematikproduction
    @matematikproduction 5 ปีที่แล้ว

    Respect

  • @Юлия-с1ь7з
    @Юлия-с1ь7з ปีที่แล้ว

    А где третий урок

  • @RoLand020786
    @RoLand020786 7 ปีที่แล้ว

    Так и не понял почему дата не показывается , делали ведь для отражения даты ???

    • @maxmato3659
      @maxmato3659 4 ปีที่แล้ว

      Columns("B:B").EntireColumn.AutoFit

  • @НиколайЛогинов-щ4о
    @НиколайЛогинов-щ4о 3 ปีที่แล้ว

    Здравствуйте, не подскажите, что сделать в данной ситуации?
    При переходе в визуал басик, все в китайских иероглифах. все перелопатил и никак не понял как переделать на англ.

    • @AkademiaExcel
      @AkademiaExcel  3 ปีที่แล้ว

      Приложите скриншот хотя бы. Есть ощущение, что вы копируете код макроса с сайта, вставляете и он с иероглифами, так? Если так, что перед копированием измените раскладку клавиатуры на русскую, скопируйте и тогда вставится норм.
      Если у вас другая ситуация, то напишите подробнее. Я раньше любил играть в бабушку Вангу, но что-то уже устал)

    • @НиколайЛогинов-щ4о
      @НиколайЛогинов-щ4о 3 ปีที่แล้ว

      @@AkademiaExcel Работая в экселе, при нажатии сочетаний клавиш АЛЬТ+F11 выходит визуал басик и все там в китайских иероглифах!!
      Как приложить скрин в ютубе?))

    • @AkademiaExcel
      @AkademiaExcel  3 ปีที่แล้ว

      @@НиколайЛогинов-щ4о поменяйте порядок языков вот тут prnt.sc/1ubgg2k

    • @AkademiaExcel
      @AkademiaExcel  3 ปีที่แล้ว

      @@НиколайЛогинов-щ4о, делаю скрин и прикладываю как ссылку
      В Excel выберите
      Файл->Параметры->Язык->Выбор языков редактирования->Установить английский по умолчанию.
      Перезагрузить Еxcel!!!!!

    • @НиколайЛогинов-щ4о
      @НиколайЛогинов-щ4о 3 ปีที่แล้ว

      @@AkademiaExcel у меня всего 2 языка ( англ. и рус.), китайского в этом списке нет!!

  • @АлександрПархоменко-ь2ч
    @АлександрПархоменко-ь2ч 7 ปีที่แล้ว

    Спасибо, разобрался, но ещё так же узнал, что можно на цифровой клавиатуре alt+39

    • @kazG
      @kazG 7 ปีที่แล้ว

      alt+38 = &

  • @sparkn100
    @sparkn100 3 ปีที่แล้ว

    The macros in this project are disabled. Please refer to the j online help or documentation of the host application to determine howto enable macros
    Макросы в этом проекте отключены. Пожалуйста, обратитесь к онлайн-справке j или документации хост-приложения, чтобы определить, как включить макросы

    • @sparkn100
      @sparkn100 3 ปีที่แล้ว

      По первым 3 видео - все макросы выводились. В настройках Ексель ничего не выключала.

  • @АлексейСоков-ь8и
    @АлексейСоков-ь8и 3 ปีที่แล้ว

    2021

  • @dim7968
    @dim7968 7 ปีที่แล้ว

    Denj dobryi ! Kak sdelatj , chtoby makrosy pri vyhode ne sbrasyvalisj ? fail sohranil v .xlsm formate. v nastroikah besopastnosti makrosov pomenjal na vkl vse makrosy . vyshel s knigi > zahozhu > pishet - nadstroiki prilozhenija vykljucheny > vkljuchaju > ni odnogo makrosa netu ((((

  • @taniracom
    @taniracom 4 ปีที่แล้ว

    А если горячие клавиши не работают, как зайти в самой программе?

    • @Rice0987
      @Rice0987 4 ปีที่แล้ว

      Надо включить меню Разработчик в контекстном меню ленты.

    • @АлисаЯкубова-п5т
      @АлисаЯкубова-п5т 3 ปีที่แล้ว

      @@Rice0987 а у меня F8 для пошагового запуска макроса не работает, и я заглохла

    • @Rice0987
      @Rice0987 3 ปีที่แล้ว

      @@АлисаЯкубова-п5т F8 [Debug/Step into] работает с любой строки процедуры (Sub). На обработчиках событий сначала нужно ставить точку прерывания, потом уже F8, потому что обработчик запускается только при исполнении события. В функциях не помню, давно не пользовался.

    • @sparkn100
      @sparkn100 3 ปีที่แล้ว

      @@Rice0987 Я, как Алиса, не работает F8 ? Хочу все делать как показано в примере на видео на 15 минуте. Что не так?

  • @BEKONCHIK_ADELISHKA
    @BEKONCHIK_ADELISHKA 8 ปีที่แล้ว

    Как поменять кодировку?
    Sub information()
    'создание нового листа
    End Sub
    По факту вместо 'создание нового листа пишет калябаля.

    • @Rice0987
      @Rice0987 4 ปีที่แล้ว

      @@AkademiaExcel К раскладке клавиатуры это не имеет отношения. Для использования кириллицы в vba необходимо сменить региональные параметры на россию.

    • @Rice0987
      @Rice0987 4 ปีที่แล้ว

      @@AkademiaExcel Что вы можете показать? Что вы путаете КОДИРОВКУ символов, с раскладкой? :)
      Я думаю, человек имел ввиду не "cjplfzbt zjdjuj kbcnf".

  • @АлександрПархоменко-ь2ч
    @АлександрПархоменко-ь2ч 7 ปีที่แล้ว +2

    Здравствуйте. Нажимаю на английской раскладке С, а апостроф не появляется. Где он?

    • @user-ek6yo
      @user-ek6yo 2 ปีที่แล้ว

      на английской раскладке русская буква Э

  • @alexisisagalieva5402
    @alexisisagalieva5402 6 ปีที่แล้ว +5

    Кто может объяснить в чем смысл?
    Посему нельзя все это просто в ячейки вбить?

    • @dimilyanich
      @dimilyanich 5 ปีที่แล้ว +5

      На пальцах показывают на простейших примерах, как работает макросы. Потом можно это все автоматизировать и нажимать 1 кнопку

    • @kingnutik1
      @kingnutik1 5 ปีที่แล้ว +3

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

  • @oaksamov2810
    @oaksamov2810 5 ปีที่แล้ว

    Что-то не сработало. Показывает только ячейки А1 и В1. А2 и В2 полностью отсутствуют. А главное сам макрос не сохранился.

  • @371MonaLiza
    @371MonaLiza 4 ปีที่แล้ว

    ++++

  • @arctikgame3707
    @arctikgame3707 5 ปีที่แล้ว

    где я возьму xmlx!!!

    • @Rice0987
      @Rice0987 4 ปีที่แล้ว

      F12/xlsm

  • @BEKONCHIK_ADELISHKA
    @BEKONCHIK_ADELISHKA 8 ปีที่แล้ว

    Повторил, результат тот же, при включённой русской клавиатуре выходят каракули:(

    • @BEKONCHIK_ADELISHKA
      @BEKONCHIK_ADELISHKA 8 ปีที่แล้ว

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

    • @BEKONCHIK_ADELISHKA
      @BEKONCHIK_ADELISHKA 8 ปีที่แล้ว

      Кстати, хороший базовый курс, ценю!

    • @ОлександрСолопай
      @ОлександрСолопай 5 ปีที่แล้ว

      @@BEKONCHIK_ADELISHKA Хм.. Можно но зачем? Формулами элементарно вяжутся даже отдельные книги, желательно чтобы лежали в одной папке. Если формулами по какой-то причине невозможно, то макросами данные дергать без проблем.

    • @ОлександрСолопай
      @ОлександрСолопай 5 ปีที่แล้ว

      @@AkademiaExcel Оптимальный вариант - подсмотреть, что и как записал рекордер. Во многих случаях пишет много лишнего. Например, нужно очистить несколько диапазонов ячеек быстро и не меняя положения курсора.
      Рекордер:
      Sub Macros2()
      Range("A1:F1,A3:F3,A8:F8").Select
      Range("A8").Activate
      ActiveWindow.SmallScroll Down:=27
      Range("A1:F1,A3:F3,A8:F8,A40:F40").Select
      Range("A40").Activate
      ActiveWindow.SmallScroll Down:=39
      Range("A1:F1,A3:F3,A8:F8,A40:F40,A85:F85").Select
      Range("A85").Activate
      Selection.ClearContents
      End Sub
      "Причесанный" код:
      Sub Macros2()
      Range("A1:F1,A3:F3,A8:F8,A40:F40,A85:F85").ClearContents
      End Sub

  • @Vernad
    @Vernad 7 ปีที่แล้ว +7

    6:50 WorkSheetS не объект, а коллекция. Садись два

  • @РустамУмуржанов
    @РустамУмуржанов 5 ปีที่แล้ว

    *В Worde

  • @JohnsonautoDUD_22
    @JohnsonautoDUD_22 2 ปีที่แล้ว

    Add это что ?

  • @ОлександрСолопай
    @ОлександрСолопай 5 ปีที่แล้ว

    Worksheets не объект, а семейство объектов!!!

  • @Трапочек
    @Трапочек 4 ปีที่แล้ว

    страх? пфффф

  • @UNION-wi1iu
    @UNION-wi1iu 5 ปีที่แล้ว

    ни хера не понял

  • @_mr4
    @_mr4 6 ปีที่แล้ว +1

    Ничего не объяснил, даже попыток не видно

  • @xeno8647
    @xeno8647 5 ปีที่แล้ว +2

    Спасибо!

  • @hostile_door
    @hostile_door 4 ปีที่แล้ว +1

    спасибо

  • @ЕсенияТюнева
    @ЕсенияТюнева 4 ปีที่แล้ว

    👍👍👍