Excel総合相談所 149

1 ：名無しさん＠そうだ選挙にいこう：2022/03/18(金) 11:20:25.11 .net

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

注意事項
・情報を隠すために別の問題を設定するのはやめましょう。たいていの場合その問題は的外れな設定で、期待していたものからずれた回答が返ってきます。
※前スレ
Excel総合相談所 148
https://mevius.5ch.net/test/read.cgi/bsoft/1643843984/

579 ：名無しさん＠そうだ選挙にいこう：2022/05/01(日) 17:57:16.17 .net

どうした急に？ズレてるぞ

580 ：名無しさん＠そうだ選挙にいこう：2022/05/01(日) 19:52:35.02 .net

最初にスマートって言い出した無能の言い訳が続きます

581 ：名無しさん＠そうだ選挙にいこう：2022/05/01(日) 20:33:41.22 .net

こんな底辺の人間が100円ショップを支えてくれてるのだ
数年後にはベトナム人以下の存在になってるけど

582 ：名無しさん＠そうだ選挙にいこう：2022/05/02(月) 01:05:22.34 .net

4月 A 否
5月 B 応
4月 A 応
みたいな列で4月にある否じゃないAの数を数えにはどうすればいいですか？

583 ：名無しさん＠そうだ選挙にいこう：2022/05/02(月) 04:39:21.98 .net

=SUMPRODUCT((A1:A3="4月")*(B1:B3="A")*(C1:C3<>"否")*1)

584 ：名無しさん＠そうだ選挙にいこう：2022/05/02(月) 05:40:36 .net

=COUNTIFS(A:A,"=4月",B:B,"=A",C:C,"<>否")

585 ：名無しさん＠そうだ選挙にいこう：2022/05/02(月) 14:13:18 .net

>>583,584
ありがとうございます！めちゃくちゃ助かりました！！

586 ：名無しさん＠そうだ選挙にいこう：2022/05/03(火) 18:15:24.35 .net

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

大量の画像（数百個）を何度も読み込んで縦に並べているのですが、
セルの縦幅と合わせるのが至難です。

セルひとつに画像ひとつを当てはめることは
できないのでしょうか？　隣のセルに番号を記入して、それでソートした時に
画像もそれに従って動いてくれるように最初から作り込みたいです。

587 ：名無しさん＠そうだ選挙にいこう：2022/05/03(火) 19:18:30 .net

いくつか案があるけどできれば今のシートとフォームの構造見ながら説明したい。スクショを提供してくれる？
>>586

588 ：名無しさん＠そうだ選挙にいこう：2022/05/03(火) 19:50:16.32 .net

>>587
このレスはコピペ

589 ：名無しさん＠そうだ選挙にいこう：2022/05/03(火) 20:22:58.30 .net

質問のテンプレがあるんだから
リプライのテンプレがあっても問題ない

590 ：名無しさん＠そうだ選挙にいこう：2022/05/03(火) 23:11:31.39 .net

>>586
VBAなら可能

591 ：名無しさん＠そうだ選挙にいこう：2022/05/03(火) 23:34:35.72 .net

そう、VBAならね

592 ：名無しさん＠そうだ選挙にいこう：2022/05/03(火) 23:56:30.64 .net

>>586
自作マクロ集にあるが15年くらい前に書いた汚いマクロでメンテナンスしてないから公開するのが恥ずかしい
でも検索するといくつか出てくるよ
前に窓の杜にあったのをつかったことがあるが
これもなんかよさそうだよ（試してないけど）
https://qiita.com/saka-guti/items/5fc67c76e42fe95d9f2d

593 ：名無しさん＠そうだ選挙にいこう：2022/05/04(水) 00:40:00.79 .net

その質問コピペ

594 ：名無しさん＠そうだ選挙にいこう：2022/05/04(水) 07:30:36 .net

じゃあ次行こうか

595 ：名無しさん＠そうだ選挙にいこう：2022/05/04(水) 16:11:33.25 .net

さっきまで５ちゃんが開けなかったがな

596 ：名無しさん＠そうだ選挙にいこう：2022/05/05(木) 13:28:38.87 .net

