Excel（エクセル）

office365使用 もし、A1に数値が入っていないのに B1に数値が入っていた場合は C1にエラーメッセージ 【コストの消し忘れ】という文字を表示させたいです。 どなたかお詳しい方、よろしくお願いいたします

A列に、日付 B列に、名前 C列に、電話番号 D～AF列に、各項目 AG列に、備考 上記のような構成のブックが10枚あります。 それをパワークエリで読み込んで、１つにまとめました。 そのうえで、一番下に行を追加して、各項目の縦計を出したいのですが、よい方法はないでしょうか？ クループ化で合計を出すことはできましたが、各項目の下にズレないようにマージすることが出来ませんでした。

やりたいことは　エクセルで作成したある工場の機械を配置した図面の番号をクリックし　別シートで作成した その番号の機械の詳細を記述した一覧表の同じ番号の 行でも機械名を入力したセルでもいいのですが　色を付け（例えば黄色）太字にして　パット見てすぐ分かるようにしたいのですが可能でしょうか？　あと更に別シートで　その機械の写真を個別に載せているのですが　それもリンク貼りって出来ますか？　例えば機械名のセルをクリックすると　その写真が見れる みたいな・・・　　御教授宜しくお願いします。（この内容で伝わってますかね？）

エクセルに不慣れなため質問がわかりづらかったら申し訳ありません。 if関数を利用して計算結果を表示しているセル（D1）があります。 C1の入力内容によって、D1に〇または×を表示する予定です。 D1が×だったらエラーメッセージを表示したいのですが、 計算結果に対してデータの入力規則を設定することがうまくいきませんでした。 どなたかお分かりの方がいらっしゃったらお答えいただければ助かります。 よろしくお願いいたします。

セルC5から、下にファイル名が入っています。上から順に印刷したいのですが、下記だとvbaが動かないです。 Dim z As Object Dim i As Long Dim f, p As String Set z=CreateObject("WScript.Shell") p=Application.ActivePrinter For i=5 To Range("C1").End(xlDown).Row f="C:¥フォルダパス" & Cells(i,1).Value & ".pdf" ここから、行ごとに進んだ時に、黄色くならず反応しませんでした↓ If Dir (f)<>""Then z.Run("Acrobat.exe /t" & f) ↓ここにとびました。 Else End if Next i Set z=Nothing End Sub それ以前に、adobe acrobatが、更新されてから動いていたバッチファイルですら反応しなくなりました Adobeの環境設定をネットで見た通り見直ししたりしたのですが、全く成功しません。フォルダ内のpdfファイルを、全て印刷するvba（Acrobat.exe)を記載しない方法は成功したのですが、どうすれば、上手くいきますか？ 教えていただきたいです。印刷の順番を指定したいです。 初心者なのでお手柔らかにお願いします。ちなみに動いているほうのvbaは下記です。 フォルダ内のファイルを全て印刷する、（順番関係なし）です。 Dim FolderPath As String Dim Filename As String Dim objShell As Object Dim objFolder As Object Dim objFile As Object FolderPath=ThisWorkbook.Path Set objShell=CreateObject("Shell.Application") Set objFolder=objShell.Namespace(ThisWorkbook.Path) For Each objFile In objFolder.items If Right(objFile.Name,4)=".pdf"Then objFolder.ParseName(objFile.Name) .InvokeVerbEx("print") End If Next objFile Set objFile=Nothing Set objFolder=Nothing Set objShell=Nothing End Sub 上記は全てネットから引用しています。 adobe acrobatを使うと反応しないので下記、上記に付け足ししたりして自身で初めて考えました。 Sub Test() Dim FolderPath As String Dim Filename As String Dim objShell As Object Dim objFolder As Object Dim objFile As Object FolderPath=ThisWorkbook.Path Set objShell=CreateObject("Shell.Application") Set objFolder=objShell.Namespace(ThisWorkbook.Path) For i=5 To Range("C1")End(xlDown).Row ObjFile.Name=FolderPath&Cells(i,1).value&".pdf" If Dir objFile.Name<>""Then objFolder.ParseName(objFile.Name).InvokeverbEx("print") Else End if Next i Set objFile=Nothing Set objFolder=Nothing Set objShell=Nothing MsgBox"印刷が完了しました" End Sub どこか文書変でしょうか？？ 添削してくださいませんか。 順番に印刷、、できるとすごく仕事がはかどるため、成功させたいです。 お力添え、何卒お願いいたします。

