Дѣаволъ

Правило простое: не работай в ветке master https://github.com/bopoh13/docs/wiki/Teamwork-Git

Много действий надо сделать, поэтому часто люди заполняют руками. К тому же нужно придумать по какому событию будет производиться расчёт (или вызывать макрос из вкладки "Вид"; автоматический расчёт делают формулы в Excel).

1. Включить в настройках вкладку "Разработчик", Режим конструктора, добавить Элементы управления (на картинке в красной рамке). Рекомендую через свойства полей указать ТЕГИ (например, dateProd, dateExp), и следить, чтобы не было разных полей с одинаковым тегом. Отключить Режим конструктора.
   
2. Открыть редактор VBA (первая кнопка во вкладке "Разработчик").
   
3. Создать модуль в документе. Написать функцию расчёта значения (для примера нужно прибавить 7 дней):
   

Sub ShelfLife()
  '345678901234567890123456789012345bopoh13@ya67890123456789012345678toster56789
  Dim objCC As ContentControl, counter As Variant
  Dim dateProdIndex As Byte, dateExpIndex As Byte
  
  With ActiveDocument
    For Each objCC In .ContentControls
      counter = counter + 1
      Select Case objCC.Tag
        Case "dateProd": dateProdIndex = counter
        Case "dateExp": dateExpIndex = counter
      End Select
    Next objCC: Set objCC = .ContentControls(dateProdIndex)
    
    If .ContentControls(dateExpIndex).LockContents _
      Xor objCC.PlaceholderText = objCC.Range.Text Then counter = 0
    
    If dateProdIndex > 0 And dateExpIndex > 0 And counter > 0 Then
      counter = CDbl(CDate(objCC.Range.Text)) + 7
      .ContentControls(dateExpIndex).Range.Text = CDate(counter)
    Else
      MsgBox "Поле с тегом dateProd или dateExp не заполнено. " & vbCrLf _
        & "Или содержимое поля dateExp нельзя редактировать. ", vbExclamation
    End If
  End With
End Sub

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

https://github.com/kovacsv/Online3DViewer Можно загружать несколько файлов сразу: obj, mtl, (dds и tda нет).
Модели: https://p3dm.ru/files/auto/tanks/14194-is-2.html и https://p3dm.ru/files/auto/tanks/13814-t-34-85.html

https://pageclip.co/

DiscordJS имеет метод awaitMessages (gitbook может тупить). В примере ожидание ответа 'test' в течение 30 сек.
На python должно быть что-то похожее.

Данные уже вытащили из PDF, - на мой взгляд самое мерзкое занятие.
Вы поставили тег Excel, и я полагаю вам нужен запрос на VBA к геокодеру через функцию (в примере указан геокодер Nominatim,^{на nginx не разворачивается, только на Apache} запросы можно делать не чаще в 1 сек).

Function GetResponse(ByVal request As String, _
  Optional ByVal lowerCase As Boolean = True) As String
  '345678901234567890123456789012345bopoh13@ya67890123456789012345678toster56789
  Const TIMEOUT As Double = 6 ' sec
  Const uRL As String = "https://nominatim.osm.org/search?county=RU&format=geocodejson&q="
  
  If lowerCase Then request = LCase(request)
  Static winhttp As Object ' WinHttpRequest
  
  On Error Resume Next
    If winhttp Is Nothing Then
      Set winhttp = CreateObject("WinHttp.WinHttpRequest.5.1")
    Else
      If Not winhttp.Status = 200 Then ' Error
        Set winhttp = Nothing
        End 'or MsgBox "to many requests", vbCritical: Exit Function
      End If
    End If
    
    ' Replace characters to "%"+HEX in UTF-8 (and SPACE to PLUS), except DIGIT (%30-%39), 
    ' except ALPHA (%41-%5A and %61-%7A), hyphen (%2D), period (%2E), underscore (%5F), tilde (%7E)
    request = Replace(Replace(request, ",", ",%20"), "%20-,", "")
    ' The True <- specifies async behaviour
    winhttp.Open "GET", uRL & request, True: DoEvents
    ' Add Headers
    winhttp.SetRequestHeader "Pragma", "private"
    winhttp.SetRequestHeader "Cache-Control", "no-store"
    winhttp.Send: DoEvents
    
    If Not winhttp.WaitForResponse(TIMEOUT) Then
      Debug.Print "timeout", uRL & request: Exit Function
    ElseIf winhttp.Status = 429 Then
      Debug.Print "to many requests", uRL: Exit Function
    End If
    
    GetResponse = winhttp.responseText
    ' Check response length
    If Not Len(GetResponse) > 189 + Len(Replace(request, "%20", " ")) Then
      Debug.Print uRL & request
    End If
End Function

В ответе будут объекты в формате GEOJSON, которые также нужно будет обработать. Рекомендую выбирать тип точек по следующим значениям: "city", "town", "village", "hamlet", "isolated_dwelling", "locality".

Если карта будет интерактивная, рекомендую использовать плагин Leaflet (не лагает как Гугл. Кстати, к геокодеру Гуглу можно обращаться руками через сайт).

+
Как использовать отладчик:

1. Открыть MS Excel
2. Открыть VBA в приложении (Alt+F11)
3. Выбирать в меню Insert -> Module
4. Скопировать функцию, и написать её вызов в отдельной процедуре
5. Нажать F5 для выполнения процедуры

Как открыть файл на gitHub? или

https://docs.google.com/viewer?url=https://raw.githubusercontent.com/{url}

https://stackoverflow.com/questions/23590420/pictu... ниже в комментах есть ссылка

Применимо к выделенному абзацу, так:

With Selection.ParagraphFormat
  .LineSpacingRule = wdLineSpaceSingle
  .FirstLineIndent = CentimetersToPoints(1.6)
End With

Вспоминать email и вбивать в форму https://github.com/password_reset

Для начала убедитесь, что часовой пояс отличается:

console.log( new Date(client.user.createdTimestamp).toString() );

Нужно устанавить пакет для NodeJS:
npm install moment-timezone [справка]
Объявить и проверить:

var moment = require('moment-timezone');
console.log( moment(client.getTimestamp).tz('Europe/Moscow').format('HH:mm:ss') );

Ответ про установку статуса в вопросе: Как сделать статус бота discord.js?

• Node.js - npm
  
• PHP - composter *
  
• Ruby - rubygems
  
• Java - maven
  
• other - git submodules (GitHub)
  

Для выделения одного или нескольких объектов щелкните на них, удерживая нажатой клавишу Shift. Затем переместите объекты. Группировкой выделяют группы объектов для ускорения изменения их атрибутов.

Для объектов, коллекций, массивов есть окно Locals Window (показывает дерево для отладки текущей функции по F8).

Закончилась поддержка https://support.microsoft.com/en-us/help/273711/.

Для этой задачи лучше подойдёт сводная таблица (способ #4, выбрать "Итоги по" = Количество).
Если сложно, то можно создать промежуточную таблицу формулой СЧЁТЕСЛИ, затем отсортировать по убыванию.

ЗЫ: Не указана версия. В Excel 2016 есть новые формулы МАКСЕСЛИ/МИНЕСЛИ.