テレワークでつい他の事してサボっちゃう事があるんだけど
PCのマウスやキーボードが動いてないと
Teamsのプレゼンス（在籍状態）の表示は黄色の一時退席に強制的に切りわかっちゃう？

試しに10分くらい放置してみたのだけど表示は緑色の連絡可能のままなのよね
本来なら手動で指定しても、動いてないと強制的に一時退席になるみたいだけど・・・
アプリではなくブラウザ版を使用してます

597 ：名無しさん＠そうだ選挙にいこう：2022/05/05(木) 13:45:24.30 .net

スレ違いだがおれもブラウザ版使ってる
アプリだともっさりしすぎてストレス溜まるんだよな

598 ：名無しさん＠そうだ選挙にいこう：2022/05/05(木) 14:25:02.36 .net

質問理解できないなら黙ってろ

599 ：名無しさん＠そうだ選挙にいこう：2022/05/05(木) 14:32:43.66 .net

本当に分かってないのは>>598というオチｗ

600 ：名無しさん＠そうだ選挙にいこう：2022/05/05(木) 14:33:53.32 .net

【1 OSの種類 　 　 　 　 .】 Windows10
【2 Excelのバージョン 　 】 Excel2019
【3 VBAが使えるか　 　 .】 はい
【4 VBAでの回答の可否】 可
【9 VBAの方が簡単で早くできる場合はVBAで回答】 可
行数760くらいの表があります。
a列は1行おきにデータが入っていて、その行は他の列にもデータが必ず入っています。
a列にデータが入っていない行は、他列にデータが入っている行もあれば無い行もあります。
a列のデータなし行だけ1行ずつグループ化したいのですが、マクロはどう書けば良いでしょうか？
a列データなし行は、他列にデータを入れる行だけ展開して、データなし行は畳んでおきたいのです。

601 ：名無しさん＠そうだ選挙にいこう：2022/05/05(木) 14:41:15.79 .net

>>600
https://mevius.5ch.net/test/read.cgi/bsoft/1638603306/55

602 ：名無しさん＠そうだ選挙にいこう：2022/05/05(木) 17:44:34 .net

>>598
おまいはいつも偉そうだね～

603 ：名無しさん＠そうだ選挙にいこう：2022/05/06(金) 01:28:02.49 .net

>>592

これはすごいですね。
欲しい機能ズバリです。
ありがとうございました。

604 ：名無しさん＠そうだ選挙にいこう：2022/05/06(金) 07:48:53 .net

ちゃんとコード見てないけどリンク参照になってる画像だと元の画像をエクスプローラーから移動、削除、リネームしたらExcelから見れなくなると思うので注意した方が良い
当然別の人にも送れない
フルパスがセルに書かれてるから多分リンク参照してるんじゃ無いかな

605 ：名無しさん＠そうだ選挙にいこう：2022/05/06(金) 11:50:09 .net

意味不明の回答は無視します

606 ：名無しさん＠そうだ選挙にいこう：2022/05/06(金) 12:49:35.65 .net

>>604
Excelのリンクって、縮小したビットマップがExcelファイル中に保存されるんじゃね？
ダブルクリックしてアクティベーションしようとしたら「ファイルが無え」って怒られそうだけど。

607 ：名無しさん＠そうだ選挙にいこう：2022/05/06(金) 21:23:42.07 .net

ようはPicture.InsertかShapes.AddPictureかの違いってこと
わかんないなら黙ってれば良いよ

608 ：名無しさん＠そうだ選挙にいこう：2022/05/07(土) 00:04:58.25 .net

・・・・。

609 ：名無しさん＠そうだ選挙にいこう：2022/05/07(土) 12:11:43.59 .net

なんかここおもれーなw

610 ：名無しさん＠そうだ選挙にいこう：2022/05/07(土) 13:25:26 .net

脱マウスで入力するのを覚え中だけど慣れてないから逆に苛つく

611 ：名無しさん＠そうだ選挙にいこう：2022/05/07(土) 14:20:27.00 .net

だいじだね　何なら脱キーボードもね　使うときはタッチパネルだけの時代に成ってくしね
でも、作る時はキーボードもマウスも無いと不便で必ず欲しく成るから、偏るのは良くないね

