Excel総合相談所 153

1 ：名無しさん＠そうだ選挙にいこう：2023/03/09(木) 07:49:12.26 .net

【1 OSの種類 　 　 　 　 .】 Windows**
【2 Excelのバージョン 　 】 Excel**
【3 VBAが使えるか　 　 .】 はい･いいえ
【4 VBAでの回答の可否】 可･否

注意事項
・情報を隠すために別の問題を設定するのはやめましょう。たいていの場合その問題は的外れな設定で、期待していたものからずれた回答が返ってきます。

スレッド作成は>>980がやります

※前スレ
Excel総合相談所 152
https://mevius.5ch.net/test/read.cgi/bsoft/1671921490/

340 ：名無しさん＠そうだ選挙にいこう：2023/03/27(月) 06:55:11.54 .net

会社？

341 ：名無しさん＠そうだ選挙にいこう：2023/03/27(月) 09:02:39.24 .net

それを使ってる会社マジでヤバい
沈むよ

342 ：名無しさん＠そうだ選挙にいこう：2023/03/27(月) 09:38:53.87 .net

それってどれ？

343 ：名無しさん＠そうだ選挙にいこう：2023/03/27(月) 11:10:28.30 .net

これ

344 ：名無しさん＠そうだ選挙にいこう：2023/03/27(月) 11:40:46.81 .net

あれ？

345 ：名無しさん＠そうだ選挙にいこう：2023/03/27(月) 12:04:54.49 .net

>>296
>>297
亀レスだけど
ありがとうございます。

346 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 12:38:44.11 .net

OFFICE365 エクセルで助けてください
計算結果がマイナスならマイナスで
プラスならプラスで別のセルで式を
作る感じ
IFで想定通りの値じゃなかったら例えば100
のままにして違かったら足したり引いたり
を考えてます
うまくいきません
ヘルプお願い致します

347 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 12:42:19.22 .net

「助けて」で質問を書く奴は馬鹿ばっかの法則

348 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 12:44:18.31 .net

>>346
https://i.imgur.com/viA2cqS.png
>>347
https://i.imgur.com/vuktT4R.png

349 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 13:16:39.58 .net

>>346
助けてください　一所懸命回答すべく試みていますが、結局何をどうしたらいいか判別できません
スマホで書くのは大変かも知れませんが、具体的な例を書いてもらえないでしょうか
113×41=4,633
312×-7=-2,184　これを、別のセルではどう表したいのでしょうか？

又、IFで想定通りの値じゃ無いとは、どういった例でしょうか？
C3に365が入力されていて、C5に =IF(C3>=355,400,"hoge") という式の場合、どれが想定通りでは無い値でしょうか？
ご多忙のところ誠に恐縮ですがよろしくお願い致します

350 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 13:32:32.30 .net

>>349は何を言いたいのかが判別できない

351 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 13:43:46.74 .net

自身の能力不足を嘆いているのだろう

エスパー能力不足を

352 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 13:57:42.96 .net

セルに時間のつもりで
12:34
23:45
とかが入っていて
その並びで一部
1900/1/1 12:34
1900/1/1 23:45
とかが入っている
見た目の表示は一緒だけど
数値としては全然違うので前者に統一変換したいけど
どうやるのが一番楽?

353 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 13:59:30.83 .net

書式

354 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 14:00:37.88 .net

hh:mm

355 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 14:09:00.21 .net

馬鹿の特徴として「助けて」で始まる質問をするという法則がある。
この手の馬鹿はあまりに馬鹿過ぎて質問すらまともにできない。
また何とか回答を得ても直ぐにわからないことが出てきてしつこく馬鹿な質問を繰り返す。

356 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 15:09:58.95 .net

今までexcel一件1行で管理できてた固定資産台帳に、資産本体、バーコード、発注書の写真を付けて管理することになったんですがこれもうExcelじゃ管理無理ですよね？
accessとかでデータベース使うしかありませんか？

357 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 15:36:55.68 .net

>>355
それが真だったとして、
それをこの場で指摘する無意味さを理解できない馬鹿
伝えたい相手はそんなレスを読まないことすら分からない馬鹿

358 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 15:49:33.76 .net

>>349
優しいな
>>346は答えてあげなよ

359 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 16:22:20.27 .net

>>348
ありがとうございます(T_T)

