Excel (一般機能)

Excelの一般機能に関するフォーラムです。
  • 解決済みのトピックにはコメントできません。
このトピックは解決済みです。
質問

 
(指定なし : 指定なし)
Re: Excel2016のPowerQueryに関して yk.medakaさんへ
投稿日時: 22/11/10 11:58:05
投稿者: Suzu

Excel2016のPowerQueryに関して
https://www.moug.net/faq/viewtopic.php?t=81842
 
 

引用:
最終的にExcel2016のセキュリティ更新を行う事で解消されました。

 
との事ですが、搭載している Windows が、TSC なのであれば
勝手に、UpDate を行って良いか システム管理者へ確認しておいた方が良いですよ。
 
システム不具合を少なくする事を目的にした、LTSCなのですから。
 
 
 
あくまで、結果として、統合できれば良いのであれば
 
セルの値を関数に使いたい(INDIRECT以外で)
https://www.moug.net/faq/viewtopic.php?t=81710&highlight=Power
 
にて、んなっと さん が、同一フォルダ内の同一形式ブックの場合の
Power Query M式言語の サンプルを提示くださっています。
 
let
    Src = Folder.Files("C:\リスト\DL"),
    Add = Table.AddColumn(Src, "Tbl", each Excel.Workbook([Content],true)),
    Exp = Table.ExpandTableColumn(Add, "Tbl", {"Data", "Item"}),
    Ren = Table.AddColumn(Exp, "Name2", each Text.BetweenDelimiters([Name], "_", "."), type text),
    Del = Table.SelectColumns(Ren,{"Name2", "Data"}),
    Exp2 = Table.ExpandTableColumn(Del, "Data", Table.ColumnNames(Del{0}[Data])),
    Piv = Table.Pivot(Exp2, List.Distinct(Exp2[Name2]), "Name2", "個数")
in
    Piv

 
ピボットが必要なければ
 
let
    Src = Folder.Files("C:\リスト\DL"),
    Add = Table.AddColumn(Src, "Tbl", each Excel.Workbook([Content],true)),
    Exp = Table.ExpandTableColumn(Add, "Tbl", {"Data", "Item"}),
    Ren = Table.AddColumn(Exp, "Name2", each Text.BetweenDelimiters([Name], "_", "."), type text),
    Del = Table.SelectColumns(Ren,{"Name2", "Data"}),
    Exp2 = Table.ExpandTableColumn(Del, "Data", Table.ColumnNames(Del{0}[Data])),
in
    Exp2

 
で良いでしょうね。
 
 
LTSC と言う事は 開発環境ではなく、運用ベースのマシン あるいは、そのテスト用のマシン。
開発環境のマシンである可能性は低いのではと思います。
 
であるなら、ソースとなるファイルに対し 繰り返し処理ができれば 良いのでしょうから
M言語を指定し、動作確認が出来れば良いのではないでしょうか。
 
 
そうではなく、「結合」ボタンが出ない事が問題なのであれば、当方には判りかねます。
 
システム管理者を通すなりし、Microsoft へ の確認になるのではないでしょうか。
ただ、Office2016 のメインストリームサポートは終了していますよね。
 
Officeが延長サポート対象品であれば、回答がもらえるかもしれませんね。

投稿日時: 22/11/14 08:37:37
投稿者: Suzu

閉じます。