Excel総合相談所 158

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

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

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

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

>>34
スープをCSVでくれって言え

>>33
ニンニクが多くて苦手
VBAでなんとかなるかな？

365のマクロで
フォルダの中にcsvファイルが複数あって
CSVファイルのA1とA2とA3のデータだけまとめファイルに収集したい
まとめファイルの
AにCSVファイルのファイル名
BにCSVファイルの日付
CにCSVファイルの更新時刻
DにCSVファイルのA1
EにCSVファイルのA2
FにCSVファイルのA3
フォルダの中のCSVファイル全部
なるべく辞書順だとうれしいです

python in excel使うとか？

>>37
コピペ

>>36
桂花ラーメンて中毒性ラーメンの先駆けだよねーアレ定期的に食べたくなる
あそこのマー油は絶品よねーアルコールとの相性も抜群

>>39
>>39
違います

>>37
夏休みの宿題は自分で考えろ

>>37
PowerShellスレ行ったらものすごい短いコードが出てくるんじゃないかな

>>42
何故ここにいるのですか？

>>43
回答以外は無視させていただいてます

工数管理でガントチャートを作成したいのですが、
・作業開始日、締切日、作業完了日の3つのセルを用意し
・作業開始日〜締切日までで色分け
・締切日に終わらず、作業完了日が締切日からはみ出した場合その部分を色分け

というものを作るにはどういった関数を使えばよいのでしょうか？
ガントチャートのテンプレートは締め切り日というものがなく、工数が締め切りをはみ出しても視覚的にわからないものしかありませんでした。
自分で色々と試したのですがどうしてもできず・・・よろしくお願いいたします。

>>43

# 入力フォルダと出力ファイルのパスを設定
$in = "C:\Your\CSV\Folder"
$out = "C:\Temp\まとめ結果.csv"

# CSVファイルを取得し、名前順に並べて処理
Get-ChildItem "$in\*.csv" | Sort-Object Name | ForEach-Object {

# 先頭3行だけ取得
$lines = Get-Content $_.FullName -TotalCount 3

# 指定した行番号の1列目を取り出す関数
$get = {
param ($i)
if ($lines.Count -gt $i) {
return ($lines[$i] -split ',')[0]
} else {
return ""
}
}
# 1ファイル分の情報をオブジェクトとして作成
[PSCustomObject]@{
ファイル名 = $_.Name
更新日 = $_.LastWriteTime.ToString("yyyy/MM/dd")
更新時刻 = $_.LastWriteTime.ToString("HH:mm:ss")
A1 = & $get 0
A2 = & $get 1
A3 = & $get 2
}
# 全ファイル分の情報をCSVとして出力
} | Export-Csv $out -Encoding UTF8 -NoTypeInformation

>>47
先頭3行に対しConvertFrom-Csvを使ってはどうかね
エスケープ処理とかもやってくれるよん

>>47
>>48

# 入力フォルダと出力ファイルのパスを設定
$in = "C:\Your\CSV\Folder"
$out = "C:\Temp\まとめ結果.csv"

# CSVファイルを取得し、名前順に並べて処理
Get-ChildItem "$in\*.csv" | Sort-Object Name | ForEach-Object {

# 先頭3行だけ取得
$csv = Get-Content $_.FullName -TotalCount 3 -Encoding UTF8 | ConvertFrom-Csv -Header Column1

# 1ファイル分の情報をオブジェクトとして作成
[PSCustomObject]@{
ファイル名 = $_.Name
更新日 = $_.LastWriteTime.ToString("yyyy/MM/dd")
更新時刻 = $_.LastWriteTime.ToString("HH:mm:ss")
A1 = $csv[0].Column1
A2 = $csv[1].Column1
A3 = $csv[2].Column1
}
# 全ファイル分の情報をCSVとして出力
} | Export-Csv $out -Encoding UTF8 -NoTypeInformation

