Excel総合相談所 158

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

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

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

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

>>173
派遣

バリエーションのひとつと捉えて楽しめない時点で向いてないんじゃ？
後でこれいじる奴は相当イライラするだろうな(wktk と思いながら作り込んだブツは数知れず
運用中さえスムースに稼働してりゃそれでいい
それをお気に召さない奴は勝手に作り直せ、っつースタンス

A1からA3600に角度が0.000000から359.999999の範囲でランダムに入ってて
C1に1.000を指定したら1.000に最も近い角度の所のB列の値が知りたい
普通なら
=INDEX($B$1:$B$3600,MATCH(MIN(ABS($A$1:$A$3600-$C1)),ABS($A$1:$A$3600-$C1),0))
でいけるらしいけど
0度と360度は同じなので
例えば
0.001度を探すのにA列の値0.005と359.999では359.999の方が近い
という判断をしたい
どのようにしたらいい？

>>177
いいから何をしたいのかちゃんと書けよ

Excelではなく数学力の問題だな
三角関数もわからん馬鹿なのか

>>177
なるほど！
普通の ABS($A$1:$A$3600-$C1) だと「360°≒0°」の円周の繋がりを考慮できないので、360を一周とした“円上の距離”を計算する必要があります。
つまり距離は
=MIN(ABS(A - C), 360 - ABS(A - C))
で表せます 👍

解決策（Excel数式）
例えば C1 に探したい角度が入っている場合、次のようにすれば「円周上で最も近い角度のB列値」が取れます：
=INDEX($B$1:$B$3600, MATCH(MIN(IF(A$1:A$3600<>"", MIN(ABS(A$1:A$3600-$C$1), 360-ABS(A$1:A$3600-$C$1)))), IF(A$1:A$3600<>"", MIN(ABS(A$1:A$3600-$C$1), 360-ABS(A$1:A$3600-$C$1))), 0))
⚠ この式は配列計算なので Excel 365/2021 ならそのまま動作、古いExcelだと Ctrl+Shift+Enter が必要です。

もっとシンプルにするなら
補助列を作る方法がわかりやすいです：
1. D列に「円上の距離」を計算
=MIN(ABS(A1-$C$1), 360-ABS(A1-$C$1))
2. その最小値の行を探して、B列を返す
=INDEX(B1:B3600, MATCH(MIN(D1:D3600), D1:D3600, 0))
👉 質問：補助列を作っても大丈夫ですか？
それとも「数式1発」で解決したいですか？

馬鹿が作るとこうなる実例

>>177
=LET(
aa,$A$1:$A$3600,
bb,$B$1:$B$3600,
c,$C1,
dd,ABS(aa-c),
dd\360,IF(dd>180,360-dd,dd),
XLOOKUP(MIN(dd\360),dd\360,bb)
)

また馬鹿の例

[表示 ] タブの [ モードの切り替え ] ボタン がない。エクセル2021
↓

[ファイル > アカウント > Office テーマ ] に移動し、[ 黒] または [ システム設定の使用 ] が
選択されていることを確認します。

ダーク モードを有効にするには、[表示 ] タブの [ モードの切り替え ] ボタンを選択します。

>>181 と >>183 が今のところ最強にバカっぽいけど、それは？
バカっつーか、うつけ？たわけ？能無し？役立たず？

>>177
小数誤差でMATCH関数が一致しないのを防ぐためRound関数で丸めたので精度が必要ならダメかも

=INDEX(B1:B3600, MATCH(ROUND(MIN(ABS(MOD(A1:A3600 - C1 + 180, 360) - 180)), 6), ROUND(ABS(MOD(A1:A3600 - C1 + 180, 360) - 180), 6), 0))

XLOOKUP(1,COS(RADIANS(aa-c)),bb,,-1)

>>182
360に近い360度未満の時に数値がおかしいようです
心当りありますか?

>>182
>188
勘違いでした

>>177
多分できた気がする。

=LET(
getnearanglevalues,LAMBDA(dat,target_angle,LET(
cmt,"getnearanglevalues(検索対象データ群,検索角度)、検索対象データ群(2次元)の1列目の角度の中から、検索角度(1次元まで)に一番近い角度を検索し、その2列目の値を出力する関数を定義。複数同じ近さがある場合、最初に検索した方を出力する。",
cmt_,",検索対象データ群(2次元)は1列目が角度、2列目は対応する値を設定しておく。3列目以降は無視される。",
r,ROWS(dat),rta,ROWS(target_angle),
idxx,MAKEARRAY(rta,r,LAMBDA(y,x,x)),idxy,MAKEARRAY(rta,r,LAMBDA(y,x,y)),
anglex,INDEX(dat,idxx,1), valuex,INDEX(dat,idxx,2), target_anglex,INDEX(target_angle,idxy,1),
new_anglex,ABS(IF(anglex-target_anglex>180,anglex-360,anglex)-target_anglex),
idxnear,BYROW(new_anglex,LAMBDA(x,MATCH(MIN(x), x, 0))),
getvalue,INDEX(dat,idxnear,2),
getvalue
)),

cmt,"上で作った関数を使用する",
getnearanglevalues(A1:B3600,C1:C4)
)

文系馬鹿しかおらんの？

>>191
自分語りはいらないですよ

相変わらず馬鹿が自作自演で質問して馬鹿な回答を書き込むスレだな

A1に =3.8-3.7
B1に 0.1
C1に =IF(A1=B1, “OK”, “NG”)

とするとC1はNGになる

次から次へと馬鹿がくるスレ

作業列に誤差を全部入れてMINで取り出した方が簡単

>>195
馬鹿ですみません

少数を計算してから条件判定すると一致しない場合があるよって言いたかった。MATCHも含めて

>>190
なんかバグってる気がしてきた。
気が向いたら考えてみるかな?

選択セルがズレるとか吹き出しのテキスト編集がやたら重いとかはここの住人的にはどう思ってる？

現在、シフト表を作っており、人名が縦に並んでおり、1～31日まで横に並んでいるシフト表を作成しています。
そこで〇を付けたシフト表をSheet2にて月曜日～日曜日の7日ごとに並んだカレンダーに自動で表示させたく思います。
また縦型カレンダーの曜日計算は
=G1-WEEKDAY(G1)+2
※G1にはシフト作成月の年月の1日目が入る
を使用しており、自動で月曜日が出るようになっています。

この場合何か方法はありますでしょうか。

>>200
以前に同じ質問された方ですか？

コピペ
https://mevius.5ch.net/test/read.cgi/bsoft/1728342726/727

やめたら？
自作自演

シートを別ブックにコピー、それを印刷しようとすると、１ページに収まっていたモノが収まらなくなってしまいます。

・列の幅
・行の高さ
・印刷範囲
・用紙サイズ
・余白
・拡大／縮小
・dpi

全部一緒なのに何故こうなるのでしょうか？
ちなみに元ブックと別ブックを作成したパソコン・プリンタが違うのは関係ありますか？

>>204
ページレイアウト表示は？

プリンタが違うとダメ

PDFにする

コピペ
https://mevius.5ch.net/test/read.cgi/bsoft/1728342726/880

>>202>>207をコピペ判定係に任命する

難しい！
足し算引き算させる程度にしか使ってないよぉ
主にぱ○んこの収支表みたいな

でももう3年くらいぱち○んぽやってないから
xlsx全然使ってないや

このスレに来る必要はないだろ

足し蟹。

いや、このくらいがこのスレのレベルだろ

>>209
税金含めた収支計算したら?

>>207
なんですぐわかるの？

>>213
もうぱ○ちんぽやってないから家計簿代わりにでもするかなぁ
難しいよ

おすすめ

Microsoft Excel 2010
よく使用するアプリ

>>198
gpt-oss-120bで添削してもらって、気に入らないところは一部手動で修正しました。バグは治ってる気がするが、あんまテストしてないのであしからず。

=LET(
getnearanglevalues,
LAMBDA(dat,target_angle,
LET(
cmt,"getnearanglevalues(検索対象データ群,検索角度) 、1 列目が角度、2 列目が値のテーブルから、検索角度(1次元まで)に最も近い角度の行の値を返す関数",
cmt_,"検索対象データ群は 1 列目＝角度、2 列目＝対応する値。3列目以降は無視されます。",
r, ROWS(dat),
c, ROWS(target_angle),
idxy, MAKEARRAY(r, c, LAMBDA(y,x, y)),
idxx, MAKEARRAY(r, c, LAMBDA(y,x, x)),
anglex, INDEX(dat, idxy, 1),
valuex, INDEX(dat, idxy, 2),
target_anglex, INDEX(target_angle, idxx, 1),

diff, ABS( MOD(anglex - target_anglex + 180, 360) - 180 ),
idxnear,BYCOL(diff, LAMBDA(col, XMATCH(MIN(col), col,0))),
TRANSPOSE(INDEX(dat, idxnear,2))
)
),
cmt,"上で作った関数を使用する",
getnearanglevalues(A1:B3600, C1:C4)
)

やっぱり文系馬鹿

https://mevius.5ch.net/test/read.cgi/bsoft/1753913439/217

エラー出まくってて𐤔𐤔𐤔

JR総合職50代なら年収1000万プレーヤーの可能性あるね

>>217
idxyやidxxはない方が見通しが良い

=LET(
getnearanglevalues,
LAMBDA(dat,target_angle,
LET(
cmt,"getnearanglevalues(検索対象データ群,検索角度) 、1 列目が角度、2 列目が値のテーブルから、検索角度(1次元まで)に最も近い角度の行の値を返す関数",
cmt_,"検索対象データ群は 1 列目＝角度、2 列目＝対応する値。3列目以降は無視されます。",
angle, INDEX(dat,,1),
value, INDEX(dat,,2),

diff, ABS(MOD(TRANSPOSE(angle) - target_angle + 180, 360) - 180),
idxnear,BYROW(diff, LAMBDA(row, XMATCH(MIN(row), row,0))),
INDEX(value, idxnear)
)
),
cmt,"上で作った関数を使用する",
getnearanglevalues(A1:B3600, C1:C4)
)

>>221
デバッグしろよ
これ動かないから

>>217
valuex変数を作ったは良いが、使っとらんかった。
動いとるようだから、まあええか。

文系馬鹿が知ったかして作ると、こんな簡単なものでもバグだらけのものになってしまう好例

>>222 >>224
発見されたバグを具体的に指摘せよ

もちろん！初心者らし
今、A1〜A5に数字が入っていて、その合計をA6に表示したいのですが、どうやってやればいいか分かりません💦
ネットで「SUM関数」というのを見つけて「=SUM(A1:A5)」と入れてみたのですが、なぜか「#NAME?」と表示されてしまいます…。

ExcelのバージョンはMicrosoft 365です。
関数の入れ方が間違っているのでしょうか？
どなたか教えていただけると嬉しい😃

>>226
数字に見えて数字じゃないんじゃね?
知らんけど

>>226
A1-A5の数字が実は1000円とか文字も含めていたりとか？

>>226
A6を選択して「数式→オートSUM→合計」を押せ

=IF(A1="A",VLOOKUP(B1,表1範囲,2,FALSE),VLOOKUP(B1,表2範囲,2,FALSE))

やっぱりこのスレで質問するのは馬鹿ばっか

>>231
馬鹿の代表は引っ込んでろ

>>232
事実を書かれて悔しい馬鹿

その人病に侵されてる(頭)人だから、おさわり禁止
異常者特有の粘着性
224とか231とか目障りだけどこっちが我慢するしか無い

我慢我慢

理解出来ない暗号みたいなの書かれて
ムカつくのはわかるけど
わかったふりして
暴言書いて
恥ずかしいだろ
死ねばいいのにね

自覚ないみたいだけどお前もそいつと同類だからな

>237
>>237

手が震えてアンカがダブった

>>222 >>224
発見されたバグを具体的に指摘しろ
答えなかったら敵前逃亡だとみなすから

>>222 >>224
発見されたバグを具体的に指摘しろ
答えなかったら敵前逃亡だとみなすから

>>221に改造したの俺だけど>>217もちゃんと動くよね

その人病に侵されてる(頭)人だから、おさわり禁止
異常者特有の粘着性
目障りだけどこっちが我慢するしか無い

文系馬鹿と書かれている理由がまだわからんのか
算数馬鹿と書けばわかるか？

バグの内容について書けよ

https://i.imgur.com/uukcEEP.jpeg

馬鹿はなぜ馬鹿と呼ばれるかわからないから馬鹿なんだぜ

はやくバグについて書けよ
もしかして書けないの？

まだ？

バグについて書けよ
もしかして書けないの？

これなんでエラーになるんだろ？
・エラーにならない
=REDUCE({1},{2;3},LAMBDA(arr,val,IF(TAKE(arr,-1)=2,VSTACK(arr,val),VSTACK(arr,val))))
=REDUCE({1},{2;3},LAMBDA(arr,val,IF(TAKE(arr,-1)=2,VSTACK(arr,"↑ is 2",val),VSTACK(arr,"↑ is not 2",val))))
・エラーになる
=REDUCE({1},{2;3},LAMBDA(arr,val,IF(TAKE(arr,-1)=2,VSTACK(arr,"↑ is 2",val),VSTACK(arr,val))))
=REDUCE({1},{2;3},LAMBDA(arr,val,IF(TAKE(arr,-1)=2,VSTACK(arr,val),VSTACK(arr,"↑ is not 2",val))))

>>251
それがパグ？
苦笑
はい確定的善逃亡

>>251

=LET(val,{1;2;3},
TOCOL(HSTACK(val,SCAN(0,val,LAMBDA(init,val,IF(val=2,"↑ is 2","↑ is not 2"))))))

Ifを評価する前に、列数が未確定な計算はできないってことのような気がする。

列数じゃなくて行数やった

arrの長さを変えないために足りない方の穴埋めに#N/Aが使われる
この#N/AをIFが評価して、以降#N/Aエラー
=REDUCE({1},{2;3},LAMBDA(arr,val,IF(TAKE(TAKE(arr,-2),1)=2,VSTACK(arr,"↑ is 2",val),VSTACK(arr,val))))
→ {1;2;#N/A;"↑ is 2";3}

最近FILTERXML関数というものを知って、使ってみようとしています。
やりたいことは、セルに入っているXML形式のデータから、特定の値を取り出すことです。

例えば、セルA1に以下のようなXMLが入っています：

<items>
<item>
<name>りんご</name>
<price>100</price>
</item>
<item>
<name>バナナ</name>
<price>80</price>
</item>
</items>


この中から、1つ目の商品の名前（「りんご」）だけを取り出したくて、
以下のように書いてみました：

=FILTERXML(A1, "//item[1]/name")


でも、結果が「#VALUE!」になってしまいます…。
XMLの構造が悪いのか、XPathの書き方が間違っているのか、そもそもFILTERXMLの使い方が違うのか、よく分かりません💦

ExcelのバージョンはMicrosoft 365です。
FILTERXML関数を使うときの注意点や、うまくいく書き方など、教えていただけると嬉しいです🙇‍♀

これだとエラーにならないのが不思議
=REDUCE({1},{2;3},LAMBDA(arr,val,IF(ROWS(arr)=2,VSTACK(arr,"↑ is 2",val),VSTACK(arr,val))))
IF条件式で配列の値を参照したときだけ、true値とfalse値との要素数違いでエラーになるみたいなんだ

>>257
問題をちょっとシンプルに
=IF(1=2,VSTACK(1,2),VSTACK(1))
=IF({1}=2,VSTACK(1,2),VSTACK(1))

シンプルに
=IF(1=2,{1;2},1)
=IF({1}=2,{1;2},1)

REDUCEの中で最初にNAが出てくるのはこんな感じで、
=IF({1}=2,{1;2;3},{1;2})
その後#N/Aで埋まるのはこんな感じか
=IF({#N/A}=2,{1;2;3},{1;2})

=IF({1;2}=2,{1;2;3},{4;5})

>>258
それ目的から乖離してます

>>257
どうしても動かしたい場合は、以下のように書けない事もないけど、どうせなら、アルゴリズムを考えるのに頭を悩ませた方が良いと思う。

=REDUCE({1},{2;3},LAMBDA(arr,val,IF(SUM(TAKE(arr,-1))=2,VSTACK(arr,"↑ is 2",val),VSTACK(arr,val))))

=REDUCE({1},{2;3},LAMBDA(arr,val,IF(SUM(TAKE(arr,-1))=2,VSTACK(arr,val),VSTACK(arr,"↑ is not 2",val))))

>>262
問題の原因は一言で言うとIFが配列数式になってるから

なるほど>>263でいけるならこうするのがよさそうだ
=REDUCE({1},{2;3},LAMBDA(arr,val,IF(INDEX(arr,ROWS(arr),1)=2,VSTACK(arr,"↑ is 2",val),VSTACK(arr,val))))
=REDUCE({1},{2;3},LAMBDA(arr,val,IF(INDEX(arr,ROWS(arr),1)=2,VSTACK(arr,val),VSTACK(arr,"↑ is not 2",val))))
TAKEの結果が配列なのが原因か

vstackって遅いから、勉強には良いかもしれんけど、大量の計算には向かないって言っとくよ。

@演算子
=REDUCE({1},{2;3},LAMBDA(arr,val,IF(@TAKE(arr,-1)=2,VSTACK(arr,"↑ is 2",val),VSTACK(arr,val))))
=REDUCE({1},{2;3},LAMBDA(arr,val,IF(@TAKE(arr,-1)=2,VSTACK(arr,val),VSTACK(arr,"↑ is not 2",val))))

>>267
なぜわざと抜かす？
性格悪いな

改良してみた

=REDUCE({1},{2;3},LAMBDA(arr,val,IF(SUM(TAKE(arr,-1))=2,VSTACK(arr,"↑ is 2",val),VSTACK(arr,val))))

=REDUCE({1},{2;3},LAMBDA(arr,val,IF(SUM(TAKE(arr,-1))=2,VSTACK(arr,val),VSTACK(arr,"↑ is not 2",val))))

ありがとうございます

ファイルを開いた当日から5営業日後の日付を表示したいのですが数式を教えてください
よろしくお願いします

出来ました
ありがとうございました

どういたしまして
お役に立てて光栄です

>>273
今後とも変わらぬご愛顧賜りますよう何卒よろしくお願い申し上げます