Как найти код макроса

Есть excell файл (.xlsm) в котором срабатывает программа: генерация случайных чисел в определенных ячейках при сохранении документа. Возникла необходимость внести изменения в программу. Но не могу никак вывести код. Вкладка Разработчик есть, параметр “Включить все макросы (не рекомендуется, возможен запуск опасной программы)” выбран. Но в окне макросов пусто. И при Alt F11 тоже пустое окно открывается. Подскажите, пожалуйста, как открыть код?
Знания экселя на самом примитивном уровне.

• 
  Вопрос задан

  более трёх лет назад
  

• 5680 просмотров

EDIT:
Per Michael Dillon’s answer, SaveAsText does save the commands in a macro without having to go through converting to VBA. I don’t know what happened when I tested that, but it didn’t produce useful text in the resulting file.

So, I learned something new today!

ORIGINAL POST:
To expand the question, I wondered if there was a way to retrieve the contents of a macro from code, and it doesn’t appear that there is (at least not in A2003, which is what I’m running).

There are two collections through which you can access stored Macros:

  CurrentDB.Containers("Scripts").Documents
  CurrentProject.AllMacros

The properties that Intellisense identifies for the two collections are rather different, because the collections are of different types. The first (i.e., traditional, pre-A2000 way) is via a documents collection, and the methods/properties/members of all documents are the same, i.e., not specific to Macros.

Likewise, the All… collections of CurrentProject return collections where the individual items are of type Access Object. The result is that Intellisense gives you methods/properties/members that may not exist for the particular document/object.

So far as I can tell, there is no way to programatically retrieve the contents of a macro.

This would stand to reason, as macros aren’t of much use to anyone who would have the capability of writing code to examine them programatically.

But if you just want to evaluate what the macros do, one alternative would be to convert them to VBA, which can be done programmatically thus:

  Dim varItem As Variant
  Dim strMacroName As String

  For Each varItem In CurrentProject.AllMacros
    strMacroName = varItem.Name
    'Debug.Print strMacroName
    DoCmd.SelectObject acMacro, strMacroName, True
    DoCmd.RunCommand acCmdConvertMacrosToVisualBasic
    Application.SaveAsText acModule, "Converted Macro- " & strMacroName, _
      CurrentProject.Path & "" & "Converted Macro- " & strMacroName & ".txt"
  Next varItem

Then you could use the resulting text files for whatever you needed to do.

Note that this has to be run interactively in Access because it uses DoCmd.RunCommand, and you have to click OK for each macro — tedious for databases with lots of macros, but not too onerous for a normal app, which shouldn’t have more than a handful of macros.

Посмотреть исходный код Microsoft Excel

Есть ли эквивалент для просмотра исходного кода в Microsoft Excel для всей книги Excel или, возможно, для отдельных ячеек?

В идеале я хотел бы просмотреть список всех возможных вариантов для Microsoft Excel. Похоже, многие параметры доступны в разделе «Формат ячейки».

2 ответа 2

В Excel нет встроенной команды для отображения всех настроек содержимого / формулы / форматирования ячейки.

Это сложная тема, и есть несколько способов предоставить информацию о ячейке или листе или рабочей книге.

Формулы. В Excel 2013 и более поздних версиях существует функция FormulaText(), которую можно использовать для отображения формулы, используемой конкретной ячейкой.

