Выбрать дату в календареВыбрать дату в календаре

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 141 След.
Кусочно-линейная интерполяция
 
Пара исторических ссылок по теме:
1. Работа с графиками
2. Линейная интерполяция
Там разные варианты, в том числе, от MCH и от С.М.
Приложил оттуда 2 своих варианта
Изменено: ZVI - 26.09.2021 04:31:54
Как отключить постоянно вылетающее окно "Некоторые файлы могут содержать вирусы или другое опасное содержимое... "
 
Нет фиксированного набора ключей реестра, которые нужно править, все зависит от установленных приложений, еще и от порядка их установки.
Отмечалось уже, что сообщения могут быть разными, например, если файл MP4 не разблокирован, то предупреждение безопасности операционной системы будет "Вы хотите открыть это файл?" - точно такое же, как при двойном клике на файле в проводнике, и это не лечится флагом EditFlags - требуется разблокировка файла, которая тоже ранее описывалась.
Мы с Вами прошли длинный путь по решению проблемы через реестр с MP3, но сейчас Вы не указали, о каком именно сообщении идет речь для MP4, а также - разблокирован ли MP4 или нет.

Так как компьютер локальный, то давайте попробуем сделать проще через изменение политики безопасности:
1. Нажать "Win"+"R",  или правый клик на иконке "Пуск" и затем "Выполнить", чтобы перейти в командную строку
2. Ввести: gpedit.msc и нажать OK
3. Перейти в раздел "Конфигурация пользователя" - "Административные шаблоны" - "Компоненты Windows" - "Диспетчер вложений"
4. В окне справа двойной клик на "Список включений для типов файлов с низким уровнем риска"
5. Выбрать "Включено", в поле "Параметры" вписать: .mp3;.mp4 (обратите внимание на точку!) и нажать OK
В реестре этот список расширений пропишется в строковый параметр:
HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\­Policies\Associations\LowRiskFileTypes
Можно создать этот ключ в реестре и вручную, его значение: .mp3;.mp4
Изменено: ZVI - 21.09.2021 04:53:33
Как отключить постоянно вылетающее окно "Некоторые файлы могут содержать вирусы или другое опасное содержимое... "
 
Цитата
Dalm написал: ...почему-то такие же ссылки на файлы mp4 - показывают окна-предупреждения
Рад, что заработало с MP3.
Здесь речь шла только о файлах с расширением MP3.
Для расширений MP4 нужно сделать аналогично, и не забыть разблокировать эти файлы.
Изменено: ZVI - 20.09.2021 13:18:40
Как отключить постоянно вылетающее окно "Некоторые файлы могут содержать вирусы или другое опасное содержимое... "
 
Цитата
Dalm написал: ...перезагружать компьютер надо...
Нет, перезагружать комп или Excel не требуется.
Пропись в PLEX
 
Цитата
Perec написал: ...так в английском языке не принято писать...
Пишут так тоже, а для чеков - вообще иначе.
Код того, что Вам нужно, есть в примере Microsoft по ссылке: http://support.microsoft.com/kb/213360
Но там для долларов и центов. Легко можно переделать для Евро и Евроцентов, еще и учесть различные символы разделителя целой и дробной части - см.приложенную модификацию кода под спойлером.
Вызывается в ячейке так: =EuroEn(A1) , где сумма - в A1.
Код

P.S. Это решение - вне Plex, конечно.
Изменено: ZVI - 16.09.2021 22:37:45
Как отключить постоянно вылетающее окно "Некоторые файлы могут содержать вирусы или другое опасное содержимое... "
 
Про прежний EditFlags есть в п.3 инструкции сообщения #41:
(Если EditFlags уже был, то предварительно переименовать его, например, в OldEditFlags)
Как отключить постоянно вылетающее окно "Некоторые файлы могут содержать вирусы или другое опасное содержимое... "
 
Добавьте в HKEY_CLASSES_ROOT\WMP11.AssocFile.MP3 параметр DWORD (32 бита) EditFlags со значением 10000, аналогично тому, что сделали для VLC.mp3 по методике из #41