コマンドボタンを押すと、2行目の値（B2,C2）を元に、シート名「A」の中の②という値を消すという様なVBAコードを教えてもらいたいです。 なかなかうまく動かなくて困っております。

A2に入力があった場合D2に◯を自動入力 B2に入力があった場合D2に×を自動入力したいです。 数式がわからないので教えてください🙇 よろしくお願い致します！

EXCELのドロップダウンリストの表示幅(縦)を変更する方法が あれば教えてください。 リストの内容を可能な限りスクロールしないで表示させたいためです。

エクセルに202401、202402･･･202404、注意事項、2022、2023、2024という感じでシートが並んでいます｡「注意事項」シートの左側のシートをコピーして（この場合202404シート）「注意事項」シートの前に挿入したいのですがどのようにマクロを組めばいいのかわかりません。 できれば、新しいシート名が202405という感じになればありがたいですが複雑になりすぎるようなら202404(2)となってもかまいません。 ネットで検索しても並んだシートの途中のシートの左側をコピーしてそのコピー元の右に挿入するという方法がみつけられませんでした。 よろしくお願いします。

日々の業務記録や指示表を作る際 画像のような表を作成・使用しています。 各項目が少なければ作成自体は簡単なのですが 随時、縦（商品）にも横（個人）にも項目が増減するため 「+(●*▽)」という式を入力・削除していくのがとても面倒です。 この表では「各個人の合計重量」が一番必要な項目になるのですが ここをもっと簡単にできたりしますでしょうか？

エクセルに不慣れなため、お分かりになられるかたがいらっしゃいましたらおねがいいたします。 セルC3とH1を確認し、いずれかが空欄であれば、E8は空欄としたいと考えています。 セルH1にはvlookupで値を表示しています ※H1の検索値はＬ３～Ｍ６に表示 H1は表示では空欄となっていますが、E8欄は空欄でないと判断され 数値が表示されてしまいます。 H1を空欄と判断させるにはどのようにしたらよいでしょうか。 わかりづらい説明で申し訳ありませんが、お分かりになられるかたがいらっしゃいましたらよろしくお願いいたします。

午後５時以降と以前で時給が違う為、計算が必要です。 E列出勤時間、　F列退勤時間　G列労働時間が書いてあり、 H列には５時までの労働時間　 I列には５時以降の労働時間 の記入が必要です。 １０分は誤差を見るため、 I列には=IF(E>=TIME(16,50,0),G,"") H列には=IF(AND(E<=TIME(17,10,0),F<=TIME(17,10,0)),G,"") と記入していたのですが、Fの退勤時間が午前１２時を回った場合、うまく計算出来ません。いい方法があれば教えて頂ければ嬉しいです。

Win11&Excel2019で基準日を超過した日数計算（土日祝日除く）をしたいです。 休祭日を除いた超過の日数計算ですが、NETWORKDAYSで基準日を過ぎた日数取得まで分かりましたが、 これに条件を盛り込むと数式エラー・値エラーでうまくいきません。 判定を組み込むのが分かりません。どなたかわかる方教えてください。 やりたいこと。 ➀土日祝日を除いた日数 ②開始遅延（A列）、終了遅延（B列）となった場合、それぞれ基準日と比べて日数をマイナス値で出力（C列・D列）