360 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 16:30:02.98 .net

>>356
資産本体をExcelのセルに入れるのは大変難しいと思いますが、
バーコードなら　https://www.rolan.co.jp/shouhin/s_sakurabarcode5_excel.html　この辺を参考に
また、発注書の写真(のみならずPDFなども)は、別フォルダに保存して =HyperLink で管理するのもひとつの解決法かも知れません
Excelの行数で管理しきれないほどの数多くの固定資産をお持ちなら、Excelなんてみみっちいアプリじゃ無くて
https://www.worksap.co.jp/services/asset-management/　こういったアプリを頼る方がよろしいような

361 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 16:36:40.90 .net

ほら見ろ　泣かせちまったぢゃねーか
確かに質問者はどっかでつまずいてるから質問するんであって
途方に暮れてるから質問の仕方も分からずあたふた思い付いたことしか書けないんだ　
それを寄ってたかってあげつらっていぢめてンぢゃねーよ

ひとつひとつ解決してくしか無いんだ　やれるかやれないかじゃ無い　やるかやらないかだ　回答側が弁えろ

362 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 16:51:24.45 .net

【1 OSの種類 　 　 　 　 .】 Windows10
【2 Excelのバージョン 　 】 Excel2016
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否

【質問】
ワークシート上の関数だけで文字列から数字だけを抜き出してハイフンで接続することはできますか？

【やりたい背景】
もういない人の作ったマクロが動かなくなって
手順ごとに代替手段を組み立てているところなのですが
大宮5丁目3番8号→5-3-8、羽田2丁目5-38→2-5-38
のように住所から丁目以降を数字で抜き出した文字列を作っている部分があり
これと郵便番号で2つの住所が一致するかを比較していたようなのです
このやり方を関数で再現する方法、またはこのやり方をしなくても住所の一致を確認する方法はあるでしょうか？

363 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 17:27:32.81 .net

　>大宮5丁目3番8号→5-3-8、羽田2丁目5-38→2-5-38
これが両方向のパターンがあって困ってるということ？　それが理由でマクロが動作しない？
https://forest.watch.impress.co.jp/docs/serial/exceltips/1450472.html
こことかを参考に ⇔ での郵便番号と入力された住所との比較を考慮してみては？
もう全部00-00-00のカタチにしちゃいたい　って場合は他の誰かが教えてくれるだろうからパスしとく

364 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 17:37:46.68 .net

>>362
クエリーで、
事前にリストされた文字列変換表（例：丁目→-、番→-、号→"")を元に、
ある文字列（住所）の中身を検索して、変換する作業はできる。

自分では半角カナを全角カナに変換するのなんかに使っているけど。
VBAを使わないのであれば、ひょっとしたらこの手が使えるかも知れない。

ただし、地名の中には「番」が入っている（例：千代田区番町）ところがあるから、
工夫が必要。

参考
https://bunkyudo.co.jp/word-replace-powerquery-relaxtools-t-h/

365 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 17:43:31.06 .net

>>364
数字以外を全部空白(削除)みたいなのは指定できそうですか？
自分としては数字だけを抜き出しでも充分だと思うのです

366 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 17:58:53.69 .net

>>365
VBAなしだとかなり大変だね
住所の一部を誤修正したくなかったら「丁目」「番地」「番」「号」のそれぞれに対して
"0番"→"0-"
"1番"→"1-"
"9番"→"9-"
みたいな感じで数字込みの置換をずらっと並べて、最後に余分なハイフンを消す、しかないかもかなあ

367 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 18:03:10.01 .net

>>365
「数字以外を全部空白」ということは、
○○（都道府県）&○○区または○○市&○○（町名）
を全部消すということだよね？

うーん・・・どうしようかねぇ・・・

市までだったら総務省の自治体コードで全国を把握できるので、
それと照合すれば切り出せるんだけど、
町名まで入ったリストとなると・・・
郵便番号では「その他」でひとくくりにしているところがあるから、
使えそうにない。

有料リストしかないのかしら？
と今クグってる途中だった。

「丁目」を手がかりに切り離すとしても、
そもそも丁目がない住所もあるし、
二丁目、三丁目と漢数字で全て表記されているとも限らないし。
さすがに「十二丁目」とかは存在しないのであれば
丁目の1文字前で切るとか？