По поводу "У меня нет в 'Свойствах - вкладка общие' такой опции как 'Разблокировать'" - и не будет, если файл разблокирован или если операционка старая.
Изменено: ZVI - 14.09.2021 14:51:48
Как отключить постоянно вылетающее окно "Некоторые файлы могут содержать вирусы или другое опасное содержимое... "
 
Уточните значение, которое отображается при двойном клике на:
HKEY_CLASSES_ROOT\.mp3\(По умолчанию)
а также при двойном клике на:
HKEY_CLASSES_ROOT\.mp3\VLC.backup

Если нет "Свойства - вкладка Общие - Разблокировать", то файл не заблокирован.
Скачайте с Интерента на диск любой файл mp3 и посмотрите то же самое на нём, просто ради интереса.
Изменено: ZVI - 14.09.2021 01:53:13
Как отключить постоянно вылетающее окно "Некоторые файлы могут содержать вирусы или другое опасное содержимое... "
 
Добрый день. Очень важно на какие файлы ссылается гиперссылка.
Тему я смотрел бегло, вложения не открывал, считал, что речь о ссылках на Excel-файлы, поэтому показал, как в таком случае убрать предупреждения.

Но у Вас ссылки на MP3 файлы, а это решается не настройками MS Office, а настройками реестра операционной системы HKEY_CLASSES_ROOT, в ключе EditFlags раздела, отвечающего за запуск приложения по умолчанию при двойном клике на файле MP3. Владимир (sokol92) об этом здесь уже информировал, просто у конкретного компьютера настройки запуска MP3 по умолчанию могут отличаться.

Ниже приведен пример настройки реестра для моего компьютера, у которого MP3 запускает Winamp.exe, раздел реестра:
HKEY_CLASSES_ROOT\Winamp.File
Вместо Winamp.File на конкретном компьютере нужно использовать значение из:
HKEY_CLASSES_ROOT\.mp3\(По умолчанию)

Инструкция:
1. В реестре правый клик на: HKEY_CLASSES_ROOT\Winamp.File (см. комментарий выше)
2. После правого клика – Создать - Параметр DWORD (32 бита)
3. Вместо «Новый параметр #1» написать: EditFlags и нажать Enter.
(Если EditFlags уже был, то предварительно переименовать его, например, в OldEditFlags)
4. Двойной клик на EditFlags, ввести 10000 в поле «Значение» (система исчисления - шестнадцатеричная), нажать Enter.

Поэкспериментируйте с настройками реестра, как указано выше.
Чтобы не возникали еще и сообщения операционной системы типа: «Вы хотите открыть этот файл?», нужно разблокировать файл(ы) MP3 - правый клик на файле - Свойства - вкладка Общие - Разблокировать.
Изменено: ZVI - 11.09.2021 05:35:17
Как отключить постоянно вылетающее окно "Некоторые файлы могут содержать вирусы или другое опасное содержимое... "
 
Скриншот я спрашивал, чтобы посмотреть ссылку, которую Вы закрасили.
Чтобы не показывать реальный путь, создайте ссылку на какой- нибудь тестовый файл (он может и отсутствовать), например,  на C:\Temp\Test.xlsb , кликните на ячейку с такой ссылкой и сделайте скриншот сообщения.

Проверьте также и после того, как с файла C:\Temp\Test.xlsb будет снята блокировка (в проводнике правый клик на файле - Свойства - вкладка Общие - Разблокировать)
Изменено: ZVI - 07.09.2021 03:57:55
А не пора ли пересмотреть требование к названию темы?
 
Дмитрий, когда-то у многих были более жесткие правила, потом их почти везде смягчили.
Вот текущая ссылка - Forum Rules
Перевод п.1:
1. Заголовок должен кратко излагать ваш запрос. (см. A, Z)
A. Модератор отредактирует заголовок или добавит теги кода VBA или добавит / удалит ссылки для новых участников, а также предупредит и потребует соблюдения требований для более опытных участников.
Z. Претензии не предъявляются
Z* Как Z, за исключением того, что рецидивистам будет засчитано нарушение.