612 ：名無しさん＠そうだ選挙にいこう：2022/05/07(土) 14:28:53.44 .net

段階1 マウス派
何でもかんでもマウスクリック
キーボードは文字入力にしか使わない

段階2 キーボード派
何でもかんでもキーボードカタカタ
マウス派を馬鹿にする

段階3 マウス派
何でもかんでもスクリプト化
アイコンをダブルクリックするだけで処理を全部完結させる

613 ：名無しさん＠そうだ選挙にいこう：2022/05/07(土) 21:19:53.58 .net

こんなこと考えながら普段仕事してんの？
キモい

614 ：名無しさん＠そうだ選挙にいこう：2022/05/07(土) 21:22:41.25 .net

してるよ
気持ちいい

615 ：名無しさん＠そうだ選挙にいこう：2022/05/08(日) 02:27:13.21 .net

仕事にオナニー持ち込むヤツは多いよね

616 ：名無しさん＠そうだ選挙にいこう：2022/05/08(日) 02:46:49.49 .net

段階4　口先派
仕事は他人にやらせる。
俺はやり方教えてダメ出しするだけ。

617 ：名無しさん＠そうだ選挙にいこう：2022/05/08(日) 10:52:15.90 .net

それで良いと思う
なんでもかんでも自分でやろうとする人いるけど、何だかなぁーと。

618 ：名無しさん＠そうだ選挙にいこう：2022/05/08(日) 11:06:09.42 .net

ズレてるぞ　大体が、そおゆう奴こそリストラ最前線
ダメ出しじゃなくて、ヨシ出ししなきゃ誰も着いて来ない

619 ：名無しさん＠そうだ選挙にいこう：2022/05/08(日) 16:08:11.67 .net

>>618
仕事出来なさそう

620 ：名無しさん＠そうだ選挙にいこう：2022/05/09(月) 01:52:40.14 .net

一瞬、Excel結婚相談所かと思ったわ

621 ：名無しさん＠そうだ選挙にいこう：2022/05/09(月) 11:55:09 .net

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

C列に入れる数式を教えて欲しいです
A列とB列に数値が入っていてC列に昨対%を表示させる際に
１行目C1の計算式を入れてしまうと２、３行目とも空欄になってしまいますが
２行目のようにB列のみ入ってる場合は#VALUE!とエラー表示させたく
３行目のように両方入っていない場合は空欄を返したいです