「町名&９８番地４」と全角アラビア数字になっていたら、
半角アラビア数字に変換する手間を入れてから、
ワークシート関数で数字だけ抜き出すとか・・・

なんて方法をぼんやり考えていた。

368 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 18:09:09.58 .net

面白そうなお題だけど、
結構厄介そう。

369 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 18:25:17.21 .net

住所って結構厄介だよね
京都の上ル下ルとかどこかにイロハとかもあったな

370 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 19:03:03.65 .net

https://www.post.japanpost.jp/zipcode/zipmanual/index.html
の「6.バーコードに必要な文字情報の抜き出し法」は考え方の参考に多少なるかも

371 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 19:21:35.72 .net

例えば、住所がD3セルからD列下方にずらっと入力されてるとする
E3セルだけに、例えば上の例で大宮5丁目3番8号なら 538 と入力する
そのセルが選択されている状態で、[ホーム]－[編集]－[フィル]をクリックし、一番下のフラッシュフィルをクリック
一瞬で下まで抽出してくれる　　だけど、「数字だけを抜き出し」の要求しか満たさない　丁目・番とかハイフンも無くなる

372 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 19:23:29.19 .net

6本木と書くバカが居るから気を付けろ

373 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 19:26:52.40 .net

強盗するリストの加工の闇バイトか??

374 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 19:29:58.27 .net

回答したら犯罪幇助になるん??

375 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 19:37:59.74 .net

こういうのは完璧を目指すと泥沼だけど、できるやつだけ自動でやって残りは人力と分けると一気に簡単になるぞ
難しい数式やコードを書く時間をリストの修正に回した方がたぶん早く終わる

376 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 19:39:23.80 .net

入力ミス、変換ミスもあるから、既存の地名データベースで100%完璧とはならんよ

377 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 19:43:46.09 .net

>>369
イロハは少なくとも千葉・茨城にはある。
「千葉県香取市佐原イ、ロ、ハ、ニ、ホ」
https://www.post.japanpost.jp/cgi-zip/zipcode.php?pref=12&city=1122360&cmp=1

一応、町名の扱い？

「佐原ニ」だけ見たら、漢数字なのかカタカナなのか
紛らわしい。

「三ノ分目」って、なんすか？

378 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 19:48:02.21 .net

>>375
次々とデータが増えるなら、
ある程度Excelでやらせて、
手動で直した分を次回の抜き出し用参照リストにすることも可能だな。

目視チェックの手動手直しは、目が疲れそうだけど。

379 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 20:13:43.44 .net

A列の任意の行に「2000年以降の日付」または文字列または「10以下の整数」が書かれています。
『A列が「2000年以降の日付」となっている行』をFILTER関数で抽出するため、FILTER関数の第二引数に(ISNUMBER(A:A))*(A:A>10)と書いていますが、これよりシンプルな書き方はありますか？

380 ：名無しさん＠そうだ選挙にいこう：2023/03/28(火) 23:35:57.48 .net

>>379
>>12

381 ：202：2023/03/29(水) 09:39:25.26 .net

>>362
2019ならある程度は楽にできるんだけどなー
もしくは、2016でも元データが手入力の場合

382 ：202：2023/03/29(水) 12:23:04.23 .net

>>362
数字の塊が3つ以内(増やそうと思えば増やせる)での式つくれたけど、クソ長いし難解だと思うから、正直やめといた方がいい…

383 ：名無しさん＠そうだ選挙にいこう：2023/03/29(水) 12:26:29.04 .net

>>370
というかやりたいことモロ一緒じゃねーの
住所の文字列から数字だけを抜き出すにはどうすればいいかって質問じゃないのこれ

384 ：名無しさん＠そうだ選挙にいこう：2023/03/29(水) 12:30:31.99 .net

単純に1文字ずつ抜き出してどういう文字種か判別して
文字列に付け足して行くのはどうでしょう
a = a & b

385 ：名無しさん＠そうだ選挙にいこう：2023/03/29(水) 12:38:48.65 .net

>>384まあこれだろうなとは思うが
>>382の式も見てみてえな

386 ：名無しさん＠そうだ選挙にいこう：2023/03/29(水) 12:42:27.00 .net

>>384
番地以外にも数字が入ってる場合、番地が数字じゃない場合、漢数字、全角など、言うのは簡単だけど数式で書くのは異常に面倒なんですよ

