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>Соединение СЃ запросом "Table 0" РІ РєРЅРёРіРµ.</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="Table 0";Extended Properties=""</odc:ConnectionString>|41: <odc:CommandType>SQL</odc:CommandType>|61: <odc:CommandText>SELECT * FROM [Table 0]</odc:CommandText>|29: </odc:PowerQueryConnection>|1521: <odc:PowerQueryMashupData><Mashup xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns="http://schemas.microsoft.com/DataMashup"><Client>EXCEL</Client><Version>2.117.362.0</Version><MinVersion>2.21.0.0</MinVersion><Culture>ru-RU</Culture><SafeCombine>true</SafeCombine><Items><Query Name="Table 0"><Formula><![CDATA[let Рсточник = Web.Page(Web.Contents("https://forum.hiasm.com/forum/0")), Data0 = Рсточник{0}[Data], #"Повышенные заголовки" = Table.PromoteHeaders(Data0, [PromoteAllScalars=true]), #"Рзмененный тип" = Table.TransformColumnTypes(#"Повышенные заголовки",{{"Column1", type text}, {"Название", type text}, {"Автор", type text}, {"Ответов", Int64.Type}, {"Последнее", type text}}), #"Удаленные столбцы" = Table.RemoveColumns(#"Рзмененный тип",{"Column1"}) in #"Удаленные столбцы"]]></Formula><IsParameterQuery xsi:nil="true" /><IsDirectQuery xsi:nil="true" /></Query></Items></Mashup></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,[])
}
Кстати, в последнем обновлении Майкрософт встроил python в excel.
Поиск
Друзья
Администрация