A1 B1 C1
100 200 50%（計算式は =iferror(sum(A1/B1）,"")
A2 B2 C2
200 （空欄ではなく#VALUE!と表示させたい）
A3 B3 C3
　　　　 （空欄で表示させたい）

622 ：名無しさん＠そうだ選挙にいこう：2022/05/09(月) 16:22:45.35 .net

いくつか案があるけどできれば今のシートとフォームの構造見ながら説明したい。スクショを提供してくれる？
>>621

623 ：名無しさん＠そうだ選挙にいこう：2022/05/09(月) 16:33:03.82 .net

2行目の計算ってエラーで空欄になるのではなくて0になる気がする

624 ：名無しさん＠そうだ選挙にいこう：2022/05/09(月) 21:00:00.61 .net

>>621
=IF(AND(A1="",B1=""),"",IF(AND(A1="",B1<>""),1/"a",A1/B1))

625 ：名無しさん＠そうだ選挙にいこう：2022/05/09(月) 21:02:59.31 .net

1/"a"はエラーを出すためで他に良い方法があるかもしれない

626 ：名無しさん＠そうだ選挙にいこう：2022/05/09(月) 21:16:02.22 .net

VALUE("A")

627 ：名無しさん＠そうだ選挙にいこう：2022/05/09(月) 21:25:21.32 .net

1/0

628 ：名無しさん＠そうだ選挙にいこう：2022/05/09(月) 21:25:54.21 .net

=IF(A1&B1="","",
IF(A1="","value",A1)/B1)

"value"は明示するためだけど、なんだかねぇ

629 ：名無しさん＠そうだ選挙にいこう：2022/05/09(月) 22:18:21.11 .net

#VALUE! って直接エラー値書くのはダメなん？

630 ：名無しさん＠そうだ選挙にいこう：2022/05/09(月) 22:27:19.89 .net

=IF(A1&B1="","",
IF(A1="",#VALUE!,A1)/B1)

マジかよこれいけるのか、知らなかった

631 ：名無しさん＠そうだ選挙にいこう：2022/05/09(月) 22:28:50.44 .net

これは見やすいな

=IF(A1&B1="","",
IF(A1="",#VALUE!,
A1/B1))

632 ：名無しさん＠そうだ選挙にいこう：2022/05/09(月) 23:01:31.83 .net

集合の知は面白いなあ

633 ：名無しさん＠そうだ選挙にいこう：2022/05/10(火) 02:22:20.37 .net

よってたかって回答するのは久しぶり
最初期はそうだったよね

634 ：名無しさん＠そうだ選挙にいこう：2022/05/10(火) 11:27:08.42 .net

>>622-633
遅い時間に回答してくれる人もいて有難うございました!
計算結果を表示させるためのsum(A1/B1)の部分ってどう組み込めば良いのでしょうか？
昼休みに考えてみます・・

635 ：名無しさん＠そうだ選挙にいこう：2022/05/10(火) 12:02:55.95 .net

>>634
割り算すればいいだけなんだから、sumはいらない
sum(A1/B1）
A1/B1
は同じ意味

636 ：名無しさん＠そうだ選挙にいこう：2022/05/10(火) 12:54:47 .net

なぜValue表示にさせたいのか気になる

637 ：名無しさん＠そうだ選挙にいこう：2022/05/10(火) 12:55:23 .net

>>635
試してみましたらできました！

638 ：名無しさん＠そうだ選挙にいこう：2022/05/10(火) 12:58:22 .net

>>636
実務的な話ですが・・
文字はValueでなくても構わないのですが、片方だけ実績がある年もフィルターで表示したいからです

639 ：名無しさん＠そうだ選挙にいこう：2022/05/10(火) 13:42:41.50 .net

=IF(A1&B1="","",
IF(A1="","B列のみ",,
A1/B1))

とかでよくね

640 ：名無しさん＠そうだ選挙にいこう：2022/05/10(火) 17:25:55.58 .net

=IF(A1="",
IF(B1="","",#N/A),
A1/B1))

641 ：名無しさん＠そうだ選挙にいこう：2022/05/10(火) 20:39:14.59 .net

パワークエリの質問です
https://imgur.com/ZYAcgUD
図中右側のようなフォーマットのtxtファイルが、あるフォルダに複数個格納されています。
そのフォルダに格納されているtxtデータをパワークエリで読み込み、図中左側のようなテーブルにしたいです。
調べても日付と測定者の列を盛り込む方法が分からなかったのですが、何か良い方法があればご教授願います。

642 ：名無しさん＠そうだ選挙にいこう：2022/05/11(水) 01:41:47.25 .net

Valueと見せかけて馬良とか

643 ：名無しさん＠そうだ選挙にいこう：2022/05/11(水) 02:44:11.90 .net

>>641
クエリーを
・タイトル2行用
・データ部用
の2つに分ける。

1つのクエリー内で
後ステップの挿入/前ステップの抽出
を使って、日付、測定者もデータ部に2列追加して
一発で取り込むことも可能だけど、
ステップがちょっと長くなる。

644 ：名無しさん＠そうだ選挙にいこう：2022/05/11(水) 02:55:28.76 .net

>>641
あと、合わせ技で、
1つのフォルダーに入っている同じフォーマットの複数ファイルを
連続(縦に結合)して読込みたいときは、
フォルター指定してヘルパークエリーを使う。
https://youtu.be/uLV85sauJRw

645 ：名無しさん＠そうだ選挙にいこう：2022/05/11(水) 14:42:47.14 .net

図形の「円弧」をVBAで所定のサイズにしたいです。
半径を所定の値にするにはどこをどのように指示すれば良いでしょうか。

646 ：名無しさん＠そうだ選挙にいこう：2022/05/11(水) 17:07:37.34 .net

初歩的な質問ですみません
何か表や文書をA４サイズやa3で作成したい場合、どのような手順で作成したら良いのでしょうか？
ページレイアウトから点線つけて作成するのでしょうか？

647 ：名無しさん＠そうだ選挙にいこう：2022/05/11(水) 17:45:40 .net

質問です
B列に“〇〇”という文字が含まれ、かつ、D列に“△”を含む文字列があるものを抜き出してソートしたいです
FILTERで試行錯誤してみましたが()*()で条件を繋げても、COUNTIFSやFIND、ANDやLEFTも使ってはみましたがうまくいきませんでした
複数条件の上に片方はワイルドカードを含む検索条件で抜き出して並び替えるよい方法はあるでしょうか

648 ：名無しさん＠そうだ選挙にいこう：2022/05/11(水) 18:05:32.23 .net

ソート？
フィルタ？
B列とD列を結合するの？
どちらの列のどの部分(文字数、前方、後方etc.)をワイルドカード指定するの？

649 ：名無しさん＠そうだ選挙にいこう：2022/05/11(水) 18:33:02.13 .net

>>646
倍率100%、用紙を所定のサイズにして改ページプレビュー
改ページされる直前まで印刷範囲を拡大

650 ：名無しさん＠そうだ選挙にいこう：2022/05/11(水) 19:35:30.91 .net

>>645
Excelの図形は「楕円の直径」しか指定できないから、円弧の半径を変えたい時は、その半径2倍して高さと幅の両方を同じに変えてやる必要がある

651 ：名無しさん＠そうだ選挙にいこう：2022/05/12(木) 00:20:43.31 .net

>>643
具体的な操作方法を教えてください。
できれば1つで完結する方法が知りたいです。
データ結合はできるのでサンプルファイル完成までの操作をお願いします。

652 ：名無しさん＠そうだ選挙にいこう：2022/05/12(木) 01:19:08.05 .net

=FILTER(B:B&D:D,
(ISNUMBER(FIND("〇〇",B:B)))*(ISNUMBER(FIND("△",D:D))) )

653 ：名無しさん＠そうだ選挙にいこう：2022/05/12(木) 08:41:36 .net

>>651
You should give it a try by yourself

654 ：643：2022/05/12(木) 09:38:04.54 .net

>>651
1つのtest1.txtファイルから、1つのクエリーでヘッダーとデータ部を読込む方法は、
自己流だとこんな感じ。

元のtest1ファイル
https://i.imgur.com/mcNxs27.png

読込み結果
https://i.imgur.com/i6L5Yte.png
余談だが、test1.txtのフルパスを"R_TargetFile"で定義している。

PowerQueryエディター
https://i.imgur.com/u7sHhkw.png
全てのステップをリボンから作成は出来ない。一部は詳細エディターで手打ちとコピペ。
手動で編集中の注意点は、
・最終ステップの末尾には "," を付けない
・inの後の記述は、その時の最終ステップ名(この場合は「変更された型2」)にその都度変える

詳細エディター
https://i.imgur.com/u7HqWRc.png
一度目の読込み(ソース)はヘッダー用で、
後でList.Firstで値を取得しやすくするためにタテヨコ変換した。
ここで「後ステップの挿入」を使って2値を"H_Date"、"H_Measurer"と定義してメモリーに格納？
二度目の読込み(ソース1)はデータ部用で、
カスタム列の追加で全行を
・日付=H_Date
・測定者=H_Measurer
とした。
なお、最初の「ソース」のステップで「Columns=2」にすると、
「削除された他の列」のステップは不要になる。

(詳細エディターのテキストは後述)

655 ：643：2022/05/12(木) 09:40:01.48 .net

>>654 の続き
以下、記述のテキスト

let
R_TargetFile = Excel.CurrentWorkbook(){[Name="R_TargetFile"]}[Content]{0}[Column1], // 対象ファイルフルパスをsheet上の定義名から取得
// ヘッダー部の読込み
ソース = Csv.Document(File.Contents(R_TargetFile),[Delimiter=" ", Columns=3, Encoding=932, QuoteStyle=QuoteStyle.None]),
削除された他の列 = Table.SelectColumns(ソース,{"Column1", "Column2"}),
保存された先頭行 = Table.FirstN(削除された他の列,2),
転置されたテーブル = Table.Transpose(保存された先頭行), // List.Firstで取得しやすいようにタテヨコ変換
昇格されたヘッダー数 = Table.PromoteHeaders(転置されたテーブル, [PromoteAllScalars=true]),
変更された型 = Table.TransformColumnTypes(昇格されたヘッダー数,{{"日付", type date}, {"測定者", type text}}),
// ここで「後にステップの挿入」
H_Date = List.First(変更された型[日付]), // 日付列1行目の値を取得
H_Measurer = List.First(変更された型[測定者]), // 測定者列1行目の値を取得

(まだ続く)

656 ：643：2022/05/12(木) 09:44:21.26 .net

>>655 の続き

// データ部の読込み (「ソース」行をコピペして、ステップ名重複回避のために名前を「ソース1」に変更
ソース1 = Csv.Document(File.Contents(R_TargetFile),[Delimiter=" ", Columns=3, Encoding=932, QuoteStyle=QuoteStyle.None]),
削除された最初の行 = Table.Skip(ソース1,3),
昇格されたヘッダー数1 = Table.PromoteHeaders(削除された最初の行, [PromoteAllScalars=true]),
変更された型1 = Table.TransformColumnTypes(昇格されたヘッダー数1,{{"サンプル番号", Int64.Type}, {"測定値A", Int64.Type}, {"測定値B", Int64.Type}}),
日付列の追加 = Table.AddColumn(変更された型1, "日付", each H_Date), // カスタム列の追加
測定者列の追加 = Table.AddColumn(日付列の追加, "測定者", each H_Measurer), // カスタム列の追加
変更された型2 = Table.TransformColumnTypes(測定者列の追加,{{"日付", type date}, {"測定者", type text}})
in
変更された型2

以上

sheet上のセルのどこかを"R_TargetFile"と名前定義し、そこにtest1.txtのフルパスを貼った上で、
空のクエリーに上記記述をコピペすれば、
動くと思う、多分。

657 ：643：2022/05/12(木) 09:51:28.69 .net

余談2
>>656 の
ソース1 = Csv.Document(File.Contents(R_TargetFile),[Delimiter=" ", Columns=3, Encoding=932, QuoteStyle=QuoteStyle.None]),
を
ソース1 = ソース,
に省略することも可能。

658 ：643：2022/05/12(木) 09:59:51.82 .net

余談3
>>655,656 のソース、ソース1で、
Delimiter=" "　・・・区切り記号
Encoding=932　・・・文字コード
は、その.txtファイルの作りによって違うだろうから、
その辺はよしなに。

659 ：643：2022/05/12(木) 10:48:33.70 .net

元画像消して差替
ま、いっか・・・

>>654
読込み結果
https://i.imgur.com/WEohcUU.png

660 ：名無しさん＠そうだ選挙にいこう：2022/05/12(木) 11:21:41.06 .net

できそうでできません。
シート1に商品売上リストがあり、
シート2に抽出したい商品が入っています。
シート3に抽出したい商品を行一括で抽出したいのですが関数でありますでしょうか？

661 ：名無しさん＠そうだ選挙にいこう：2022/05/12(木) 11:25:32.82 .net

あります

662 ：名無しさん＠そうだ選挙にいこう：2022/05/12(木) 18:21:14.77 .net

>>649
ありがとうございます
また質問すみません
それだと自分がやるとレイアウトを整える際にズレが出てきてしまいます。

A3やA4で印刷をする予定がある表を作るときに皆さんどういう手順で表作成してるのでしょうか？
まずレイアウトを考えてデータや文字の入力するのですが、文字サイズや行や列のサイズの調整感覚が全くわからなくて困ってます。
印刷予定がある場合、行や列の幅はどのような判断基準で決めてるのでしょうか？

663 ：名無しさん＠そうだ選挙にいこう：2022/05/12(木) 19:01:37.06 .net

紙のサイズとフォントの設定だよ

664 ：名無しさん＠そうだ選挙にいこう：2022/05/12(木) 22:18:34 .net

列幅や行幅は弄らない
インデントやフォントサイズで調整する

665 ：名無しさん＠そうだ選挙にいこう：2022/05/12(木) 23:57:37.06 .net

>>660
filter関数で
https://i.imgur.com/hf3v0cM.png

666 ：名無しさん＠そうだ選挙にいこう：2022/05/13(金) 06:36:57.31 .net

列や行の幅弄らないとなると表に罫線引いた時に見栄えが悪くないですか？

667 ：名無しさん＠そうだ選挙にいこう：2022/05/13(金) 07:00:16.85 .net

Excelは計算するためのアプリ
清書や印刷するための物じゃないから、見栄えを良くしようとすると余計な手間がかかる
印刷しては修正の繰り返しで地道に整えるしかないんだよ

668 ：名無しさん＠そうだ選挙にいこう：2022/05/13(金) 07:31:10.86 .net

個人的なこだわりはいいので理由がわかったら教えてください

669 ：名無しさん＠そうだ選挙にいこう：2022/05/13(金) 07:31:28.88 .net

>>666
Excelの文書作成機能には限界があるから完璧な物を求めない方が良い
別シートから表を画像で貼り付けるなど工夫できる余地はあるのだから
あと殆どの人が使ってないであろうスタイルを使えば統一感が出るからお薦め

670 ：名無しさん＠そうだ選挙にいこう：2022/05/13(金) 07:42:42.94 .net

【1 OSの種類】 Windows10
【2 Excelのバージョン】 Excel2103
【3 VBAが使えるか】 いいえ
【4 VBAでの回答の可否】 否
【5 クエリが使えるか】いいえ
【6 クエリでの回答】否
【7 Accessが使えるか】いいえ
【8 Accessでの回答】否
【9 VBAの方が簡単で早くできる場合はVBAで回答】 否

1→2のように特定の文字を1行目の文字に一括で置換する方法を教えて下さい

1 https://i.imgur.com/gfqUZqq.png
2 https://i.imgur.com/U0rq3Hy.png

671 ：名無しさん＠そうだ選挙にいこう：2022/05/13(金) 08:48:09.90 .net

>>>670
置換はvbaナシでは無理
sheet2!a1=IF(ROW()=1,Sheet1!A1,SUBSTITUTE(Sheet1!A1,"○",Sheet1!A$1))
あとは縦横にオーロフィル

672 ：名無しさん＠そうだ選挙にいこう：2022/05/13(金) 08:48:22.32 .net

オーロフィル→オートフィル

673 ：名無しさん＠そうだ選挙にいこう：2022/05/13(金) 08:55:15.38 .net

>>670
1. 別シートを作って1行目のみ全コピー
2. 別シートの2行目以降は =IF(sheet1!A2=“◯”, A$1, “”)
3. 置換出来たら別シートの全セルコピー→値のみ貼り付け

こんな感じでどうかな

674 ：名無しさん＠そうだ選挙にいこう：2022/05/13(金) 09:02:33.37 .net

>>648
並び替えになります
少し文字が変わってしまって申し訳ないですが、B:Dまでの行でAに〇〇と入力されており、かつEに△を含むものを抜き出したいです

>>652
試してみます

675 ：名無しさん＠そうだ選挙にいこう：2022/05/13(金) 19:00:56.89 .net

誰か教えてほしい
写真にかいてある理想値の様に関数で
MBをKBで出したいんだけど分かる人いる？
https://i.imgur.com/1SbG5UW.png

676 ：名無しさん＠そうだ選挙にいこう：2022/05/13(金) 19:12:16.12 .net

1024ジャネーのけ

677 ：名無しさん＠そうだ選挙にいこう：2022/05/13(金) 19:14:03.93 .net

なんで数式バーが広すぎる？
普段すげー長い式組んでいると予想

678 ：名無しさん＠そうだ選挙にいこう：2022/05/13(金) 19:17:23.89 .net

>>676
1024でも1000でも大丈夫
おおよその値だしたいだけｗ

>>677
モニターでかいだけよ

679 ：名無しさん＠そうだ選挙にいこう：2022/05/13(金) 19:41:20.68 .net

MBを000に置換えたら