387 ：名無しさん＠そうだ選挙にいこう：2023/03/29(水) 12:43:23.20 .net

そもそもVBA「不可」ってのがねえ
これワークシート関数だけで書いたらとんでもない長さになるよ

388 ：名無しさん＠そうだ選挙にいこう：2023/03/29(水) 12:45:15.07 .net

>>385
最終的に固まりごとに＆で繋げるのは一緒
concatやtextjoinが無いんだから仕方がない

383の処理だけだと、2桁以上の時に分かれてしまうor前の数字とくっついてしまうかのどちらかになると思う

389 ：名無しさん＠そうだ選挙にいこう：2023/03/29(水) 12:49:19.07 .net

>>386
例えば住所の片方は六本木、片方は6本木だとして
漢数字を一律で数字に変換すればどっちも6本木になって抜き出せる数字としては同じになるぞ
数字の全角半角も同じくASCだかJISだかで一律半角にすればいい
使える関数は1つだけじゃないんだよ

390 ：名無しさん＠そうだ選挙にいこう：2023/03/29(水) 12:52:16.52 .net

あ、流石に"6本木"みたいなパターンの処理までは入れてないわ…

391 ：名無しさん＠そうだ選挙にいこう：2023/03/29(水) 13:00:11.31 .net

>>389
なんか得意そうだから聞くけど、たとえば三千百六を3106に一発で直せる数式教えて
俺のググり方では見つけられんかったからURLでもいいよ
VBAと一覧表を使うのとアドインを使う方法は無しで

392 ：名無しさん＠そうだ選挙にいこう：2023/03/29(水) 15:22:59.36 .net

>>382
質問者本人じゃないけど
自分の後学のためにも、興味がある。
とりあえず式、upしてみて。

複雑なら、まずは自分で作業列に分けてみるから。

393 ：名無しさん＠そうだ選挙にいこう：2023/03/29(水) 15:30:58.67 .net

「丁目」が含まれていれば、その左1文字で区切れば行けるかな？
と思っていたら、なんと
0丁目もあれば42丁目もある模様・・・
https://ontheroad.toyotires.jp/tidbits/6557/

394 ：名無しさん＠そうだ選挙にいこう：2023/03/29(水) 15:34:31.17 .net

でもって、大阪府堺市の、
美原区域以外は
「丁目」じゃなくて「丁」って...orz

https://www.city.sakai.lg.jp/kurashi/jutaku/jutaku/jukyohyoji/cho.html

395 ：名無しさん＠そうだ選挙にいこう：2023/03/29(水) 18:30:50.87 .net

力業でごり押すなら、substitute繰り返して全部変換しちまおうぜ！

396 ：名無しさん＠そうだ選挙にいこう：2023/03/29(水) 18:32:40.85 .net

【1 OSの種類 　 　 　 　 .】 Windows11
【2 Excelのバージョン 　 】 Excel2021
【3 VBAが使えるか　 　 .】 はい
【4 VBAでの回答の可否】 可

データベースのマスタとして使っているブックと、
トランザクションログとして出したブックがあり、
マスタの内容をxlookupでログ側に引っ張ってきています。
ログ側には日時と複数マスタのキー値16列しか入っていません。
マスタの一部セル内でフォントの色を複数使っている箇所が有り、
そのセルの色を含めた内容をトランザクション側にも反映させたいのです。
どんな方法があるかご教示ください。
よろしくお願いします。

397 ：名無しさん＠そうだ選挙にいこう：2023/03/29(水) 18:38:51.13 .net

値はそのまま表示のみを記号などへ変更する方法について
ご教授ください
1→Ⅰ 2→Ⅱ 3→Ⅲ 4→Ⅳ 5→Ⅴといった具合です
複数あるためユーザー定義の変更では対応ができませんでした

398 ：名無しさん＠そうだ選挙にいこう：2023/03/29(水) 20:27:40.54 .net

>>391
一 ～ 九万九千九百九十九
↓
1 ～ 99999