釣られている馬鹿ばっか

ここは前から答えを用意しておいた承認欲求馬鹿が質問して自作自演でドヤ顔で回答するスレだぞ
Rubyキチガイと一緒

>>49
これでいいので教えてください
どうやって実行すればいいですか？

>>52
プログラムを拡張子ps1ファイルに保存（例:C:\xxx\yyy\csv.ps1）
コマンドラインで以下を実行
powershell -ExecutionPolicy Bypass C:\xxx\yyy\csv.ps1

こんなこともできない奴はクビにした方がいい

ps1はShift-JISかUTF-8 BOMありで保存な
PowerShellの使いにくさは常道を逸している

本気にするなよ？

>>54
されたんですか？

だからここで暇つぶしてるだ

自作自演でくだらない質問をしてドヤ顔で回答を書き込んでいるのは無能でクビになったやつなのか

何で自作自演ってわかるの？
自分がやったから？

横からだがバレバレだぞ

>>60
俺は回答してるが質問はしてない

俺は質問も回答もしてない

どうして生きているの

>>34
桂花ラーメンて中毒性ラーメンの先駆けだよねーアレ定期的に食べたくなる
マー油は絶品よねーアルコールとの相性も抜群

全部で20個のシートがあり、それぞれ各シートには１ページしかありません。
なので全部で20ページです。

全シートを選択してから全シートで両面長辺綴じ印刷設定して印刷。
（理想）1-2、3-4、5-6、7-8、・・・ってな感じで10枚に収まるはずなのに
（現実）1-2、3-4、5、6、7-8、9、10、１１，１２，１３・・・ってな感じで、最初は両面、
途中から片面、んでまた途中一部が両面で、後半ほとんど片面って症状が発生してます。

そして片面で出ちゃったところだけシート選択して印刷かけると、上述の現実でいうと
5-6、9-10、１１，１２，１３・・・のように、やはり一部はちゃんと両面になるけど途中から片面になってしまいます。

同一シート内の複数ページ印刷はちゃんと全て両面で刷れます。

印刷途中で両面印刷が片面印刷に変わる、といった症状がググっても見つからなかったので来ました。
プリンターは京セラのTASKalfa3253ciです。
コントロール設定の方からプリンターの初期設定を両面長辺綴じにしているので、片面刷り設定になってることはないです。

紙が無駄すぎるので、誰か解決方法が分かる方・・・教えてください。

>>66
下記でいけると思う。
ChatGPTを起動する　→　>>66の本文をコピペする　→　ChatGPTの回答を実行する

>>66
xlsx→pdf→紙

>>66
全シートを選択してから印刷するのではなくて、
選択するシートは一つだけにして
印刷時のエクセルの設定で「ブック全体を印刷」を選択すればOK

>>69
これでダメな場合は全シート選択してプレビュー画面を表示して
次ページを押して行ってシート毎に両面印刷に設定する

1ページ目をプレビューしている時に両面設定して
2ページ目をプレビューしている時に両面設定して
〜同じことを繰り返し〜
20ページ目をプレビューしている時に両面設定して

要するに全シートを選択しても「作業中のシートを印刷」だと
シート毎に両面/片面設定が記憶されたままになっちゃうから
それを直すということ

ちなみにこの辺の挙動はファイルやExcelバージョンによって違うことがある
例えば過去に1シートだけ印刷したことがある、別のプリンタで印刷したことがある等々

>>70-71でもなおダメなら>>68氏の通り
PDFで保存して空ページ等がないように編集するなりしてから両面印刷
できればAcrobatで

行列反転コピペでいいんじゃね

それを繰り返しやるの？時間ある人はそれでいいか草

>>74
deja vu

>>74
この部分もコピペしろよカス

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

66にも言えよカス