OS:Windows11 Office: 2021 Excelで勤務管理表を作ろうと思います 勤務の締め日が、毎月"15"日と、毎月"月末"、があるとします このときN5セルをリストで切り替えます 切り替えて表示されるのは 15 "月末" B9列以降に、日付を変えて入れたいのですが、G3の月（表示は5ですが、2024/05/01など日付を入れている）を認識させ、23行目と24行目あたりの、月またぎを繋いだ、日付をB9よりタテ方向下向きに入れたいと思います。 この図の場合、5月の給料の締めが2種類（15日、月末）があるため、N5セルが15の場合は、B9が16（4/16）から始まり、B23-24は、月末が30日で終わるので、B24は1から始まります 30 1 2 6月の15日締めの場合は、5月末は31なので 30 31 1 2 のようになります。 N5が"月末"の場合は、その月のすべての日付の数字を入れます (5月なら1～31） このようにしたい場合は、B9セル以下に、どのような計算式をB9以下に入れたらよいでしょうか？ 【回答上のご注意】 回答は、解答（答え）を求めています 昭和的な「あとは自分で考えろ」的なものは求めていません わからなければ答えない自由があなたにはあります 不明点があれば説明いたします

ネットから入手したファイル名がVBAで読めずエラーが出ることがあります。 読めない文字列は、OS(Windows)のファイル名としては認識はされていて開くことは出来ます。 ファイルEditorで表示される認識されない文字列の例　： https://www.youtube.com/watch?v=LDE7x1SPYmE&list=PLs2VObp8WiuYOLmN8TMGILWptsJaeiSaU&index=17 テキストEditorでコピペすると J̲e̲thro T̲ull - H̲e̲avy H̲o̲rses そもそもJ_はどんな文字なのでしょうか　？ 最終的には、普通に読めるような型式にコンバートしたい。

Excelで基準日を超過した日数計算（土日祝日除く）をしたいです。 NETWORKDAYSで超過の日数はできたのですが、基準日を過ぎた場合の判定を組み込むのが分かりません。どなたかわかる方教えてください。 開始遅延、終了遅延となった場合、基準日と比べて日数を算出したいです。 EXCEL2019、WIN11

このカテゴリーのエクセルの達人の方々に質問です。 どなたか回答して頂ける方がおみえでしたらよろしくお願いします。 （ちゃんとした回答ではなく、文句やクレーム等を混ぜた記載はご遠慮ください。 　また、私の質問が気に入らない場合は無視して頂ければ結構です。） 【質問】 添付図のとおり、Ａ列～Ｙ列の５行のセルがあります。 セルの中には数字がランダムに入っています。 Ａ列から縦５つの数字を見たとき、 数字が重複しているならそのセルを塗り潰して、 Ｙ列までそれを繰り返す。 最初に見つけた重複数字は「黄色」、 ２つめに見つけた重複数字は「青色」に分けて塗潰す方法が知りたいです。 【注意事項】 　　・A列からＹ列に入る数字は毎回異なります。 　　・重複数字が無い列も存在します。 　　・ＶＢＡで実現する方法～、と書きましたが、 　　　同様のことが他の方法でも実現できればそれを教えて下さい。 　　・使用するエクセルは２０２１です。 以上、よろしくお願いします。

以下のVBAコードで「パラメーターが間違っています。」とエラーが出る原因は何でしょうか？ Dim Img As Object Set Img = CreateObject("WIA.ImageFile") Img.LoadFile file.Path　　　<－－－－－　ここでエラー ローカルウインドウでは、file.Pathは問題なくstringの値が表示されています。 このマクロは、エラーが出ない場合もあり、 今回、たまたまエラーが出て処理が出来ずに悩んでいます。 なお、「Microsoft Windows Image Acquisition Library 2.0」を参照設定済みです 情報不足であれば追加で上げますので回答をお願いします。

SharePointでエクセルを使用して作業しています。 共同作業以外で別データを作成したく、SharePointのシートをコピーして、デスクトップのエクセルに貼り付けて使用したのですが、この方法は正しいでしょうか？他に方法があれば教えていただきたいです。 また、SharePointのエクセルの［シート1］を編集するとデスクトップのエクセルの［シート1］に反映されるような方法があれば教えていただきたいです。 よろしくお願いいたします。

エクセルで121.1%や85.1%などを 入力したいのてすが、Enterを押すと 121.10%、85.10%となってしまいます。 対策方を教えてください。