三千百六→3106
=IF(A1="","",
IF(ISERROR(FIND("万",A1)),0,IFERROR(FIND(MID(A1,FIND("万",A1)-1,1),"一二三四五六七八九"),1))*10000
+IF(ISERROR(FIND("千",A1)),0,IFERROR(FIND(MID(A1,FIND("千",A1)-1,1),"一二三四五六七八九"),1))*1000
+IF(ISERROR(FIND("百",A1)),0,IFERROR(FIND(MID(A1,FIND("百",A1)-1,1),"一二三四五六七八九"),1))*100
+IF(ISERROR(FIND("十",A1)),0,IFERROR(FIND(MID(A1,FIND("十",A1)-1,1),"一二三四五六七八九"),1))*10
+IFERROR(FIND(RIGHT(A1,1),"一二三四五六七八九"),0))

3106→三千百六
=TEXT(B1,"[DBNum1]")

399 ：名無しさん＠そうだ選挙にいこう：2023/03/29(水) 20:39:46.59 .net

そういや空欄だったら空欄の処理って末尾に&""でも良いんでしたっけ
文字列扱いにしてくれるから空欄でも0表示にならない的な

400 ：名無しさん＠そうだ選挙にいこう：2023/03/29(水) 21:02:19.23 .net

>>398
間違えてるぞ

401 ：名無しさん＠そうだ選挙にいこう：2023/03/29(水) 21:49:08.37 .net

=XMATCH(A1,TEXT(SEQUENCE(10000),"[DBNum1]"))

402 ：名無しさん＠そうだ選挙にいこう：2023/03/29(水) 21:50:51.55 .net

>>399
空白以外の値が文字列になってもいいならそれでいい
文字列にしたくないなら=if(A1="","",A1)と書くしかない

403 ：名無しさん＠そうだ選挙にいこう：2023/03/30(木) 08:13:24.86 .net

>>392
出来上がったものを見た結果…わからんのに変に使われたり関数中傷のネタにされたり場合によっては身バレ等々色々な理由により、ここで公開するのは控えさせて欲しい。すまんな。

Twitterなら他の誰かが答えてくれるかもよ

404 ：名無しさん＠そうだ選挙にいこう：2023/03/30(木) 10:39:45.52 .net

漢数字だと、百、千、万・・・の単位の扱いと、
その後桁飛びするのが、
悩ましいわね。

405 ：名無しさん＠そうだ選挙にいこう：2023/03/30(木) 10:44:12.63 .net

過去に、
法律の条文新旧対比をExcelで出来ないかな？
と思ってやってみたら、
「第二百三十条の一」でつまずいた。

406 ：名無しさん＠そうだ選挙にいこう：2023/03/30(木) 13:15:33.90 .net

>>405
条文ならフォーマットがある程度固まってるし数字の範囲も限られてるんと違う？
住所よりはかなりハードル低そうなんだけど

407 ：名無しさん＠そうだ選挙にいこう：2023/03/30(木) 18:13:47.87 .net

>>402
ありがとうございます

408 ：名無しさん＠そうだ選挙にいこう：2023/03/31(金) 01:31:21.92 .net

「コントロールの喪失」の恐れがあるとしてGPT-4を超えるAIの即時開発停止を全技術者に対して6カ月間求める公開書簡、イーロン・マスクやスティーブ・ウォズニアックなど1300人以上が署名
https://gigazine.net/news/20230330-pause-ai-training/

409 ：名無しさん＠そうだ選挙にいこう：2023/03/31(金) 10:58:44.83 .net

>>396
無理
セル内の書式を持ってくる方法はない

410 ：名無しさん＠そうだ選挙にいこう：2023/03/31(金) 11:24:41.34 .net

昔はExcel Macro4.0で
セルの背景色を取得出来たような？

今はセキュリティの関係でデフォで無効。

先日、試しに列幅取得やってみたら、整数までしか取得出来んかった。

411 ：名無しさん＠そうだ選挙にいこう：2023/03/31(金) 11:30:52.44 .net

Macro4.0はevalだけ便利だったな

412 ：名無しさん＠そうだ選挙にいこう：2023/03/31(金) 15:24:52.49 .net

爺はどうして生きているの

413 ：名無しさん＠そうだ選挙にいこう：2023/03/31(金) 15:43:53.40 .net

>>412
それは、私にとってもわかりません。しかし、人間の寿命は長いものではありませんが、生き残るための方法を見つけることができます。奇跡的な生存者や健康維持の秘訣を持つ人もいます。あなたが爺に会う機会があれば、その秘訣を聞いてみると良いでしょう。

