Вверх ↑
Этот топик читают: Гость
Ответов: 537
Рейтинг: 14
#31: 2023-12-18 21:48:30 ЛС | профиль | цитата
Gunta писал(а):
Есть ли у вас в меню Excel этот пункт?

У меня нет в меню, получить из PDF файла
карма: 4

0
Ответов: 8881
Рейтинг: 822
#32: 2023-12-18 22:55:02 ЛС | профиль | цитата
Gunta, при попытке открыть ваш *.pdf файл прямо из Excel возникает это же сообщение
А при открытии файла Nitro Pro вполне себе конвертируется в Excel штатной кнопочкой Convert

Редактировалось 1 раз(а), последний 2023-12-18 22:55:39
карма: 19

0
Ответов: 651
Рейтинг: 138
#33: 2023-12-19 11:59:24 ЛС | профиль | цитата
Леонид писал(а):
при попытке открыть ваш *.pdf файл прямо из Excel возникает это же сообщение

Какая версия Excel у вас установлена?

Add(MainForm,2953706,154,105)
{
link(onCreate,7960161:doString,[])
}
Add(FormatStr,7960161,217,119)
{
Mask="Dim oRegistry, oFSO, sKey, sAppExe, sValue, sAppVersion\r\nConst HKEY_LOCAL_MACHINE = &H80000002\r\n\r\nSet oRegistry = GetObject("winmgmts:{impersonationLevel=impersonate}//./root/default:StdRegProv")\r\nSet oFSO = CreateObject("Scripting.FileSystemObject")\r\nsKey = "Software\Microsoft\Windows\CurrentVersion\App Paths"\r\nsAppExe = "excel.exe"\r\noRegistry.GetStringValue HKEY_LOCAL_MACHINE, sKey & "\" & sAppExe, "", sValue\r\nsys.onEvent "Версия Excel - " & oFSO.GetFileVersion(sValue)\r\nSet oFSO = Nothing\r\nSet oRegistry = Nothing"
link(onFString,7794985:##SetScript,[])
}
Add(VBJScript,7794985,280,119)
{
WorkPoints=#11:##SetScript|
EventPoints=#7:onEvent|
Script=#0:|0:|
UseName=0
link(onEvent,1086786:doAdd,[])
}
Add(Memo,1086786,336,119)
{
Left=550
Top=160
Align=5
Font=[MS Sans Serif,15,0,0,1]
ScrollBars=3
}

У меня - Версия Excel - 16.0.16501.20196

Есть ли меню в excel "Данные -> Получить данные -> Из файла- > Из PDF"?
карма: 14

0
Ответов: 8881
Рейтинг: 822
#34: 2023-12-19 12:40:44 ЛС | профиль | цитата
Excel - 16.0.10730.20102
НетPdf.jpg
карма: 19

0
Ответов: 537
Рейтинг: 14
#35: 2023-12-19 13:32:26 ЛС | профиль | цитата
Версия Excel - 16.0.12527.22286
карма: 4

0
Ответов: 282
Рейтинг: 23
#36: 2023-12-19 14:24:33 ЛС | профиль | цитата
Как я понял за это всё отвечает PowerQuery, может называться СКАЧАТЬ И ПРЕОБРАЗОВАТЬ, а во-вторых, она есть только в версии 365 или Pro Plus. Если у вас другая версия офиса, то скорее всего вы не увидите в ней PowerQuery.

Редактировалось 1 раз(а), последний 2023-12-19 17:00:00
карма: 2
0
Ответов: 651
Рейтинг: 138
#37: 2023-12-19 14:44:38 ЛС | профиль | цитата
Леонид, Возможность получение данных из PDF появилась в Excel года 2–3 назад.
Судя по этой таблице - https://www.office365versions.com/allreleases.html (https://learn.microsoft.com/en-us/officeupdates/update-history-office-2019)
, Ваша версия не поддерживает импорт данных из PDF.

Моя версия ->>> 2305 2023 Jun 01 Current Channel 16.0.16501.20196

Ваша версия ->>> 1808 2018 Sep 11 Semi-Annual Enterprise Preview 16.0.10730.20102


Sersey, Ваша версия офиса скорее всего не официальная, её нет в списке официальных версий.
карма: 14

0
Ответов: 8881
Рейтинг: 822
#38: 2023-12-19 16:39:52 ЛС | профиль | цитата
Gunta писал(а):
Ваша версия не поддерживает импорт данных из PDF

И вряд-ли такая функция потребуется, а если, то есть функция экспорта из PDF
карма: 19

0
Ответов: 537
Рейтинг: 14
#39: 2023-12-19 17:10:28 ЛС | профиль | цитата
Gunta писал(а):
Ваша версия офиса скорее всего не официальная

Ну да, не покупал, скачал Microsoft Office 2016-2019 Professional Plus Standard + Visio + Project 16.0.12527.22286 (2023.01) (W 7, 8.1, 10, 11) RePack by KpoJIuK и установил только ексель и офис
Установил Professional Plus 2019
Может нужно ещё что то доустановить?

Редактировалось 2 раз(а), последний 2023-12-19 17:14:01
карма: 4

0
Ответов: 651
Рейтинг: 138
#40: 2023-12-29 15:58:56 ЛС | профиль | цитата
Конвертация изображений в asciiart.
https://forum.hiasm.com/getfile/39652

--- Добавлено в 2023-12-29 16:08:42

В продолжении темы консоли
Вывод в цикле ascii картинок на консоль. Скоро новый год как-никак.
https://disk.yandex.ru/d/U0ivmRrf9Gczzg

Редактировалось 1 раз(а), последний 2023-12-29 16:08:42
карма: 14

2
файлы: 1Create ASCII Art.zip [189.2KB] [76]
Голосовали:Quest, envoy_sky
Ответов: 651
Рейтинг: 138
#41: 2023-12-29 18:14:32 ЛС | профиль | цитата
Sersey писал(а):
Может нужно ещё что то доустановить?

Эта схема у тебя работает?

Add(MainForm,10421469,175,168)
{
Height=140
Point(onClose)
link(onCreate,1873839:doEvent1,[])
link(onClose,7431356:doDelete,[(235,195)(235,237)])
}
Add(Hub,1873839,245,182)
{
link(onEvent1,5065730:doSave,[])
link(onEvent2,8800867:doExec,[(270,195)(270,209)])
}
Add(StrList,5065730,280,154)
{
FileName="documents.odc"
Strings=#55:<html xmlns:o="urn:schemas-microsoft-com:office:office"|40:xmlns="http://www.w3.org/TR/REC-html40">|0:|6:<head>|69:<meta http-equiv=Content-Type content="text/x-ms-odc; charset=utf-8">|39:<meta name=ProgId content=ODC.Database>|36:<meta name=SourceType content=OLEDB>|39:<title>Запрос — Table 0</title>|38:<xml id=docprops><o:DocumentProperties|51: xmlns:o="urn:schemas-microsoft-com:office:office"|42: xmlns="http://www.w3.org/TR/REC-html40">|108: <o:Description>Соединение с запросом &quot;Table 0&quot; в книге.</o:Description>|43: <o:Name>Запрос — Table 0</o:Name>|24: </o:DocumentProperties>|45:</xml><xml id=msodc><odc:OfficeDataConnection|50: xmlns:odc="urn:schemas-microsoft-com:office:odc"|42: xmlns="http://www.w3.org/TR/REC-html40">|45: <odc:PowerQueryConnection odc:Type="OLEDB">|166: <odc:ConnectionString>Provider=Microsoft.Mashup.OleDb.1;Data Source=$Workbook$;Location=&quot;Table 0&quot;;Extended Properties=&quot;&quot;</odc:ConnectionString>|41: <odc:CommandType>SQL</odc:CommandType>|61: <odc:CommandText>SELECT * FROM [Table 0]</odc:CommandText>|29: </odc:PowerQueryConnection>|1521: <odc:PowerQueryMashupData>&lt;Mashup xmlns:xsd=&quot;http://www.w3.org/2001/XMLSchema&quot; xmlns:xsi=&quot;http://www.w3.org/2001/XMLSchema-instance&quot; xmlns=&quot;http://schemas.microsoft.com/DataMashup&quot;&gt;&lt;Client&gt;EXCEL&lt;/Client&gt;&lt;Version&gt;2.117.362.0&lt;/Version&gt;&lt;MinVersion&gt;2.21.0.0&lt;/MinVersion&gt;&lt;Culture&gt;ru-RU&lt;/Culture&gt;&lt;SafeCombine&gt;true&lt;/SafeCombine&gt;&lt;Items&gt;&lt;Query Name=&quot;Table 0&quot;&gt;&lt;Formula&gt;&lt;![CDATA[let&#13;&#10; Источник = Web.Page(Web.Contents(&quot;https://forum.hiasm.com/forum/0&quot;)),&#13;&#10; Data0 = Источник{0}[Data],&#13;&#10; #&quot;Повышенные заголовки&quot; = Table.PromoteHeaders(Data0, [PromoteAllScalars=true]),&#13;&#10; #&quot;Измененный тип&quot; = Table.TransformColumnTypes(#&quot;Повышенные заголовки&quot;,{{&quot;Column1&quot;, type text}, {&quot;Название&quot;, type text}, {&quot;Автор&quot;, type text}, {&quot;Ответов&quot;, Int64.Type}, {&quot;Последнее&quot;, type text}}),&#13;&#10; #&quot;Удаленные столбцы&quot; = Table.RemoveColumns(#&quot;Измененный тип&quot;,{&quot;Column1&quot;})&#13;&#10;in&#13;&#10; #&quot;Удаленные столбцы&quot;]]&gt;&lt;/Formula&gt;&lt;IsParameterQuery xsi:nil=&quot;true&quot; /&gt;&lt;IsDirectQuery xsi:nil=&quot;true&quot; /&gt;&lt;/Query&gt;&lt;/Items&gt;&lt;/Mashup&gt;</odc:PowerQueryMashupData>|28: </odc:OfficeDataConnection>|6:</xml>|7:<style>|4:<!--|18: .ODCDataSource|5: {|32: behavior: url(dataconn.htc);|5: }|3:-->|8:</style>|0:|
Point(doSave)
}
Add(FileTools,7431356,252,217)
{
FileName="documents.odc"
}
Add(DeferredEvent,576312,364,203)
{
Delay=5000
link(onDeferredEvent,2511301:In,[])
}
Add(LineBreak,8434254,126,189)
{
link(Out,10421469:doClose,[])
Primary=[2511301,280,14]
}
Add(WinExec,8800867,308,203)
{
FileName="cmd"
Param="/c start documents.odc"
Mode=0
link(onExec,576312:doDeferredEvent,[])
}

Если да, то для парсинга PDF нужно обновить excel до последней версии.
Кстати, в последнем обновлении Майкрософт встроил python в excel.
карма: 14

0
Ответов: 651
Рейтинг: 138
#42: 2024-01-02 16:35:33 ЛС | профиль | цитата
Два дня ничегонеделанья и вот простая игра без всяких наворотов без рюшечек. Консольная змейка.
https://forum.hiasm.com/getfile/39653
Управление стрелками.
Управление в игре
карма: 14

0
файлы: 1Snake.zip [140KB] [104]
Ответов: 537
Рейтинг: 14
#43: 2024-01-03 08:47:56 ЛС | профиль | цитата
Gunta писал(а):
Эта схема у тебя работает?

Установил excel 2021 года и все заработало. Это единственный способ вырезать таблицы из PDF файла?
карма: 4

0
Ответов: 651
Рейтинг: 138
#44: 2024-01-03 15:51:51 ЛС | профиль | цитата
Sersey писал(а):
Это единственный способ вырезать таблицы из PDF файла?

Нет конечно! Существует довольно много способов извлечения текста из PDF. Но способов извлечение именно таблиц не так много, как хотелось бы.
Я перепробовал, наверное, большинство из них и остановился на Power query входящим в состав Excel.
На работе попросили помочь. Наш поставщик присылает 20–50 pdf документов из которых нужно вытащить все таблицы и некоторую другую информацию, всё это преобразовать, сгруппировать и внести в другую программу.
Если кто-то знает другой более лёгкий способ, прошу поделится. Не стесняйтесь.

Редактировалось 1 раз(а), последний 2024-01-03 23:15:37
карма: 14

0
Ответов: 282
Рейтинг: 23
#45: 2024-01-04 21:37:41 ЛС | профиль | цитата
Gunta писал(а):
Конвертация изображений в asciiart.

Супер
Палец вверх поставил.
карма: 2
0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)