Ctrl-`(это клавиша слева от клавиши 1 на клавиатуре США) — это переключит отображение листа в режим просмотра формул, поэтому вместо РЕЗУЛЬТАТА формул вы увидите фактические формулы внутри ячеек.

Доступен ряд инструментов аудита электронных таблиц. Некоторые из них являются коммерческими, некоторые бесплатными.

Excel MVP Дэйв Бретт является автором Mappit, который является бесплатным

Excel 2013 и выше имеет встроенную надстройку «Запрос», которую необходимо активировать с помощью надстроек Com Options Excel, прежде чем она сможет работать, и она предоставит больше информации о вашей электронной таблице, чем вы когда-либо захотите узнать. Если вы хотите знать «все возможные варианты для Microsoft Excel», то это ваша отправная точка.

Источник

Как посмотреть vba код в excel

Как найти скрытые макросы в электронной таблице Excel — Вокруг-Дом — 2021

Table of Contents:

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

кредит: Сири Стаффорд / Digital Vision / Getty Images

Поиск макросов с помощью инструментов макросов в Excel

Шаг 1

Откройте Excel нормально.

Шаг 2

Нажмите на вкладку «Разработчик».

Шаг 3

Нажмите на кнопку с надписью «Макросы». Откроется диалоговое окно. Диалоговое окно будет иметь все макросы, доступные во всех открытых книгах. Вы можете выбрать «Макросы» и удалить их.

Поиск макросов с помощью редактора Visual Basic

Шаг 1

Откройте Excel нормально.

Шаг 2

Нажмите на вкладку «Разработчик».

Шаг 3

Нажмите на кнопку с надписью «Visual Basic». Откроется редактор Visual Basic. На левой панели будет список всех макросов, загруженных Excel; это будет включать макросы, которые скрыты в диалоговом окне «Макросы». Вы можете выбрать «Макросы» и удалить их по отдельности или просмотреть их код.

Как записать макрос в Excel? Пошаговая инструкция.

Что такое макрос?

Для начала немного о терминологии.

Макрос — это код, написанный на встроенном в Excel языке VBA (Visual Basic for Application). Макросы могут создаваться как вручную, так и записываться автоматически с помощью так называемого макрорекодера.

Макрорекодер — это инструмент в Excel, который пошагово записывает все что вы выполняете в Excel и преобразует это в код на языке VBA. Макрорекодер создает очень подробный код (как мы увидим позже), который вы сможете при необходимости отредактировать в дальнейшем.

Записанный макрос можно будет запускать неограниченное количество раз и Excel повторит все записанные шаги. Это означает, что даже если вы ничего не знаете о VBA, вы можете автоматизировать некоторые задачи, просто записав свои шаги и затем повторно использовать их позже.

Теперь давайте погрузимся и посмотрим, как записать макрос в Excel.

Отображение вкладки «Разработчик» в ленте меню

Перед тем как записывать макрос, нужно добавить на ленту меню Excel вкладку «Разработчик». Для этого выполните следующие шаги:

1. Щелкните правой кнопкой мыши по любой из существующих вкладок на ленте и нажмите «Настроить ленту». Он откроет диалоговое окно «Параметры Excel».
2. В диалоговом окне «Параметры Excel» у вас будут параметры «Настроить ленту». Справа на панели «Основные вкладки» установите флажок «Разработчик».
3. Нажмите «ОК».

В результате на ленте меню появится вкладка «Разработчик»

Запись макроса в Excel

Теперь давайте запишем очень простой макрос, который выбирает ячейку и вводит в нее текст, например «Excel».

Вот шаги для записи такого макроса:

1. Перейдите на вкладку «Разработчик».
2. В группе «Код» нажмите кнопку «Запись макроса». Откроется одноименное диалоговое окно.
3. В диалоговом окне «Запись макроса» введите имя для своего макроса, например «ВводТекста». Есть несколько условий именования, которые необходимо соблюдать при назначении макроса. Например, вы не можете использовать пробелы между ними. Обычно я предпочитаю сохранять имена макросов как одно слово, с разными частями с заглавным первым алфавитом. Вы также можете использовать подчеркивание для разделения двух слов — например, «Ввод_текста».
   
4. Если вы хотите, то можете задать сочетание клавиш. В этом случае мы будем использовать ярлык Ctrl + Shift + N. Помните, что сочетание, которое вы указываете, будет отменять любые существующие горячие клавиши в вашей книге. Например, если вы назначили сочетание Ctrl + S, вы не сможете использовать это для сохранения рабочей книги (вместо этого, каждый раз, когда вы его используете, он выполняет макрос).
   
5. В поле «Сохранить в» убедитесь, что выбрана опция «Эта книга». Этот шаг гарантирует, что макрос является частью рабочей книги. Он будет там, когда вы сохраните его и снова откроете, или даже если вы поделитесь файлом с кем-то.
   
6. Введите описание при необходимости. Обычно я этого не делаю, но если у вас много макросов, лучше указать, чтобы в будущем не забыть что делает макрос.
7. Нажмите «ОК». Как только вы нажмете OK, Excel начнет записывать ваши действия. Вы можете увидеть кнопку «Остановить запись» на вкладке «Разработчик», которая указывает, что выполняется запить макроса.
8. Выберите ячейку A2.
9. Введите текст «Excel» (или вы можете использовать свое имя).
10. Нажмите клавишу Enter. Вы попадете на ячейку A3.
11. Нажмите кнопку «Остановить запись» на вкладке «Разработчик».
    

Поздравляем! Вы только что записали свой первый макрос в Excel. Хотя макрос не делает ничего полезного, но он поможет нам понять как работает макрорекордер в Excel.

Теперь давайте рассмотрим код который записал макрорекодер. Выполните следующие действия, чтобы открыть редактор кода:

1. Удалите текст в ячейке A2. Это нужно, чтобы проверить будет ли макрос вставлять текст в ячейку A2 или нет.
2. Выберите любую ячейку — кроме A2. Это нужно проверить, выбирает ли макрос ячейку A2 или нет.
3. Перейдите на вкладку «Разработчик».
4. В группе «Код» нажмите кнопку «Макросы».
5. В диалоговом окне «Макрос» щелкните макрос «ВводТекста».
6. Нажмите кнопку «Выполнить».
   

Вы увидите, что как только вы нажмете кнопку «Выполнить», текст «Excel» будет вставлен в ячейку A2 и выбрана ячейка A3. Это происходит за миллисекунды. Но на самом деле макрос последовательно выполнил записанные действия.

Примечание. Вы также можете запустить макрос с помощью сочетания клавиш Ctrl + Shift + N (удерживайте клавиши Ctrl и Shift, а затем нажмите клавишу N). Это тот же самый ярлык, который мы назначили макросу при его записи.

Что записывает макрос?

Теперь перейдем к редактору кода и посмотрим что у нас получилось.

Вот шаги по открытию редактора VB в Excel:

1. Перейдите на вкладку «Разработчик».
2. В группе «Код» нажмите кнопку «Visual Basic».

Вы также можете использовать комбинацию клавиш Alt + F11 и перейти в редактор кода VBA.

Рассмотрим сам редактор кода. Далее коротко опишем интерфейс редактора.

• Панель меню: содержит команды, которые можно использовать во время работы с редактором VB.
• Панель инструментов — похожа на панель быстрого доступа в Excel. Вы можете добавить к ней дополнительные инструменты, которыми часто пользуетесь.
• Окно проектов (Project Explorer) — здесь Excel перечисляет все книги и все объекты в каждой книге. Например, если у нас есть книга с 3 рабочими листами, она появится в Project Explorer. Здесь есть несколько дополнительных объектов, таких как модули, пользовательские формы и модули классов.
• Окно кода — собственно сам код VBA размещается в этом окне. Для каждого объекта, указанного в проводнике проекта, есть окно кода, например, рабочие листы, книги, модули и т. д. В этом уроке мы увидим, что записанный макрос находится в окне кода модуля.
• Окно свойств — вы можете увидеть свойства каждого объекта в этом окне. Я часто использую это окно для обозначения объектов или изменения их свойств.
• Immediate Window (окно предпросмотра) — На начальном этапе оно вам не пригодится. Оно полезно, когда вы хотите протестировать шаги или во время отладки. Он по умолчанию не отображается, и вы можете его отобразить, щелкнув вкладку «View» и выбрав опцию «Immediate Window».

Когда мы записали макрос «ВводТекста», в редакторе VB произошли следующие вещи:

• Был добавлен новый модуль.
• Макрос был записан с именем, которое мы указали — «ВводТекста»
• В окне кода добавлена новая процедура.

Поэтому, если вы дважды щелкните по модулю (в нашем случае модуль 1), появится окно кода, как показано ниже.

Вот код, который записан макрорекодером:

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

Теперь давайте пробежим по каждой строке кода и опишем что и зачем.

Код начинается с Sub, за которым следует имя макроса и пустые круглые скобки. Sub — сокращение для подпрограммы. Каждая подпрограмма (также называемая процедурой) в VBA начинается с Sub и заканчивается End Sub.

• Range(«A2»).Select — эта строка выбирает ячейку A2.
• ActiveCell.FormulaR1C1 = «Excel» — эта строка вводит текст «Excel» в активной ячейке. Поскольку мы выбрали ячейку A2 в качестве первого шага, она становится нашей активной ячейкой.
• Range(«A3»).Select — выбор ячейки A3. Это происходит, когда мы нажимаем клавишу Enter после ввода текста, результатом которого является выбор ячейки A3.

Надеюсь, что у вас есть некоторое базовое понимание того, как записывать макрос в Excel.

Обращаем внимание, что код, записанный через макрорекордер, как правило, не является эффективным и оптимизированным кодом. Макрорекордер часто добавляет дополнительные ненужные действия. Но это не значит, что не нужно пользоваться макрорекодером. Для тех, кто только изучает VBA , макрорекордер может быть отличным способом проанализировать и понять как все работает в VBA.

Абсолютная и относительная запись макроса

Вы уже знаете про абсолютные и относительные ссылки в Excel? Если вы используете абсолютную ссылку для записи макроса, код VBA всегда будет ссылаться на те же ячейки, которые вы использовали. Например, если вы выберете ячейку A2 и введете текст «Excel», то каждый раз — независимо от того, где вы находитесь на листе и независимо от того, какая ячейка выбрана, ваш код будет вводить текст «Excel» в ячейку A2.

Если вы используете параметр относительной ссылки для записи макроса, VBA не будет привязываться к конкретному адресу ячейки. В этом случае программа будет «двигаться» относительно активной ячейки. Например, предположим, что вы уже выбрали ячейку A1, и вы начинаете запись макроса в режиме относительной ссылки. Теперь вы выбираете ячейку A2, вводите текст Excel и нажмите клавишу Enter. Теперь, если вы запустите этот макрос, он не вернется в ячейку A2, вместо этого он будет перемещаться относительно активной ячейки. Например, если выбрана ячейка B3, она переместится на B4, запишет текст «Excel» и затем перейдет к ячейке K5.

Теперь давайте запишем макрос в режиме относительных ссылок:

1. Выберите ячейку A1.
2. Перейдите на вкладку «Разработчик».
3. В группе «Код» нажмите кнопку «Относительные ссылки». Он будет подсвечиваться, указывая, что он включен.
   
4. Нажмите кнопку «Запись макроса».
   
5. В диалоговом окне «Запись макроса» введите имя для своего макроса. Например, имя «ОтносительныеСсылки».
   
6. В опции «Сохранить в» выберите «Эта книга».
7. Нажмите «ОК».
8. Выберите ячейку A2.
9. Введите текст «Excel» (или другой как вам нравится).
10. Нажмите клавишу Enter. Курсор переместиться в ячейку A3.
11. Нажмите кнопку «Остановить запись» на вкладке «Разработчик».

Макрос в режиме относительных ссылок будет сохранен.

Теперь сделайте следующее.

1. Выберите любую ячейку (кроме A1).
2. Перейдите на вкладку «Разработчик».
3. В группе «Код» нажмите кнопку «Макросы».
4. В диалоговом окне «Макрос» кликните на сохраненный макрос «ОтносительныеСсылки».
5. Нажмите кнопку «Выполнить».

Как вы заметите, макрос записал текст «Excel» не в ячейки A2. Это произошло, потому что вы записали макрос в режиме относительной ссылки. Таким образом, курсор перемещается относительно активной ячейки. Например, если вы сделаете это, когда выбрана ячейка B3, она войдет в текст Excel — ячейка B4 и в конечном итоге выберет ячейку B5.

Вот код, который записал макрорекодер:

Обратите внимание, что в коде нет ссылок на ячейки B3 или B4. Макрос использует Activecell для ссылки на текущую ячейку и смещение относительно этой ячейки.

Не обращайте внимание на часть кода Range(«A1»). Это один из тех случаев, когда макрорекодер добавляет ненужный код, который не имеет никакой цели и может быть удален. Без него код будет работать отлично.

Что нельзя сделать с помощью макрорекодера?

Макро-рекордер отлично подходит для вас в Excel и записывает ваши точные шаги, но может вам не подойти, когда вам нужно сделать что-то большее.

• Вы не можете выполнить код без выбора объекта. Например, если вы хотите, чтобы макрос перешел на следующий рабочий лист и выделил все заполненные ячейки в столбце A, не выходя из текущей рабочей таблицы, макрорекодер не сможет этого сделать. В таких случаях вам нужно вручную редактировать код.
• Вы не можете создать пользовательскую функцию с помощью макрорекордера. С помощью VBA вы можете создавать пользовательские функции, которые можно использовать на рабочем листе в качестве обычных функций.
• Вы не можете создавать циклы с помощью макрорекордера. Но можете записать одно действие, а цикл добавить вручную в редакторе кода.
• Вы не можете анализировать условия: вы можете проверить условия в коде с помощью макрорекордера. Если вы пишете код VBA вручную, вы можете использовать операторы IF Then Else для анализа условия и запуска кода, если true (или другой код, если false).

Расширение файлов Excel, которые содержат макросы

Когда вы записываете макрос или вручную записываете код VBA в Excel, вам необходимо сохранить файл с расширением файла с поддержкой макросов (.xlsm).

До Excel 2007 был достаточен один формат файла — .xls. Но с 2007 года .xlsx был представлен как стандартное расширение файла. Файлы, сохраненные как .xlsx, не могут содержать в себе макрос. Поэтому, если у вас есть файл с расширением .xlsx, и вы записываете / записываете макрос и сохраняете его, он будет предупреждать вас о сохранении его в формате с поддержкой макросов и покажет вам следующее диалоговое окно:

Если вы выберете «Нет», Excel сохранить файл в формате с поддержкой макросов. Но если вы нажмете «Да», Excel автоматически удалит весь код из вашей книги и сохранит файл как книгу в формате .xlsx. Поэтому, если в вашей книге есть макрос, вам нужно сохранить его в формате .xlsm, чтобы сохранить этот макрос.

Источник

Lari Пользователь Сообщений: 391 Регистрация: 07.09.2015

Доброго времени суток! Прошу помочь со следующим вопросом: Прислали тестовое задание где нужно построить сводную таблицу, но  в формате xlsb и с комментом включить макросы. Возможно там макрос который будет считать время выполнения задания, а может и вирус. Когда открываю файл и пытаюсь посмотреть код, то никаких макросов я не нахожу, при этом я не нажимаю клавишу “Включить содержимое”. Вопрос, как посмотреть код макроса не включая макросы. Вкладка “Разработчик” у меня активирована. Разработчик-Макросы и там только мои макросы из Personal. Файл не прилагаю.

БМВ Модератор Сообщений: 21551 Регистрация: 28.12.2016 Excel 2013, 2016	Проект может быть запаролен, Его может не быть и используются макрофункции как в именах так и в старом формате на листе макросов. По вопросам из тем форума, личку не читаю.

Lari Пользователь Сообщений: 391 Регистрация: 07.09.2015	БМВ,можно вам в личку написать по этому вопросу? (не за бесплатно)

	сделайте копию (сколько нужно) и экспериментируйте с этими копиями сколько душе угодно это никак не повлияет на исходный файл (положите его в архив, архив на флэшку,, а флешку положите в сейф) и приступайте к экспериментам удвчи! Программисты – это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!

БМВ Модератор Сообщений: 21551 Регистрация: 28.12.2016 Excel 2013, 2016	#5 23.06.2020 12:09:13 Цитата Lari написал: БМВ ,можно вам в личку написать по этому вопросу? (не за бесплатно) То есть вы напишите мне в личку, а я вам должен буду заплатить – это перебор. Даже обкуренный медведь понимает что его разводят. По вопросам из тем форума, личку не читаю.

Lari Пользователь Сообщений: 391 Регистрация: 07.09.2015	Ігор Гончаренко,так вопрос не в том что я поврежу исходник, а в том что если я запущу макрос, не запустит ли какой вирус. Как понять что за макросы там включатся?

Lari Пользователь Сообщений: 391 Регистрация: 07.09.2015	#7 23.06.2020 12:14:53 Цитата БМВ написал: Даже обкуренный медведь понимает что его разводят. Вроде отказ , но позитивно))) Плачу 300р., за то что бы я переслал файл с просьбой этот файл удалить после просмотра, и сообщить что делают макросы которые в этом файле. Взявшемуся. Наверное надо перенести эту тему в работу. Изменено: Lari – 23.06.2020 12:16:27

Юрий М Модератор Сообщений: 60700 Регистрация: 14.09.2012 Контакты см. в профиле	#8 23.06.2020 12:18:14 Цитата Lari написал: не запустит ли какой вирус. Теперь понятно, зачем Вы медведю хотите сбросить файл )

возьмите (подготовьте) компьютер на котором операционная система и офис запускайте свой файл максимум чем вы рискуете – нужно будет переустановить операционную систему и офис и перестаньте терзаться мыслями “что будет если?” делайте что-нибудь и увидите что будет и вообще… зачем вам нужен файл, которые даже ссыкотно открыть? (извините за бедность речи) нужен – открывайте, не нужен – удалите и забудьте о нем и заодно приостановите всякие сношения с людьми, которые присылают вам такие файлы (не ищите приключения на свою… операционку) хотя, если без риска жизнь пресна и скучна, то последнее не обязательно удачи! Программисты – это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!

Lari Пользователь Сообщений: 391 Регистрация: 07.09.2015	Ігор Гончаренко, с такой логикой, когда нужно проверить есть напряжение в сети или нет, можно совать туда пальцы)) Изменено: Lari – 23.06.2020 12:27:52

Андрей VG Пользователь Сообщений: 11878 Регистрация: 22.12.2012 Excel 2016, 365	#11 23.06.2020 12:32:27 Цитата Lari написал: когда нужно проверить есть напряжение в сети или нет, можно совать туда пальцы Правильно ли я понимаю, что именно поэтому вы хотите, чтобы медведь совал пальцы? Поставьте LibreOffice и смотрите код.

БМВ Модератор Сообщений: 21551 Регистрация: 28.12.2016 Excel 2013, 2016	Lari,  ну не обязательно другой комп или даже виртуалку. Достаточно другого пользователя с правами рядового пользователя, а не админа. Максимум испортит этого пользователя, а к системным настройкам его не пустит. Ну если хотите  – присылайте. По вопросам из тем форума, личку не читаю.

Ігор Гончаренко Пользователь Сообщений: 13753 Регистрация: 01.01.1970

#13 23.06.2020 12:33:13 Цитата Lari написал: с такой логикой, когда нужно проверить есть напряжение в сети или нет, можно совать туда пальцы)) правильно! я еще, обычно, в этот момент сжимаю в зубах отвертку максимум, при высоком напряжении – я перекусывал отвертку (и это было всего-то пару раз) Программисты – это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!

БМВ Модератор Сообщений: 21551 Регистрация: 28.12.2016 Excel 2013, 2016

#14 23.06.2020 12:39:40 Off Цитата Андрей VG написал: Поставьте LibreOffice и смотрите код. Цитата Lari написал: когда нужно проверить есть напряжение в сети или нет, можно совать туда пальцы)) Розетка вскрывается, и напряжение проверяется тыльной стороной ладони :-), но только к одному из контактов. В этом случае судорогой отбрасывает руку от места контакта 🙂 Отвертка – да она обзательно зажимается в зубах, а чем её держать если одна рука – пробник, а вторая отсутствует после предыдущей пробы.   Хорошая тема для предпраздничного ( у некоторых) офтопа По вопросам из тем форума, личку не читаю.

Андрей_26 Пользователь Сообщений: 647 Регистрация: 30.01.2018	#15 23.06.2020 12:58:49 Цитата Lari написал: Прислали тестовое задание где нужно построить сводную таблицу, но  в формате xlsb и с комментом включить макросы. Ну так сохраните файл в формате xlsx, таким образом все макросы удалятся. И делайте свое задание спокойно.

Lari Пользователь Сообщений: 391 Регистрация: 07.09.2015

#16 23.06.2020 13:09:55 установил либреофис как порекомендовал Андрей VG, я так понял что это время начала и конца выполнения задания Код Rem Attribute VBA_ModuleType=VBADocumentModule Option VBASupport 1 Private Sub Workbook_BeforeClose(Cancel As Boolean) Worksheets("Инфо").Activate lLastRow = Cells(Rows.Count, 3).End(xlUp).Row Range("C" & lLastRow + 1) = Now Worksheets("задание").Activate ActiveWorkbook.Save End Sub Private Sub Workbook_Open() Worksheets("Инфо").Activate lLastRow = Cells(Rows.Count, 1).End(xlUp).Row Range("A" & lLastRow + 1) = lLastRow - 1 Range("B" & lLastRow + 1) = Now Range("D" & lLastRow + 1) = Application.UserName Worksheets("задание").Activate End Sub Изменено: Lari – 23.06.2020 13:15:47

БМВ Модератор Сообщений: 21551 Регистрация: 28.12.2016 Excel 2013, 2016	верно , с  протоколом, сколько раз запускали закрывали. По вопросам из тем форума, личку не читаю.

vikttur Пользователь Сообщений: 47199 Регистрация: 15.09.2012	Теперь, удотоверившись, что злобные вирусы не погрызут папки, можете спокойно выполнять задание

Юрий М Модератор Сообщений: 60700 Регистрация: 14.09.2012 Контакты см. в профиле	Lari, у Вас такие злобные преподаватели, что могут в задании прислать вирус?

БМВ Модератор Сообщений: 21551 Регистрация: 28.12.2016 Excel 2013, 2016

#20 23.06.2020 13:18:51 Цитата vikttur написал: что злобные вирусы не погрызут папки, можете спокойно выполнять задание Сижу на даче, работаю дистанционно. Кот паршивец удирает с участка, достало выуживать, при этом он на меня за это обижен, сильно. Так читаю: что злобные вирусы не погрызут тапки. Видимо опасаюсь, за свои  🙂 Изменено: БМВ – 23.06.2020 13:19:32 По вопросам из тем форума, личку не читаю.

Юрий М Модератор Сообщений: 60700 Регистрация: 14.09.2012 Контакты см. в профиле	#21 23.06.2020 13:25:50 Цитата БМВ написал: Кот паршивец ээээ, я бы попросил!

Lari Пользователь Сообщений: 391 Регистрация: 07.09.2015	#22 23.06.2020 13:26:42 Цитата Lari написал: Плачу 300р., за то что бы я переслал файл с просьбой этот файл удалить после просмотра, и сообщить что делают макросы которые в этом файле. БМВ,куда вам можно перечислить благодарность?

Lari Пользователь Сообщений: 391 Регистрация: 07.09.2015	Юрий М, не преподаватели, с работой связано. недавно читал новости что присылают ексель с макросом вирусным, и поэтому с опаской отнесся к такому файлу.

БМВ Модератор Сообщений: 21551 Регистрация: 28.12.2016 Excel 2013, 2016	#24 23.06.2020 13:29:19 Цитата Lari написал: БМВ ,куда вам можно перечислить благодарность? Есть у меня номерок карточки одного паршивца, но так как коллективный разум был, то он без обеда сегодня 🙂 Так сказать на пользу фигуре. По вопросам из тем форума, личку не читаю.

1. фиксируете в памяти точное время, когда открыли файл 2. выполняете задание, час, два, сутки, двое…. 3. устанавливаете в системе время зафиксированное в п.1 + 1 минута (2, 5) 4. закрываете файл 5. возвращаете в систему реальное время 6. отсылаете файл с заданием Поздравляю! вы справились с заданием приблизительно за одну (2, 5) минут! Программисты – это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!

Юрий М Модератор Сообщений: 60700 Регистрация: 14.09.2012 Контакты см. в профиле

Lari Пользователь Сообщений: 391 Регистрация: 07.09.2015

Ігор Гончаренко, если обсуждать способы мухлевания то если я не запускаю макросы при открытии , то и время не будет считаться. Тогда выполняю так: копирую данные на основании которых надо селать задание, продумываю в другом файлике. А в конце в этом файлике выполняю за нужное время с включением макросов. Но я тк делать не буду, потому что если я напущу пыли в глаза а потом попаду в реальный бой, то поплачусь за это. Изменено: Lari – 23.06.2020 13:38:07

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

БМВ Модератор Сообщений: 21551 Регистрация: 28.12.2016 Excel 2013, 2016	Игорь, ну если честно, то открывая файл с макросами на пк подключенном к инету через NAT вероятность того что все что доступно текущему пользователю будет благополучно выгружено во внешний мир или просто испорчено – есть. Так что рядовая копия – это не совсем то что хотелось бы. А даже тут были примеры которые корежили интерфейс. Так что … По вопросам из тем форума, личку не читаю.

Lari Пользователь Сообщений: 391 Регистрация: 07.09.2015	#30 23.06.2020 14:37:12 Большое спасибо за помощь всем принявшим участие!