SharePointリストの添付ファイルを全て一覧表示する方法について
先日は、リストの添付ファイルの一覧を表示するために、ギャラリー内ギャラリーで実現する方法を書きました。
今日はSharePointリストに添付されたすべてのファイルを、1つのギャラリーで表示する方法について書いてみます。
※ここでは500件・2000件問題には触れません。あしからず
リストの準備
SharePointリスト「image_list」以下のように設定しています。
添付ファイルにはそれぞれ複数のファイルを設定してあります。
添付ファイルの読み込み
PowerApps側では、画面を表示した際にデータを読み込むように
OnVisibleプロパティに以下のコードを記載します。
//コレクションを初期化
Clear(col_att);
Clear(col_count);
//image_listを繰り返し、コレクションcol_countにIDを格納。
ForAll(
image_list,
Collect(
col_count,
ID
);
//image_listをcol_countに追加した最後のIDで絞り込み、添付ファイルを繰り返し処理
ForAll(
LookUp(
image_list,
ID = Last(col_count).Value //勘所
).添付ファイル,
//コレクションcol_attに添付ファイルの情報を格納
Collect(
col_att,
{
Value: ThisRecord.Value,
AbsoluteUri: ThisRecord.AbsoluteUri,
DisplayName: ThisRecord.DisplayName
}
)
)
)
勘所はLast(col_count).Valueです。
ここを、ValueやThisRecord.IDにしても、添付ファイルを読み込んでくれません。
ID決め打ちで指定すると、ちゃんと読み込んでくれるんですけどね。
(ここでかなり時間ロスして放り投げたくなりました。)
そのため一度col_countにIDを追加した後、追加したIDをLast関数で取り出すとうまく添付ファイルを繰り返し処理してくれました。
打開策になった記事：Power Apps：ForAll 関数で Set や UpdateContext を使いたい時
ギャラリーは
Itemsプロパティにcol_attを指定。
WrapCountプロパティ(折り返しの数)を5として、
ファイルを5つずつ表示するように設定しました。
画像のImageプロパティに以下のコードを入れて、画像の場合は画像を、Officeファイルの場合はアイコンを表示させています。
アイコンだけじゃわからないので、テキストラベルなどのTextプロパティにThisItem.DisplayNameを指定して、ファイル名を表示させてもいいかもしれません。
If(//ファイルの名前の最後(拡張子)が○○に等しいとき、それぞれ指定したアイコンまたは画像にする
// image
EndsWith(ThisItem.DisplayName,"png")||EndsWith(ThisItem.DisplayName,"jpg"),ThisItem.Value,
// pdf icon
EndsWith(ThisItem.DisplayName,"pdf"),"data:image/svg+xml;utf8, %3Csvg%20%20viewBox%3D%270%200%202048%202048%27%20xmlns%3D%27http%3A%2F%2Fwww.w3.org%2F2000%2Fsvg%27%3E%3Cpath%20d%3D%27M1920%201664h-128v384H128v-384H0V640h128V0h1243l421%20421v219h128v1024zM1408%20384h165l-165-165v165zM256%20640h1408V512h-384V128H256v512zm1408%201024H256v256h1408v-256zm128-896H128v768h1664V768zM448%20896q40%200%2075%2015t61%2041%2041%2061%2015%2075q0%2040-15%2075t-41%2061-61%2041-75%2015h-64v128H256V896h192zm0%20256q26%200%2045-19t19-45q0-26-19-45t-45-19h-64v128h64zm448-256q53%200%2099%2020t82%2055%2055%2081%2020%20100q0%2053-20%2099t-55%2082-81%2055-100%2020H768V896h128zm0%20384q27%200%2050-10t40-27%2028-41%2010-50q0-27-10-50t-27-40-41-28-50-10v256zm384-384h320v128h-192v128h192v128h-192v128h-128V896z%27%20fill%3D%27%23a4262c%27%3E%3C%2Fpath%3E%3C%2Fsvg%3E",
// Word icon
EndsWith(ThisItem.DisplayName,"docx")||EndsWith(ThisItem.DisplayName,"doc"),"data:image/svg+xml;utf8, %3Csvg%20%20viewBox%3D%270%200%202048%202048%27%20xmlns%3D%27http%3A%2F%2Fwww.w3.org%2F2000%2Fsvg%27%3E%3Cpath%20d%3D%27M2048%20475v1445q0%2027-10%2050t-27%2040-41%2028-50%2010H640q-27%200-50-10t-40-27-28-41-10-50v-256H115q-24%200-44-9t-37-25-25-36-9-45V627q0-24%209-44t25-37%2036-25%2045-9h397V128q0-27%2010-50t27-40%2041-28%2050-10h933q26%200%2049%209t42%2028l347%20347q18%2018%2027%2041t10%2050zm-384-256v165h165l-165-165zM320%201424h161q2-8%209-43t18-83%2021-103%2022-101%2016-76%208-31l7%2030q7%2030%2017%2077t23%20100%2023%20103%2019%2084%2010%2043h160l148-672H834l-80%20438-100-438H502l-96%20440-86-440H170l150%20672zm320%20496h1280V512h-256q-27%200-50-10t-40-27-28-41-10-50V128H640v384h397q24%200%2044%209t37%2025%2025%2036%209%2045v922q0%2024-9%2044t-25%2037-36%2025-45%209H640v256zm640-1024V768h512v128h-512zm0%20256v-128h512v128h-512zm0%20256v-128h512v128h-512z%27%20fill%3D%27%230078d4%27%3E%3C%2Fpath%3E%3C%2Fsvg%3E",
// Excel icon
EndsWith(ThisItem.DisplayName,"xlsx")||EndsWith(ThisItem.DisplayName,"xls")||EndsWith(ThisItem.DisplayName,"xlsm"),"data:image/svg+xml;utf8, %3Csvg%20%20viewBox%3D%270%200%202048%202048%27%20xmlns%3D%27http%3A%2F%2Fwww.w3.org%2F2000%2Fsvg%27%3E%3Cpath%20d%3D%27M2048%20475v1445q0%2027-10%2050t-27%2040-41%2028-50%2010H640q-27%200-50-10t-40-27-28-41-10-50v-256H115q-24%200-44-9t-37-25-25-36-9-45V627q0-24%209-44t25-37%2036-25%2045-9h397V128q0-27%2010-50t27-40%2041-28%2050-10h933q26%200%2049%209t42%2028l347%20347q18%2018%2027%2041t10%2050zm-384-256v165h165l-165-165zM261%201424h189q2-4%2012-23t25-45%2029-55%2029-53%2023-41%2010-17q27%2059%2060%20118t65%20116h187l-209-339%20205-333H707q-31%2057-60%20114t-63%20112q-29-57-57-113t-57-113H279l199%20335-217%20337zm379%20496h1280V512h-256q-27%200-50-10t-40-27-28-41-10-50V128H640v384h397q24%200%2044%209t37%2025%2025%2036%209%2045v922q0%2024-9%2044t-25%2037-36%2025-45%209H640v256zm640-1024V768h512v128h-512zm0%20256v-128h512v128h-512zm0%20256v-128h512v128h-512z%27%20fill%3D%27%230b6a0b%27%3E%3C%2Fpath%3E%3C%2Fsvg%3E",
// PowerPoint icon
EndsWith(ThisItem.DisplayName,"pptx")||EndsWith(ThisItem.DisplayName,"pptx"),"data:image/svg+xml;utf8, %3Csvg%20%20viewBox%3D%270%200%202048%202048%27%20xmlns%3D%27http%3A%2F%2Fwww.w3.org%2F2000%2Fsvg%27%3E%3Cpath%20d%3D%27M2048%20475v1445q0%2027-10%2050t-27%2040-41%2028-50%2010H640q-27%200-50-10t-40-27-28-41-10-50v-256H115q-24%200-44-9t-37-25-25-36-9-45V627q0-24%209-44t25-37%2036-25%2045-9h397V128q0-27%2010-50t27-40%2041-28%2050-10h933q26%200%2049%209t42%2028l347%20347q18%2018%2027%2041t10%2050zm-384-256v165h165l-165-165zM368%20752v672h150v-226h100q52%200%2097-15t78-46%2053-72%2020-97q0-56-17-97t-50-67-76-39-97-13H368zm1552%201168V512h-256q-27%200-50-10t-40-27-28-41-10-50V128H640v384h397q24%200%2044%209t37%2025%2025%2036%209%2045v922q0%2024-9%2044t-25%2037-36%2025-45%209H640v256h1280zM1536%20640q79%200%20149%2030t122%2082%2083%20123%2030%20149h-384V640zm-128%20128v384h384q0%2080-30%20149t-82%20122-123%2083-149%2030q-33%200-65-6t-63-18V792q31-11%2063-17t65-7zm-804%20300h-86V883h90q47%200%2074%2020t27%2070q0%2052-28%2073t-77%2022z%27%20fill%3D%27%23ca5010%27%3E%3C%2Fpath%3E%3C%2Fsvg%3E",
// Other filetype icon,
"data:image/svg+xml;utf8, %3Csvg%20%20viewBox%3D%270%200%202048%202048%27%20xmlns%3D%27http%3A%2F%2Fwww.w3.org%2F2000%2Fsvg%27%3E%3Cpath%20d%3D%27M1243%200l549%20549v1499H128V0h1115zm37%20219v293h293l-293-293zM256%201920h1408V640h-512V128H256v1792zm256-896V896h896v128H512zm0%20256v-128h896v128H512zm0%20256v-128h896v128H512z%27%20fill%3D%27%237a7574%27%3E%3C%2Fpath%3E%3C%2Fsvg%3E")
参考にした記事:Power AppsでWordやExcel、PowerPointを表示する方法
ただ画像ファイルが多くなると表示が重くなると思いますので、その場合は画像もアイコン表示にするか、ファイル名でずらっと並べる方が良いかもしれません。
画像をクリックするとLaunch関数でそれぞれファイルが開けるようにしました。
画像のOnSelectプロパティは以下
Launch(ThisItem.AbsoluteUri & "?&web=1")
以上です。