414 ：名無しさん＠そうだ選挙にいこう：2023/03/31(金) 15:45:18.28 .net

>>412
ウンコを清蔵するためでさ

415 ：名無しさん＠そうだ選挙にいこう：2023/03/31(金) 16:13:53.20 .net

やめろ！　蓄えるな！　流せっ！　（それにしても良くそんな変換できたもんだ　特殊な業界？）

416 ：名無しさん＠そうだ選挙にいこう：2023/03/31(金) 17:38:47.25 .net

Office365も次の大型バージョンアップからAIの内蔵が正式決定してるから、いよいよ仕事がなくなる
chatGPTみたいに「こんなワークシートを作って」「こんなデータを集計して」と日本語で指示するだけで結果が出てくるようになる

417 ：名無しさん＠そうだ選挙にいこう：2023/03/31(金) 18:14:40.18 .net

>>416
しばらくはならないよ
chatGPT、日本人好みのエクセルにかなり弱い

正規化されていればめっぽう強いけど、
このスレで登場するような技術はほぼない
vbaも弱い

418 ：名無しさん＠そうだ選挙にいこう：2023/03/31(金) 18:18:51.66 .net

>>416
その結果が正しいかの判断する仕事がある

419 ：名無しさん＠そうだ選挙にいこう：2023/03/31(金) 18:19:56.87 .net

零細企業の例の頭の悪い馬鹿にはありがたいのだろう

420 ：名無しさん＠そうだ選挙にいこう：2023/04/01(土) 08:57:35.80 .net

>>416
AIにけなされるかと思たよw

421 ：名無しさん＠そうだ選挙にいこう：2023/04/01(土) 09:57:05.88 .net

>>419
自己紹介おっつ～

422 ：名無しさん＠そうだ選挙にいこう：2023/04/01(土) 17:42:05.60 .net

Excel 2021です
power queryで左の表を右の表に変換するにはどうしたら良いでしょうか
右から左への変換はできたんですが、逆は分からなくて…お願いします
https://i.imgur.com/xzG0MPO.png

423 ：名無しさん＠そうだ選挙にいこう：2023/04/01(土) 18:06:53.34 .net

ピボット？

424 ：名無しさん＠そうだ選挙にいこう：2023/04/01(土) 19:04:29.11 .net

>>416
日本語で指示するのがむしろ難しい。
VBAやSQLで指示する方が楽。

425 ：名無しさん＠そうだ選挙にいこう：2023/04/01(土) 19:25:47.01 .net

>>422
それ、オレもpowerqueryでやる方法知りたい

426 ：名無しさん＠そうだ選挙にいこう：2023/04/01(土) 19:42:21.86 .net

>>422
名前と要素の2列だけの読取りクエリーから直接、
名前列をピボット（値列：要素、値の集計関数：集計しない）しても
値が1つ（う）しかないC列以外はエラーになった。
変換先は、暗黙のうちに、
・Aグループ、Bグループ、Cグループそれぞれで縦に並べる順番（仮に「行番号」）
があるので、ピボットするときはリクツ上、少なくとも3列以上ないとできないのかも？

で、
1. まず、名前でグループ化して、その中で順位を振る
2. 名前、要素、行番号の3列が出来てから、初めて
　名前列をピボット（値列：要素、値の集計関数：集計しない）
とすると、こんな感じ。
https://i.imgur.com/5whiPoz.png
行番号が不要なら、このあと列削除でもOK。