>>74（前スレ https://mevius.5ch.net/test/read.cgi/bsoft/1728342726/437 ）
スピルで一括整形できそう
=LET(
nameRange, A1:C4,
valueRange, OFFSET(nameRange, 1, 0),
HSTACK(
TOCOL(
IF((nameRange <> "") * (valueRange <> ""), nameRange, NA()),
2),
TOCOL(
IF((nameRange <> "") * (valueRange <> ""), valueRange, NA()),
2)
)
)

コピペに何度も回答する老人ぼけども

探してくるのうまいなー
と思ったけどこれ自演だよね

JaneDoe（じえんどう？）

ジ・エンド

74
77
78
80
が自作自演

74〜86はすべて自作自演

自作自演の三文芝居だとして、オチは何？

人に求めてばかりだなお前

グラフの質問です。

吉野家牛丼並価格推移(税込み)

1966年：200円
1975年：300円
1979年：350円
1985年：370円
1990年：400円
2001年：280円
2006年：380円
2013年：280円
2014年：300円
2014年：380円
2021年：426円
2022年：448円
2023年：468円
2024年：498円

このデータをかっここれは

このデータ(サンプル)をグラフ化したいいです。
線を曲線にして、かつ、別データに差し替えたらグラフも自動更新したいです。

>>90
飛んでる年のグラフはどうしたい？

>>89
「年」や「円」をとって数値だけにしてから、散布図（平滑線）

=ARRAYFORMULA(ROUNDDOWN(A1:A/B1:B),0)
のA1:A/B1:Bの部分をC1に入力された内容（A2:A/B2:B など）によって可変させたいです

余所でやってください

>>91
前の年同じに決まってるだろ
洞察力低い人ですか？

>>92
それでいいので詳しく教えて

13年パワハラ 925万
14年パワハラ 1598万
15年パワハラ 2447万
16年パワハラ 3206万
17年窓際 3567万
18年窓際 4568万
19年窓際 4629万
20年窓際 6846万
21年窓際 8831万
22年窓際 億り猫
23年窓際 1.2億
24年窓際 1.4億

例えばこんなダーダに差し替えた時にグラフを同じに様に出したい

>>89
これ、2014年が2つあるけど、月単位にしなくていいの？

>>89,90
こういうことか？
https://i.imgur.com/c3dOYmO.png

とりあえず年単位だが。

>>90
曲線にする理由がわからない
サンプルは不連続な値段だが本データは連続関数なのではないか

散布図だと月単位にしなくても行けるわ。
https://i.imgur.com/cXO9tox.png

> 線を曲線
スムージングで角を丸めてみたが、趣旨が不明

自分で作っておいて、こういうのも何だが、
このグラフはどう考えても悪い見本だわ

Python in excelで、Pythonの補完関数を活用してグラフ化したことはあるけど、Pythonはいちいち型を合わせなければ動かんのがめんどい。

質問です

Excel 2025で英数記号漢字かなカナ半角ｶﾅ全角記号混じりの列があり
半角ｶﾅのみ全角ｶﾅに変換したいです

できれば関数のみで終わらせたいのですが上手くいきません

文字数制限のある品名欄の項目なので意図的に半角ｶﾅも使っていますが
他で使うのには不便で見づらいので全角カナにしたいです

=jis()では英数字が全角に
=phonetic()では平仮名がカナになってしまいます

Excel2025？？？

馬鹿は馬鹿な頭で考えた馬鹿な方法に固執する

>>105
https://mevius.5ch.net/test/read.cgi/bsoft/1728342726/617

>>105
ゴミ
>>108
GJ!

LAMBDA関数のパラメーター部分にはスペースを入れられないんだな
=LET(add, LAMBDA(a, b, a + b), add(A1, B1))
↑ こう書きたくても、勝手にこうなる ↓
=LET(add, LAMBDA(a,b, a + b), add(A1, B1))

ランバダ関数

>>108
自演お疲れ様