Михаилу (БМВ) спасибо, что указал актуальную ссылку.
А по теме - поддерживаю!
Изменено: ZVI - 07.09.2021 00:27:32
А не пора ли пересмотреть требование к названию темы?
 
Добрый день, горячие парни! :)
Как по мне, форум должен ориентироваться, в первую очередь, на тех, кому нужна помощь, не в ущерб помогающим, конечно.
Не знаю зарубежных форумов по Excel/VBA с подобными требованиями к названиям тем, там обычно ограничиваются рекомендациями по формулировке вопросов и гораздо реже отсылают к правилам, в которых обычно - про запрет грубости, наездов, персональных данных, об информировании о дубликатах тем на других форумах и т.п.

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

Понятно, что некоторые старожилы считают форум чуть ли не своим домом и поэтому склонны навязывать свою мораль.
Друзья, а спросите сами себя, высокоморально ли в рабочее время так много времени проводить на форуме, даже помогая другим? Вопрос, конечно, риторический :)
Кстати, о тех, кому нужна помощь – им как раз чаще всего это нужно по работе.
Так что я больше за тех, кому помогают. В пределах правил, конечно.
Кстати, помогающие обычно сами предлагают более правильное название темы, помогая и по теме, и модераторам. Это, наверное, можно дописать в рекомендации, если так уж насущно.
Изменено: ZVI - 06.09.2021 18:36:53
Как отключить постоянно вылетающее окно "Некоторые файлы могут содержать вирусы или другое опасное содержимое... "
 
Цитата
Dalm написал: ... по-прежнему вылетают окна-предупреждения
1. Приложите скриншот сообщения после нажатия ссылки в ячейке на локальный файл.

2. Проверьте, что в реестре:
HKEY_CURRENT_USER\Software\Microsoft\Office\16.0\Common\Security\DisableHyperlinkWarning имеет тип DWORD32 и значение 1.
и что существует пустой раздел:
HKEY_CURRENT_USER\Software\Policies\Microsoft\Office\16.0\Common\Security\Trusted Protocols\All Applications\Excel:
Проверьте также, нет ли аналогичных ветвей в HKEY_LOCAL_MACHINE

3. Проблема на личном компьютере или на корпоративном (с администратором сети)?
Изменено: ZVI - 06.09.2021 16:43:36
Как отключить постоянно вылетающее окно "Некоторые файлы могут содержать вирусы или другое опасное содержимое... "
 
Добрый день, Владимир!
Делал когда-то в 2017-м.
Проблема была в том, чтобы создать программно раздел "Excel:", а придумалось вот так )
Изменено: ZVI - 04.09.2021 20:17:25
Как отключить постоянно вылетающее окно "Некоторые файлы могут содержать вирусы или другое опасное содержимое... "
 
Добрый день.
1. Загрузите приложенный файл на диск.
2. Разблокируйте его (правый клик на файле - Свойства - вкладка Общие - Разблокировать).
3. Загрузите в Excel с разрешенными макросами, проблема автоматически исправится.
Пароль к коду VBA - 123
Расчет Z-спреда для облигации
 
UDF со своим быстрым (пара мс) подбором параметра - задачка интересная.
МатросНаЗебре, если что - готов помочь просто интереса ради, хотя бы соображениями.
Excel + Outlook. Как сделать общую надстройку?
 
Можно и не регистрировать - зависит от типа DLL и метода загрузки.
Уже уточнял - VBA-надстроек в outlook не бывает, то есть прямой ответ по теме - невозможно.
Можно в Excel в VBE-Refereтces воспользоваться ранним связыванием с Outlook и что-то там отслеживать, но при этом будет много проблем.
По теме - непонятно, что должен делать код в Outlook и как запускаться: по событиям, по Alt-F8 или по кнопке на ленте.
"Приходится дублировать один и тот же код и туда, и туда" - что за код?
Изменено: ZVI - 25.08.2021 19:49:40
Перебор папок Outlook, Перебор папок Outlook и сохранение вложений
 