詳細エディター
let
ソース = Excel.CurrentWorkbook(){[Name="T_元表"]}[Content],
変更された型 = Table.TransformColumnTypes(ソース,{{"名前", type text}, {"要素", type text}}),
グループ化された行 = Table.Group(変更された型, {"名前"}, {{"wTable", each _, type table [名前=nullable text, 要素=nullable text]}}),
追加されたカスタム = Table.AddColumn(グループ化された行, "indexTable", each Table.AddIndexColumn([wTable], "行番号", 1, 1)),
削除された他の列 = Table.SelectColumns(追加されたカスタム,{"indexTable"}),
#"展開された indexTable" = Table.ExpandTableColumn(削除された他の列, "indexTable", {"名前", "要素", "行番号"}, {"名前", "要素", "行番号"}),
変更された型1 = Table.TransformColumnTypes(#"展開された indexTable",{{"名前", type text}, {"要素", type text}, {"行番号", Int64.Type}}),
ピボットされた列 = Table.Pivot(変更された型1, List.Distinct(変更された型1[名前]), "名前", "要素")
in
ピボットされた列

グループ内で番号を振る方法はこれを参考にした。
https://papasensei365.com/powerquery-index-the-group/

427 ：425：2023/04/01(土) 19:51:12.10 .net

>>426
> ピボットするときはリクツ上、少なくとも3列以上ないとできないのかも？

これは、
「数値集計でなくて、文字列値を集計しないでピボットで並び替えるときだけ」
ということになるかも？

428 ：名無しさん＠そうだ選挙にいこう：2023/04/01(土) 21:05:49.13 .net

=IF(DAY(TODAY())="1","今日は月始め","")

毎月1日にだけ表示を出したいです。
それ以外は空白で。

お願いします。

429 ：名無しさん＠そうだ選挙にいこう：2023/04/01(土) 21:57:05.70 .net

=IF(DAY(TODAY())=1,"今日は月始め","")

430 ：名無しさん＠そうだ選挙にいこう：2023/04/01(土) 22:01:35.56 .net

>>426-427
ありがとうございます
グループ化とテーブル内で番号振ればいいんですね
初心者の自分には難しめなことに挑戦してたのがわかりました…

431 ：名無しさん＠そうだ選挙にいこう：2023/04/01(土) 23:03:21.69 .net

Goto B:
A:


B:
Dim a As Long
Goto A

こうやって行末に宣言するの、流行らないか・・

432 ：名無しさん＠そうだ選挙にいこう：2023/04/01(土) 23:28:23.06 .net

行末…？

433 ：名無しさん＠そうだ選挙にいこう：2023/04/02(日) 10:28:09.52 .net

【1 OSの種類 　 　 　 　 .】 Windows10
【2 Excelのバージョン 　 】 Excel365
【3 VBAが使えるか　 　 .】 はい
【4 VBAでの回答の可否】 否

列の幅をポイントで指定したいのですが、デフォルトの単位をポイントにするにはどうしたらいいですか？
「Excelのオプション」を一通り探してみましたが ミリメートル、センチメートル、インチ以外の単位が見つけられませんでした。

434 ：名無しさん＠そうだ選挙にいこう：2023/04/02(日) 19:53:16.21 .net

コウロギとか喰ってそう
ヘルメットかぶって自転車乗ってそう

435 ：名無しさん＠そうだ選挙にいこう：2023/04/02(日) 22:36:38.48 .net

それ山形県の警察で福利厚生抜群の勝ち組やね

436 ：名無しさん＠そうだ選挙にいこう：2023/04/03(月) 04:25:22.30 .net

OS:windows7 home
excel ver:2010
vba:使えません/回答も可能な限り否

すでに印刷されてある紙の上から更に差し込み印刷で印刷
しようとしております

やったこと
0.新規シート(sheet5)を作成
1.sheet5上ですでに印刷されてある紙をスキャナで画像取り込み挿入
2.差し込み印刷したい箇所をテキストボックス(横書き)で範囲指定

3.範囲指定したエリアで別シート(sheet2)のD4セルから数値
(1〜6のどれかをドロップダウンリストで入力済)を取り出し
該当する数字なら ◯ を表示 それ以外なら空白という動作をしてもらうため
例えばsheet2のセルD4に1が入力されていてそれがあっている場合

=if(sheet2!d4=1,"◯","")

という入力をした所

入力した文字列は参照名または定義名として正しくありません

と表示されました
何故？

437 ：名無しさん＠そうだ選挙にいこう：2023/04/03(月) 06:51:15.39 .net

IF関数の式がエラーになるって事か、非常にまわりくどいな

438 ：名無しさん＠そうだ選挙にいこう：2023/04/03(月) 08:31:25.45 .net

質問者が何をしたいのか自分でも理解してないパターン
回答する価値ないかな

439 ：名無しさん＠そうだ選挙にいこう：2023/04/03(月) 08:53:30.61 .net

あほくせ

440 ：名無しさん＠そうだ選挙にいこう：2023/04/03(月) 10:12:35.52 .net

2 の範囲指定とは、複数セル？　ひとつのセルだけ？
3 のドロップダウンリストとは、『セルの入力規則』を使ってる？フォームコントロールとか？