androidのスプレッドシートで列固定をすると勝手に境か左に置かれて、固定した列が見えないというPC版のエクセルの列固定と別の挙動するんだけど
全く持って列固定の体をなしてない

↓同じ悩み(参考)
ttps://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q14251210634

調べても解決策出ないんだが誰かわかる人いる？

コピペ

スマホの小さい画面でXL使うのは拷問だなと思った
10inchでも似たようなもん
4Kの100%でも見てみたが、別の意味で拷問やなと思ったw

馬鹿は勝手な略語を使う法則

ポケモンのサイズかと思った

>>115
無理ゲーよ

体重管理とか車の燃費管理とか、いちいちパソコン出さなくても数値の記録だけする時にスマホでOneDrive保存のExcelファイルを開いて記録している。
そのデータの傾向グラフもスマホで確認している。

>>116
バカが手をあげて出てきたなw

皆さんお暇そうなのでスレチですがお尋ねします。
同じルーターを使ってるPC2台、一方は有線、もう一方は無線でネットに繋げています。
その有線で繋いでるPCだと、ここ5chに接続すると Web server is down でerror cpde 521 吐いて見れません。
無線の方はこの通り見れるし書けます。症状は先週辺りから。5chの規制？とか思いましたが、
有線の方だけと言うのが不可解です。検索エンジン整理したり履歴やキャッシュ削除とかをしても変わりません。
ネット周りにお詳しい方、原因や対策やらをご存じでしたらご指南いただけませんでしょうか。
急ぎません。いつでも結構です。よろしくお願いします。

とか書きながらじぶんでもググってたら相当数の同じ症状の人がいらっしゃるご様子。
殆どがサーバーダウンと決め付けてるパターンでしたが、そんな中、おや？と思える症状が。
ps://menu.5ch.net/bbstable.html（リンク貼ってコッチも対策されてもたまりませんので頭削ってます。）
こちらからだと難なく入れるし、見れる書けるのが判明しました。
ps://www2.5ch.net/5ch.html（こちらから入ろうとすると蹴られる。何を試してもダメ。なしのつぶて。）
cloudflareというサービス経由だから、そこが端末を蹴ってるかと思いきや、入り口制限ってだけなんでしょうか？

と、問い掛けても、おんなじ症状で5chに入って来れない方々は
このレスさえ見れてないんでしょうから、ちっとも解決には繋がって無いのと一緒ですねｗ
と、全滅だった端末から書いてみました。

すりおろした
れんこんで
ちょっとしたおかず

有線無線だけで変わるわけがない
集合住宅など無線が10以上見えるとこは凄まじいなと思う

>>121
死ね

先輩も、そんな事しか書けないレベルでヒマってことスよね
もっと知的な返しが欲しいッス

バカにはそんなもんで十分

セルA1とB1に関数が入ってて文字列を表示してる
C1に関数で
A1の値が0か空白ならB1の値を表示
B1の値が0か空白ならA1の値を表示
したい
ただしそれぞれの値が0か空白以外で一致していなければ
文字列でNGを表示したい
if文のネストでできるけど
もう少しスマートな方法ない?

>129
両方とも0か空白だったら空白を表示
0と空白でも空白を表示

=LEFT(A1,LEN(A1)*(A1<>0)*((B1=0)+(B1="")))&LEFT(B1,LEN(B1)*(B1<>0)*((A1=0)+(A1="")))&LEFT("NG",2*(A1<>0)*(A1<>"")*(B1<>0)*(B1<>"")*(A1<>B1))&LEFT(A1,LEN(A1)*(A1<>0)*(A1=B1))

>>131
動きました
感謝します
でも意味わかんない

>>132
ifが嫌いということなので、条件式の結果が0,1になる事を利用している
昔のBASICではIF文の解析が遅かった為割と使われていたテクニック

=LET(a,IF(A1="0","",A1),b,IF(B1="0","",B1),
IFS(a="",b,b="",a,a=b,a,1,"NG")
)