Код
Sub FindParentFolder()
  
  Const olFolderInbox = 6
  Dim objOutlApp As Object
  Dim oIncoming As Object
  
  On Error Resume Next
  Set objOutlApp = GetObject(, "Outlook.Application")
  If Err Then Set objOutlApp = CreateObject("Outlook.Application")
  On Error GoTo 0
     
  Set oIncoming = objOutlApp.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox).Parent.Folders("РПРЦ")
  Debug.Print oIncoming.Items.Count
  ' Дальше - перебор в папке oIncoming

End Sub
Изменено: ZVI - 24.08.2021 23:30:51
Excel + Outlook. Как сделать общую надстройку?
 
Цитата
kefirko написал: Соответственно нельзя использовать один общий файл как надстройку для обоих приложений, хотя и те, и другие написаны на VBA
Добрый день. Надстроек для Outlook на VBA не бывает, только COM-надстройки (см. на ленте Разработчик - Надстройки COM), а на VBA там только макросы.
Удобное внедрение языка программирования "Python" в файл Excel на основе портативной сборки Python, Настроенный файл Excel для удобного вызова скриптов Python из Excel
 
bedvit, Добрый день, Виталий. Да, правильно понимаете. Как работает? - Медленно и достаточно ограниченно.
Еще и асинхронно, но какие-то методы обхода проблем асинронности там принимались.
Защита кода тоже была условной, когда я это смотрел (несколько лет тому назад).
Изначально там, например, не было быстрого копирования значенией из массива в ячейки, как это встроено в VBA, но по просьбе MVPs была добавлена какая-то неполная альтернитива. Отмечу, что со стороны MS была достаточно опратичная реакция на запросы и замечания MVPs, отвечал и дорабатывл framework автор идеи.
Но меня все это интересовало поверхностно из-за изрядно ограниченной функциональности и скорости кода (в 2 и более раза медленнее, чем VBA).
Если вопрос о том, каким именно образом устроен механизм реализации JS API внутри Excel  и framework-а для взаимодействия с локальной версией Excel, то такая информация мне не попадалась, да и незачем MS ее раскрывать - достаточно описания API.
Вроде в курилке давно была тема о том, что появился JS API.
Изменено: ZVI - 06.06.2021 16:25:11
Удобное внедрение языка программирования "Python" в файл Excel на основе портативной сборки Python, Настроенный файл Excel для удобного вызова скриптов Python из Excel
 
Цитата
Сергей написал:
А разве JavaScript встроен в Excel
Для этого есть framework от MS: Excel JavaScript API overview
Пример - Work with worksheets using the Excel JavaScript API
Изменено: ZVI - 06.06.2021 12:11:19
Удобное внедрение языка программирования "Python" в файл Excel на основе портативной сборки Python, Настроенный файл Excel для удобного вызова скриптов Python из Excel
 
Сергей, добрый день.
Питон вне моих интересов, но спасибо за предложенное интересное решение с подробным описанием и ссылками.
Встречал запросы на эту тему на форумах без внятных ответов.
По моему, любые альтернативные варианты автоматизации Excel найдут чью-то заинтересованность, насмотря на встроенные возможности (VBA, XLL, JS и т,.п.)
Удачи Вам в развитии решения!
Защита от взлома пароля на проект VBA, Есть ли какие-нибудь идеи или алгоритмы такой защиты.
 
Цитата разработчика защиты Unviewable+  в вольном переводе:
"Если моя зашита оградит от доступа 99% любителей, то я спокойно смогу жить с оставшимся 1% профи, которые, скорее всего, знают больше, чем я. И если бы они захотели, то написали бы то, что написал я намного лучше, более эффективно и значительно чище!"
Изменено: ZVI - 07.03.2021 10:11:38
Защита от взлома пароля на проект VBA, Есть ли какие-нибудь идеи или алгоритмы такой защиты.
 
Цитата
Marat Ta написал: Есть какие то новые разработки в этой области защиты файлов Excel?
В Excel есть старая надежная защита паролем именно файлов при открытии.  Но после открытия в Excel такая книга в памяти легкодоступнее.
Если Вы о защите кода VBA, то помимо обфускации там можно хитрить, но это не обсуждается. Надежнее, когда какая-то критическая часть кода хранится во внешней DLL, а основной код VBA вызывает функции этой DLL.
Как нажать кнопку(control As IRibbonControl) из надстройки?
 
Код
Application.Run "НадстройкаМоя.xlam!Module1.myButton", Nothing
Долгая передача данных из recordset в массив методом Getrows (VBA)
 
Доюбрый день.
Обычно так и советуют - выгрузить на временный лист через CopyFromRecordset и считывать в массив.
Можно поэкспериментировать:
1. rs.CursorLocation = adUseClient, иногда может помочь за счет локального кеширования строк rs, если база данных не локальная и сервер тормознутый.
2. rs.LockType = adLockOptimistic, это может исключить медленную блокировку записей на сервере во время запроса. Зависит от провайдера, конечно.
Изменено: ZVI - 14.02.2021 04:54:00
Защита книги
 
Цитата
lsod написал: проект VBA будем защищать данным решением
Добрый день.
Чтобы не принять ошибочное решение - использование Unviewable+ VBA Project For Excel имеет смысл, если VBA код хранится в отдельной защищенной надстройке, а книга с данными использует этот VBA-код. После сохранение XLSM (книгу же предполагается периодически сохранять) не вся, но самая интересная часть защиты Unviewable+ с книги слетает, сообщаю это, так как ранее обсуждалось здесь. Вообще, обсуждение деталей защиты кода дает подсказки по методам вскрытия кода, что правилами форума запрещено, поэтому с этим лучше поосторожнее ))
Странный стиль ссылок на ячейки
 
Заменить имена на ссылки можно либо вручную (поиск-замена), либо с помощью надстройки Name Manager (вверху формы 6-я кнопка справа)
Странный стиль ссылок на ячейки
 
Это именованные ячейки или диапазоны ячеек.
Их адреса можно посмотреть, выбрав на ленте:  Формулы -  Диспетчер имен
Изменено: ZVI - 23.01.2021 17:04:39
Как огромную таблицу Word экспортировать в Excel
 
Добрый день. Замена компа не поможет, но повод заменить - хороший ))
Такой код в Excel отработал у меня на примере из сообщения #11 за 15 секунд:
Код
Sub WordTableToExcel()
'ZVI:2021-01-19 https://www.planetaexcel.ru/forum/index.php?PAGE_NAME=read&TID=136468#message1109953

  Dim a, b()
  Dim r As Long, c As Long, rs As Long, cs As Long, i As Long
  Dim t As Single, t1 As Single
  
  t = Timer: t1 = t
  On Error GoTo exit_
  Debug.Print "Read",
  With GetObject(, "Word.Application").ActiveDocument.Tables(1)
    rs = .Rows.Count
    cs = .Columns.Count
    a = Split(.Range.Text, Chr(13) & Chr(7))
    .Parent.Close False
  End With
  Debug.Print Round(Timer - t, 3) & " s": t = Timer
  
  Debug.Print "Rebuild",
  ReDim b(0 To rs, 0 To cs - 1)
  For r = 0 To rs - 1
    For c = 0 To cs
      If c < cs Then b(r, c) = a(i)
      a(i) = Empty
      i = i + 1
    Next
  Next
  Debug.Print Round(Timer - t, 3) & " s": t = Timer
  
  Debug.Print "Write",
  Range("A1").Resize(rs, cs).Value = b()
  Debug.Print Round(Timer - t, 3) & " s"
  Debug.Print "Total", Round(Timer - t1, 3) & " s"
  
exit_:
  If Err Then MsgBox Err.Description, vbExclamation, "Word document not found!"
  
End Sub

Для экономии общей памяти (это не обязательно) документ Word закрывается строчкой .Parent.Close False
Изменено: ZVI - 19.01.2021 07:08:27
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 141 След.
Наверх