Excel（エクセル）(4ページ目)

使いこなせるととても便利なExcelですが、使い方がわからなくて困ってしまう場面も多いと思います。マクロの組み方がわからない、VLOOKUP関数の設定について教えてほしい、データを元にグラフの作成をしたい等、ここで相談してみましょう。

回答数

気になる

エクセル内に読み込んが画像の比率が開くたびに歪んでしまう問題について…。

調べてみますと色々と同じような問題への対策があったのですが、試してみたのですが効果がでなかったので改めて質問をさせてください。作ったエクセル表の中に、画像で作った丸に囲まれたロゴマークのような画像と、画像のタイトル的なものを配置しているのですが、位置を調整して保存をして、改めて開くと、画像の縦横比率が歪んで楕円形になったり、文字画像が縦につぶれたり、また位置も微妙にこのなった配置になったります。何度も修正を行うのですが、保存後、再度開きなおすたびに同じような現象となり大変困っております。これはいったい何が原因なのでしょうか？決まった位置、サイズで永続的に保存する方法がありましたらアドバイスと頂けないでしょうか？調べてみると、画像の形式や読み込み方法云々と、いくつか解決方法のようなものが確認できましたので試してみたのですが、どれも効果がありませんでした…。毎回それらの資料が増えていくので修正がつらいです…。お詳しい方いらっしゃいましたら、どうぞよろしくお願いいたします。

質問日時: 2025/02/18 10:47 質問者: momonga_Q

解決済

1

0
Excelのメニューについて

Excelのメニュー項目について教えていただきたいのですが、例えば、選択した状態で、右クリックするとセルの書式設定（F) のように、項目の後ろに括弧付きで文字が表示されます。最初はショートカットかなと思ったのですが、セルを選択した状態で、CTRL+F をすると検索になります。メニュウ項目の括弧付き文字は何を表しているのでしょうか？詳しい方、よろしくお願いいたします。

質問日時: 2025/02/17 15:21 質問者: ceres_vega

解決済

3

0
VLOOKUP FALSEのこと

FALSEって、「間違った」とかの意味がありますよね。なのに、なぜ「完全一致」の時に使うのでしょうか？

質問日時: 2025/02/17 12:58 質問者: taka_2015_2016

解決済

6

1
Excelの数式について教えてください。

セルU1に「2025省エネ・構造資料」セルV1に「=TODAY()」として書式設定で●月●日としてますので 2月17日と表示されております。セルＷ１に数式「=$U$1&$V$1」を設定しましたが表示は「2025省エネ・構造資料45705」なってしまいます。この表示を「「2025省エネ・構造資料（2月17日）」子mえ()有です。に修正する方法を教えてください。よろしくお願いいたします。

質問日時: 2025/02/17 11:50 質問者: エクセル小僧

ベストアンサー

2

0
Excel 偶数月の１５日（土日祝日には前日に更新）には自動でカウントアップする数式ができません。

別紙、添付のExcel数式ですが、偶数月の１５日が来るとD5のセルが自動で（２か月ごと、土日祝日の時は前日に更新）１．２．３とカウントアップするはずなのですが、今年からうまくゆきません、どこが間違っていますか、どなたか教えていただけないでしょうか？お願いいたします。B2には　MIN(TODAY(),DATE(2025,12,31)) 　B8～２７には今年の祝日一覧が入っています。

質問日時: 2025/02/16 23:35 質問者: RichardAnthi

ベストアンサー

2

0
勤務外時間を出す表が作りたい

EXCELで勤務外時間を出す表を作りたいと思います。出勤時間が10時で終業時間が12時、14時、15時の場合があります。昼休憩が12時から13時です。勤務時間は30分（0.5時間）単位でカウントされます。たとえば、15時勤務の日に、9:45に出勤して途中退出が10:40で復帰が12:30の場合、勤務外時間は、10時台が0.5、11時台が1、昼休憩に復帰しているので1 で、2.5時間となります。 15時勤務の日に、10:05に出勤して途中退出が10:25で復帰が13:05の場合、勤務外時間は、10時台が1、11時台が1、12時台が1、13時台が0.5で、3.5時間となります。こんな表ができないでしょうか。Copilotでは思ったような結果が得られませんでした。

質問日時: 2025/02/16 17:53 質問者: cowono216g

ベストアンサー

2

1
【マクロ】参照渡しとモジュールレベル変数どっちがよく使うものですか？

以下コードは、参照渡しorモジュールレベル変数にて記述したコードですどちらも、同じように動きます ●●●では、どちらが、一般的には使われるのでしょうか？●●● 時分は、モジュールレベル変数の方が　分かりやすいと思いました【参照渡しコード】 Sub 別ブックへ転記() Dim filpath1 As String Dim wb1 As Workbook Dim ws1 As Worksheet filepath1 = ThisWorkbook.Worksheets("Sheet1").Cells(141, 1) Set wb1 = Workbooks.Open(filepath1) Set ws1 = wb1.Worksheets("Sheet1") Call あいうえお(wb1, ws1) End Sub Sub あいうえお(ByRef a As Workbook, b As Worksheet) b.Cells(1, 1) = "あいうえお" End Sub 【モジュールレベル変数　コード】 Dim filpath1 As String Dim wb1 As Workbook Dim ws1 As Worksheet Sub 別ブックへ転記() filepath1 = ThisWorkbook.Worksheets("Sheet1").Cells(141, 1) Set wb1 = Workbooks.Open(filepath1) Set ws1 = wb1.Worksheets("Sheet1") Dim buf As String Call あいうえお End Sub Sub あいうえお() ws1.Cells(1, 1) = "あいうえお" End Sub

質問日時: 2025/02/16 15:37 質問者: aoyama-reiko

ベストアンサー

2

1
Excelで作成した出欠表から日付ごとの欠席者を書き出す方法について教えてください。

図の表１のような出欠表があります（／が欠席です）。この表から表4のように日付ごとの欠席者を書き出したいと思います。現在、以下のような手順を考えています。まず表1のデータから表2を作成する。 B11に　=IF(B3="／",$A3,"") 次にTRASPOSE関数で表2から表3を作成 A18に　=TRANCEPOSE(B10:E15) 最後に表3のデータを表4にまとめる。 B24に　=TEXTJOIN("、",TRUE,$B18:$F18) これでできなくはないのですがもっとシンプルなやり方がありそうに思います。お知恵をお借りしたく質問しました。よろしくお願いします。

質問日時: 2025/02/16 13:14 質問者: 201i

ベストアンサー

2

1
エクセルの数式について教えてください。

現在使用している数式が「=IF(AND(A5="増築",C24="=",B22="1階以下",B23="1階に増築",C25="="),"階数:1階以下且つ面積:200㎡以下","")」となっております。コード中の C24="="の部分を、「"="」又は「"＞"」 C25="="の部分を、「"="」又は「"＜"」とできる方法を教えてください。エクセルのversionはoffice365です。よろしくお願いいたします。

質問日時: 2025/02/16 09:33 質問者: エクセル小僧

ベストアンサー

5

0
【マクロ】参照渡しについて。受け取る変数の名前を変更すると、動かなくなる

以下コードは動くのですが、受けとりで動きます【受取】 Sub あいうえお(wb1 As Workbook, ws1 As Worksheet) 【実行】 ws1.Cells(1, 1) = "あいうえお" しかし受取の変数をa、bに変えると、動かなくなります参照渡しについて、ネットで調べると、ほとんどの事例が受取時には変数の名前を変えていますゆえに、受取時の変数の名前を変更しても動くとは思いますなぜ、受取時の変数の名前を変えて動かなくなるのでしょうか？【参考、リンク】 http://officetanaka.net/excel/vba/tips/tips94.htm 【受取】 Sub あいうえお(a As Workbook, b As Worksheet) 【変数】 Workbook（マクロブック以外の別のブックが変数として格納） Worksheet)（別シートが格納）【コード】 Sub 別ブックへ転記() Dim filepath1 As String Dim wb1 As Workbook Dim ws1 As Worksheet filepath1 = ThisWorkbook.Worksheets("Sheet1").Cells(141, 1) Set wb1 = Workbooks.Open(filepath1) Set ws1 = wb1.Worksheets("Sheet1") Dim buf As String Call あいうえお(wb1, ws1) End Sub Sub あいうえお(wb1 As Workbook, ws1 As Worksheet) ws1.Cells(1, 1) = "あいうえお" End Sub

質問日時: 2025/02/16 09:29 質問者: aoyama-reiko

ベストアンサー

2

0
日付がバラバラ

エクセルで金銭出納帳を書いています日付、分類、内容・・と続くのですが、日付について 2025/2/14 R7.2.14 2月14日　と3種類表示されます設定などで統一できますか？よろしくお願いします。

質問日時: 2025/02/14 09:01 質問者: だんちゃん16

解決済

4

0
Excelの条件付書式について教えてください。

指定セルH22に不特定の日付が表示された場合に、条件付書式を設定できる方法を教えてください。例えば =$H22="2月12日" 又は =$H22="2月15日" とか色々な日付です。よろしくお願いいたします。

質問日時: 2025/02/12 14:42 質問者: エクセル小僧

ベストアンサー

4

0
マクロを実行すると、セル範囲に @ がついてしまう

以下流れのとおり 1番マクロを実行 2番セル範囲に@がついてしまう 3番@が入らないように、関数を入力したいですご存じの方、ご指南お願いします 1 【コード※エラーにならずに、該当範囲のセルに関数が入力されます】 ws2.Range(Cells(6, 13), Cells(lastrow, 13)).Formula = "=INDEX(過去分依頼データ!$A$2:$K$10000,MATCH(C6&E6,過去分依頼データ!$B$2:$B$10000&過去分依頼データ!$C$2:$C$10000,0),1)" 2 セルM6から最終行まで以下が入力される =INDEX(過去分依頼データ!$A$2:$K$10000,MATCH(C6&E6,@過去分依頼データ!$B$2:$B$10000&@過去分依頼データ!$C$2:$C$10000,0),1) ※セル範囲に@がついてしまう @過去分依頼データ!$B$2:$B$10000&@過去分依頼データ!$C$2:$C$10000 3 正しくは@が無い状態で、セルに入力したい。すると関数は動きます =INDEX(過去分依頼データ!$A$2:$K$10000,MATCH(C6&E6,過去分依頼データ!$B$2:$B$10000&過去分依頼データ!$C$2:$C$10000,0),1)

質問日時: 2025/02/11 15:28 質問者: aoyama-reiko

ベストアンサー

2

0
Excelでの文字入力について

Excelで例えば「・会議資料１」とでも入力したとします。次に・をうつと選択された状態で会議資料１が自動で出てくることがあるんですが、この時自動で候補として出てきたものを消したいのですがどうすればいいですか？エンターを押せば入力されるし、バックスペースだと・まで消えてしまうので困ってます。伝わらないかもしれないので画像載せました

質問日時: 2025/02/10 07:07 質問者: さくぅ

解決済

5

0
Excelのデーターバーについて

A1に最大値、B1に変数の時、A1にデーターバーを表示させることはできますか？

質問日時: 2025/02/09 23:46 質問者: zeronine

ベストアンサー

2

0
【マクロ】Call関数で呼び出した場合、共通の変数宣言は、省略できますか？

標題の件、３つのサブシーじゃにて同じ宣言等を３回、記述しています。当該記述を省略はできないでしょうか？宣言等は同じ内容の宣言です。指定しているファイル等すべて同じです構造は Sub オートフィルター()で　２つのサブシーじゃをCallにて呼び出しています。当該、２つのあサブシーじゃにて毎回同じ宣言をしていますアドバイスや省略できる出来ないも含めてご存じの方、教えて下さい Sub オートフィルター() ●●●同じ宣言等●●● Call シートを別のブックにコピーする Call 降順 End Sub sub シートを別のブックにコピーする() ●●●同じ宣言等●●● End Sub sub 降順() ●●●同じ宣言等●●● End Sub 【全部で３回、同じ記述】 Dim filepath2 As String Dim wb2 As Workbook Dim ws2 As Worksheet Dim a As Date Dim z As Date filepath2 = ThisWorkbook.Worksheets("転記元シート").Cells(14, 1) Set ws22 = wb2.Worksheets("過去分依頼データ") 【コード】 Sub オートフィルター() Dim filepath2 As String Dim wb2 As Workbook Dim ws2 As Worksheet Dim a As Date Dim z As Date filepath2 = ThisWorkbook.Worksheets("転記元シート").Cells(141, 1) Set wb2 = Workbooks.Open(filepath2) Set ws2 = wb2.Worksheets("Sheet1") Call シートを別のブックにコピーする Set ws22 = wb2.Worksheets("過去分依頼データ") Call 降順 ●●●本文省略●●● End Sub Sub シートを別のブックにコピーする() Dim filepath2 As String Dim wb2 As Workbook Dim ws2 As Worksheet filepath2 = ThisWorkbook.Worksheets("転記元シート").Cells(14, 1) Set wb2 = Workbooks.Open(filepath2) ●●●本文省略●●● End Sub Sub 降順() Dim filepath2 As String Dim wb2 As Workbook Dim ws2 As Worksheet filepath2 = ThisWorkbook.Worksheets("転記元シート").Cells(14, 1) Set wb2 = Workbooks.Open(filepath2) Set ws22 = wb2.Worksheets("依頼データ") ●●●本文省略●●● End Sub

質問日時: 2025/02/09 10:17 質問者: aoyama-reiko

ベストアンサー

2

0
【マクロ】シート追加時に同じ名前のシートがあり、エラーの場合、メッセージを出し、次のコードへ進むには

標題の件、シート追加時に、既に同じ名前のシートがあるとエラーが表示されます【やりたい事は】条件分岐 1 既に、同じ名前のシートが無い場合⇒通常処理 2 既に、同じ名前のシートがある場合 ⇒メッセージ「既に同じシートがあります」を表示の上エラーを無視し、次のコードへ進みたいご存じの方、やり方、アドバイスをお願いします【コード内容】コントロールブックにある、Sheet1をコピーしてあいうえおブックに、貼付。Sheet1の名前を　依頼データに　変更する【エラー表示】 1004 この名前は既に使用されています。他の名前を使用して下さい。【コード】 Sub シートを別のブックにコピーする() Dim filepath2 As String Dim wb2 As Workbook Dim ws2 As Worksheet filepath2 = ThisWorkbook.Worksheets("転記元シート").Cells(7, 1) 'あいうえおブック Set wb2 = Workbooks.Open(filepath2) Dim copysheet As Worksheet Set copysheet = ThisWorkbook.Worksheets("Sheet1") ' ブックの末尾にコピー copysheet.Copy After:=wb2.Worksheets(wb2.Worksheets.Count) ActiveSheet.Name = "依頼データ" End Sub

質問日時: 2025/02/08 09:00 質問者: aoyama-reiko

ベストアンサー

3

0
別のシートの指定列の最終行を返す関数の式を教えて下さい。

おはようございます。 Excelの関数についての質問です。 sheet２にある表のF列の最終行（数字、空白無し）をsheet１の任意のセルに表示したい場合はどう関数を使ったらよいでしょうか？関数の式の例を頂けると助かります。宜しくお願い致します。

質問日時: 2025/02/06 10:32 質問者: アタック55

解決済

4

0
システムファイルについて

Win 11 Office365 Excel です以前（Win 10 office 2010時代）に作成した　Excel ファイルを、不要になったので削除しようとしたら、「このファイルはシステムファイルなので、削除すると、Windows が正常に作動しなくなることがある　削除するか？」と注意がでました作成するときに、システムファイル云々は何も指定は無かったです尚、保存先は、USBメモリですシステムファイルとは、何者ですか？この　Excel ファイルは削除しても大丈夫ですか？

質問日時: 2025/02/06 10:27 質問者: つよしちゃん

解決済

3

0
スプレッドシートでの数値集計

スプレッドシートで下記作業を行いたく自身で調べながらやってみたのですがうまくいかず… 恐れいりますがどのような関数を入れると良さそうかアドバイスいただきたいです。・ファイル1に下記情報が記載されています。 A列:提案日(2025/1/1 のような形) B列:名前(田中、佐藤など) C列:ステータス(電話、商談、受注など) D列:提案金額・別ファイル2(同スプレッドシートではなく、別ファイルです)に下記情報を集計したい ★共通:2025/1/1〜1/31の間に、田中さんの ①受注した件数 ②電話または商談または受注した件数 ③受注した金額合計 ④提案または受注した金額の合計インポートレンジ関数を使ってみたりしたのですが上手くいかず… 今どきスプレッドシートで営業の数字管理してる会社なんて…というお声はご遠慮いただけますと。。よろしくお願いします！！

質問日時: 2025/02/04 22:25 質問者: hjnknsg

解決済

1

0
Excel関数の解決方法

先日、教えてグーで下記の質問をいたしました。【質問】 ExcelでSheet1とSheet2が有ります。 Sheet1のF列とSheet2のN列に管理番号項目が有ります。(双方のSheetの管理番号はバラバラに並んでいます) Sheet1のAG列〜AS列にF列の管理番号と一致するSheet2の管理番号の行(A列からM列まで)をもってきたい場合、どの様な関数を使えばいいですか？ ↓　　↓　　↓ この質問に対して下記のご回答を頂きました。【ご回答】 Sheet1のAG1セルに以下の式を入力。　=IFERROR(INDEX(Sheet2!A:A,MATCH($F1,Sheet2!$N:$N,0)),"") その上で、右方、下方にフィルコピーでいかがでしょうか？スピル機能を使える環境（＝Office365等）であればもっと簡単にできるでしょう。 ↓　↓　↓ 教えていただいた式を会社のパソコン(Excel2016です。スピル機能は無さそうです…)で試してみたところ、関数のエラーにはならなかったのですが、空白のままでうまく参照できませんでした。原因は何が考えられますか？ちなみに一行目は各項目が入力されていて、データとしては二行目からです。また管理番号には何箇所か空白のセルが有ります。またSheet1には他部署分も含まれている為、6千行程データが有り、Sheet2は自分部署のデータで千行程です。解決策をご教示頂けたら幸いです。

質問日時: 2025/02/04 14:15 質問者: 抹茶やん

ベストアンサー

1

0
自動的に日付入力応用

自動的に日付を入力出来ないかと検索すると下記のようなコードを見つけました Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 6 Then Exit Sub Application.EnableEvents = False Target.Offset(, 2).Value = Now Application.EnableEvents = True End Sub ※F列に入力されるとその行のH列に今日の日付が表示されますこのコードですと、F列に入力されたものをDeleteしても、H列の日付はそのまま残ってしまいます Deleteとすると日付も消える方法(コード)は可能でしょうか? エクセルXBA初心者なので、お教えくだされば幸いです

質問日時: 2025/02/03 17:07 質問者: ガンバルじいさん

ベストアンサー

1

0
Excelの関数を教えて下さい。

ExcelでSheet1とSheet2が有ります。 Sheet1のF列とSheet2のN列に管理番号項目が有ります。(双方のSheetの管理番号はバラバラに並んでいます) Sheet1のAG列〜AS列にF列の管理番号と一致するSheet2の管理番号の行(A列からM列まで)をもってきたい場合、どの様な関数を使えばいいですか？

質問日時: 2025/02/02 16:20 質問者: 抹茶やん

ベストアンサー

4

0
エクセルの設定、下へスクロールすると表のヘッダ項目がシートの列番号の部分に表示される

職場に存在するエクセルシートを再現するためにどのような設定をすればよいか教えてください。うまく説明できないため添付画像で書きますが、画像左側のような普通の表があります。 1行下へスクロールすると1行目は見えなくなり、2行下へスクロールすると2行目も見えなくなります。同様に3行下へスクロールすると3行目も見えなくなりますが、一部、表のヘッダ部分が、エクセルワークシートの列番号の表示部分（画像右側で列番号B、C、D、Eの部分）に表示され、以降、更に下へスクロールしても表のヘッダ部分が同じ部分にずっと表示されています。表示メニューのウィンドウ枠の固定や先頭行の固定でも類似のものは作れますが、これとは異なる機能だと思います。詳しい方おられたらご教示ください。蛇足ですが職場のエクセルシートは作成者不明だったり質問のできない他社作成のものだったりするためこちらで聞いています。また、職場は情報セキュリティが厳しく、PCは外部から遮断（インターネット不可）データ持ち出しも不可です。添付画像は自宅で合成して作った画像です。

質問日時: 2025/02/02 00:38 質問者: aki-kun

ベストアンサー

2

3
エクセルの設定、特定の列以降が無いワークシートを作れますか

職場にあるエクセルワークシートなのですが、列が特定の列までしかありません。どのような設定／操作で作成されたシートなのか知りたいです。ちなみに列を非表示にしたものではありません。参考として添付した画像はその実物ではなく、E列以降を非表示にしただけのものですが、これとは違います。なので職場にあるワークシートは見えない行を「再表示」することはできません。マクロも入っていないBOOKです。しかし見た感じは添付画像に似た感じです。これに似たようなシートを「非表示」以外の方法で作ったものだと思うのですが、ご存じの方がおられましたらご教示ください。

質問日時: 2025/02/01 22:12 質問者: aki-kun

ベストアンサー

6

1
Vba アドインソフトのバージョン管理について教えてください

いつもお世話になります何本かのソフトをアドインにして全社的に配布しています改良が進むごとにバージョン番号を上げて、お知らせしたりExcel表を作り分かり易いところに保存していますが、みな忙しくトラブルない限りバージョンアップしてくれませんそこで、各自のPCにインストールされているアドインソフトの状況とバージョンの確認ができるソフトを開発しました各アドインソフトには　Private Const Addin_cnsVersion As String = "2.32" 　　・　Private Sub Addin_VersionCheck() 　　Cells(1, 1) = Addin_cnsVersion 　End Sub を作成して、AppliCation.Run からこのプロシージャを参照してインストールされているソフトのバージョンとExcel表に記載した最新のバージョンを比べて警告を出すように考えましたがインストールされているすべてのソフトに対して上記の Application.Run を実行するとこの確認ソフトが終わるまでアドインソフトがメモリに残っているように見えますそこでもし個々のソフトのApplication.Runが終わり次第、メモリからリリースすることが出来るのでしょうか？分かりずらい文章になってしまいましたが、もしご理解していただき解決方法が有りましたら教えてくださいまた、ほかにバージョンチェックの良い方法が有りましたらそちらでも結構です以上、よろしくお願い申し上げます

質問日時: 2025/02/01 16:28 質問者: 公共ごま

ベストアンサー

1

1
Excelでプルダウン選択(I1セル)した文字列に該当したC列のセル行のみを切り替えて表示したいです

Excelでプルダウン選択(I1セル)した文字列に該当したC列のセル行のみを切り替えて表示したいです。データ→フィルタでできることは存じてますが、リスト切りかえのみで実施できないかと思い質問させていただいてます。またVBAなどは使用せず関数のみで実現したいです。

質問日時: 2025/01/29 01:07 質問者: HS83als

ベストアンサー

2

0
エクセルの数式について教えてください。

下記の条件を満たす、数式を教えてくださいエクセルのversionはoffice365です。セルAA77に日付が表示されます。同じくセルAC77にも日付が表示されます。例えば AA77（1月28日） AC77（2月15日）と表示されたとします。この場合に数式を設定したセルに「着工日が先」と表示できる方法を教えてください AA77とAC77は同じ日付になることはありません。仮の式 AA77（1月28日）<AC77（2月15日）＝「着工日が先」のような感じです。宜しくお願い致します。

質問日時: 2025/01/28 20:09 質問者: エクセル小僧

ベストアンサー

3

0
ユーザーマクロ作成

excel2003で長い事、ある現象の分析をしています。新しい現象が発生するたびにブックを追加するので、現在、結構な数になっています。 1本ずつ中身は違いますが、入口、出口はほぼ同じで、毎回コピーして使っています。ここで、何を今更の質問ですが、この度、共通する部分だけでもマクロ化して、アドインとして使おうかと。ということで、必要な動きを教えて欲しいのです。なお、本件は私限りで、他に使わせるなどはありません。私のPC(win10,win11)で動かすだけです。ネットワークにも繋いでいません、まさにスタンドアロンです。マクロのイメージとしては、何本かのブックを立ち上げたり、クローズするものです。宜しくお願いします。

質問日時: 2025/01/28 14:00 質問者: nagahaha

ベストアンサー

2

0
UNIQUE関数の代用

Excel2016にも対応するように重複しないようにデータを抽出したいです。画像のような表で、UNIQUE関数を使わずに担当者名を抜き出す方法があれば、教えていただきたいです。 INDEX関数を用いた方法では、縦一列、ないしは横一列であれば成功できたのですが、こういった表では難しいのでしょうか。

質問日時: 2025/01/28 10:30 質問者: しょー0822

解決済

5

0
【マクロ】Withステートメント２つを簡略する為には？

以下コードは、以下の内容のマクロを、２つ同じ種類の物を連続して書いただけです当該マクロを、もう少し簡略して書くことはできますか？アドバイス等でも良いので、教えて下さい【マクロ内容】・画像を作成・画像にマクロを登録する【コード】 Sub sample() With ActiveSheet.Shapes.AddShape(msoShapeRectangle, 60, 60, 60, 60) .Fill.ForeColor.RGB = RGB(220, 220, 220) .Line.ForeColor.RGB = RGB(220, 220, 220) .Name = "あいうえお" With .TextFrame.Characters .Text = "不要行削除" .Font.Size = 16 End With .Top = Range("d1").Top .Left = Range("d1").Left End With ActiveSheet.Shapes("あいうえお").OnAction = "copy" With ActiveSheet.Shapes.AddShape(msoShapeRectangle, 60, 60, 60, 60) .Fill.ForeColor.RGB = RGB(220, 220, 220) .Line.ForeColor.RGB = RGB(220, 220, 220) .Name = "かきこ" With .TextFrame.Characters .Text = "重複" .Font.Size = 16 End With .Top = Range("h1").Top .Left = Range("h1").Left End With ActiveSheet.Shapes("かきこ").OnAction = "かきくけこ" End Sub

質問日時: 2025/01/28 07:50 質問者: aoyama-reiko

ベストアンサー

3

0
【マクロ】マクロ【２つ】をインポートする為のマクロを集約化する為には？

以下のコードは、モジュール名が　aiueo　Module4　という２つのマクロを、ブックにインポートするマクロ　です単純に同じコードを２つ書いているだけです当該マクロを、もう少し簡略化する事はできますか？ご存じの方、教えて下さい【コード】 Sub moduleImport_Single() 'インポート対象のモジュールファイルを指定 Dim s As String s = "C:\Users\2020\OneDrive\マクロ\マクロファイル\aiueo.bas" '指定のモジュールをインポート ThisWorkbook.VBProject.VBComponents.Import s 'インポート対象のモジュールファイルを指定 Dim m As String m = "C:\Users\2020\OneDrive\マクロ\マクロファイル\Module4.bas" '指定のモジュールをインポート ThisWorkbook.VBProject.VBComponents.Import m End Sub

質問日時: 2025/01/28 07:44 質問者: aoyama-reiko

解決済

2

0
Vbaをバッチ処理で動かす方法について教えてください

いつもお世話になります標記の件、Webで調べたところ、下記のような喜寿が有りました Vbeで　　Sub HelloWorld() 　　MsgBox "HelloWorld" 　　End Sub を作成し、BATファイルに　　@echo off 　　start excel.exe /r "C:\Path\To\Your\Workbook.xlsm" と書いて実行すると有りましたそれ以上はないので、C:\Tempフォルダに上記プログラムを記述してWorkbokk.xlsmを作り　　@echo off 　　start excel.exe /r "C:\temp\Workbook.xlsm" を実行して所、メッセージが出ないので ThisWorkbook に下記の記述を実行させました　　Private Sub Workbook_Open() 　　Call HelloWorld 　　End Sub 本番のプログラムもこれで実行できそうですが、ThisWorkbook は使いたくないので Application.Runのように実行するサブプログラムを指定する方法は無いのでしょうか？　　 "C:\temp\Workbook.xlsm!HelloWorld" のような感じでもし分かりましたら教えてくださいまた、バッチ処理でアドインソフトの動かし方が有りましたら教えてください以上、宜しくお願い申し上げます

質問日時: 2025/01/27 18:51 質問者: 公共ごま

ベストアンサー

2

1
SUBTOTAL関数のように同関数の小計を対象外にしつつ，フィルターの非表示を対象にする関数は？

office365を使用している者です。 SUBTOTAL関数の合計（9，109）では「指定した範囲の中にある同関数を使った小計」と「フィルターの非表示」を除いて集計します。同関数を使った小計は除きつつ，フィルターの非表示は集計の対象にしてくれる関数はありますか？

質問日時: 2025/01/27 18:35 質問者: qazxcvfr4

ベストアンサー

3

0
エクセルの数式について教えてください。

エクセルのversionはoffice365です。セルJ25に下記の数式を設定してます。 =WORKDAY(J23,11,休日!B1:M135) セルJ23に日付が表示されると数式によって日付が変更になります。セルJ23に何も日付が表示されていないときに J25に「1月16日」と表示されてしまします。セルJ23に何も日付が表示されていないときに J25に何も日付が表示されr内容にできる方法を教えてください。よろしくお願いいたします。

質問日時: 2025/01/27 16:07 質問者: エクセル小僧

ベストアンサー

1

0
エクセルでオートフィルタが動かない

あちこちに空白セルがある大きな表でオートフィルターを使用するときに空白行があるとうまく動かないので表の特定の列に「空白」を「ー」に置換してみたのですがうまくいかず。これまでの経験では、表の各行のどこかに空白でないセルがあるとフィルターできると思っていたのですが・・・そこで仕方なく表全体の空白セルに「－」を入れてみたら、最初は上手くいったのですがなぜか２回目以降は上手くいかなくなってしまいました。つまり表に空白行がなくても（「ー」では）うまくいかないのですが回避できる方法を教えてください。

質問日時: 2025/01/27 11:55 質問者: 教えてOK知恵袋

ベストアンサー

2

0
エクセルの数式について教えてください。

下記の条件でセルE6に数式を設定する方法を教えてください。エクセルのversionはoffice365になります。例えばセルD６に「2025/3/31」セルF6に「2025/3/31」の場合は「＝」と表示セルD６に「2025/3/31」セルF6に「2025/4/31」の場合は「<」と表示セルD６に「2025/4/31」セルF6に「2025/3/31」の場合は「>」と表示できる方法を教えてください。宜しくお願い致します

質問日時: 2025/01/26 20:20 質問者: エクセル小僧

ベストアンサー

3

0
エクセルの条件付き書式設定について教えてください。

セル「I27」に改行した下記の文字があります。実施した適判の「適合判定通知書」この文字の「適合判定通知書」のみを条件付き書式設定とすることができる方法を教えてください。宜しくお願い致します

質問日時: 2025/01/26 19:28 質問者: エクセル小僧

ベストアンサー

3

1
Excelのマクロが表示できない

拡張子が「xls」のExcelのファイル（古い）にボタンのアイコンを配置し、それをクリックするとはがきの郵便番号や住所を次々に印刷するマクロを作成し、「xlsx」用のExcel　2016で正常に動作していますが、プリンターが替わったのでそれを修正しようとしたけど、そのマクロを開けません。 Contキーに割り付けたExcel共通のマクロは表示し編集できるのですが、はがき用のファイルのマクロ（一つだが長い）だけが表示できないのです。どうしたら表示・編集できるのでしょうか？「開発」タブは上に表示されています。

質問日時: 2025/01/25 19:23 質問者: greenhope

解決済

2

0
Excelで、すでに書いてある表を入れ替える方法を教えてくださいお願いします

Excelで、すでに書いてある表を入れ替える方法を教えてくださいお願いします

質問日時: 2025/01/25 18:48 質問者: 5308357

ベストアンサー

4

0
エクセルの『共有作業』について２つ質問です。例えばA1からA10まで入力していた時、突然エラーが発

エクセルの『共有作業』について２つ質問です。例えばA1からA10まで入力していた時、突然エラーが発生して、パソコンを再起動することになりました。 ①Excelはこまめに保存しておいたので、A 10まで入力は消えてないと思っていましたが、実際立ち上げてみると、A5までしか、保存されていませんでした。これは、どうしてでしょうか？ ②このような事故を防ぐためには、共有ファイルをデスクトップにコピーして、データを入力し、出来上がったセルを共有ファイルにコピペする方がよろしいでしょうか？どうぞよろしくお願いいたします。

質問日時: 2025/01/25 17:47 質問者: ボアヒロ

ベストアンサー

2

0
エクスプローラーで見ることはできますか

エクセルのファイル名などを、エクスプローラーで見ることはできますか？できるならやり方を教えてくださいよろしくお願いします（余談）ストレスですエクセルのヴァージョンを書いたほうがいいかなと思ってもその調べ方さえわからない

質問日時: 2025/01/25 11:01 質問者: だんちゃん16

解決済

6

0
エクセルの数式について教えてください。

条件付き書式で、 =$B23="2025年3月31日"を設定し、書式を設定しているのですが、設定した書式に変更ができません。解決方法を教えてください。セルの書式は「yyyy"年"m"月"d"日"」としております。又、できれば、書式設定時に「"2025年3月31日"」以前の時に設定した書式に変更できるようにできる方法を合わせて教えてください。エクセルのversionはoffice365になります。宜しくお願い致します。

質問日時: 2025/01/25 08:29 質問者: エクセル小僧

ベストアンサー

2

0
Excelのsumifで検索する範囲を可変にしたい

例えば B1:D10にデータ B列が空欄の行のD列の合計を計算したい場合全範囲を検索するなら SUMIF(B1:B10,"",D1:D10) だと思いますが、 A1の検索したい行数(1〜10の数字)を参照して、上の数式のB10をB1〜B10,D10をD1〜D10の間で変えられるようにするにはどうすればいいのでしょうか？

質問日時: 2025/01/25 01:05 質問者: zeronine

ベストアンサー

1

0
【マクロ】表における同じお客様番号の行を【黄色】に塗りつぶすためには？

表題の件、以下画像をご覧くださいやりたい事は、同じお客様番号の行を　黄色にて　塗りつぶしたい　ですマクロにて、出来るコードをご存じの方は教えて下さいまた、アドバイスでも、良いので、教えて下さい【条件】お客様番号は、既に並んでいる重複するお客様番号は２行～１０行位まである【参考。黄色のコード】 ColorIndex→6 10進数:RGB(赤, 緑, 青)→RGB(255,255,0) 16進数:H青緑赤→&H00FFFF

質問日時: 2025/01/24 23:55 質問者: aoyama-reiko

ベストアンサー

2

0
エクセル同じ行の隣り合う数字の幅を広げるには

図のような、ます計算のシートを作成しています。ネット上には色々な手段でサンプルのシートがあるのは承知の上です。引き算シートの作成で数字を重ねず、かつ幅を持たせた配置をしたいと考えています。具体的には、B3からE3までの数字を、8から19までで重複せずに配置したいといった考えです。 rand関数、randbetween関数、rank関数を足し引きなどの組み合わせて並べていますが、どうしても同じ数字や隣りあわせが1違いなどで並んでしまうことがあり、問題が解きやすくなってしまっているのが現状です。 vbaで重複のフラグを立てて、再抽選みたいな方法と考えているのですが… ループ処理になるのかなとは思うのですが、代入のvbaまでは思いつくのですが、再抽選以降が自分には思いつかないです。 vba、もしくはそれ以外でのヒントを教えていただければと思います。よろしくお願いします。

質問日時: 2025/01/24 00:09 質問者: makun100

ベストアンサー

5

1
Excel 日付の表示が直せません、２０２５/１/１の表示にしたい

ど素人です、笑わないでください、添付資料のように５桁の数字の表記から2025/1/1の表記にしたいのですが、セルの書式設定で日付にしても、ユーザー定義にしても、文字列でも、もちろん標準にしてもこのままです、どうしたら希望通りの表示になるんでしょうか？教えていただけませんか？

質問日時: 2025/01/23 22:13 質問者: RichardAnthi

ベストアンサー

6

0
Vba 印刷設定のみ行うダイヤログありますか？

いつもお世話になります今、Vbaを使ってDocuworksに出力する際、カラーから白黒印刷（グレーモード）に切り替えたいときに印刷設定のみダイヤログを表示して、SendKeyで設定を変更してプリントしてみようと考えています出力はプログラムの機能上、AActiveSheet.PrintOut ActivePrinter:="DocuWorks Printer"を使いたいので設定だけしたいと考えています以上、何かありましたら教えてくださいよろしくお願いいたします

質問日時: 2025/01/23 12:21 質問者: 公共ごま

ベストアンサー

1

0
Excel 関数での質問です

１つ１つの関数だとわかるのですが組み合わせるとなると混乱してしまいます。下記のような事をやりたい場合、どのようにすればいいでしょうか OR関数とVLOOKUPで出来そうなのですが G3とL3とO3が1以上の場合、 C3のセルを参照して表の左から5番目の列を表示したい

質問日時: 2025/01/23 10:47 質問者: たらこパイ

解決済

2

0
エクセル数字のみ抽出につて

セル内の左から3文字内の数字のみを抽出する方法はありまか? 例①　12ABCD345EFG → 12 例②　123ABCD45EFG → 123 例③　1234ABCD5EFG → 123 LEFT関数だと文字も抽出してしまうので… よろしくお願いします

質問日時: 2025/01/23 00:13 質問者: ガンバルじいさん

ベストアンサー

5

0

←前の結果
1
2
3
4
5
6
7
8
9
10
11
...
20
次の結果→

【Excel（エクセル）】に関する回答募集中の質問

エクセルで、Scroll Lockと同じことを、何かのキーを押しながらできませんか？
- 質問日時： 2025/07/02 10:15
- 質問者： workpad30j

Excel（エクセル）の回答募集中の質問一覧

【Microsoft Office】に関するカテゴリ

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう！

質問する（無料）

【Excel（エクセル）】に関するコラム/記事

弁護士が解説！あなたの声を行政に届ける「パブリックコメント」制度のすべて

社会に対する意見や不満、疑問。それを発信する場所は、SNSやブログ、そしてニュースサイトのコメント欄など多岐にわたる。教えて!gooでも「ヤフコメ民について」というタイトルのトピックがあり、この投稿の通り、...
弁護士が語る「合法と違法を分けるオンラインカジノのシンプルな線引き」

「お金を賭けたら違法です」ーーこう答えたのは富士見坂法律事務所の井上義之弁護士。オンラインカジノが違法となるかどうかの基準は、このように非常にシンプルである。しかし2025年にはいって、違法賭博事件が相次...
釣りと密漁の違いは？知らなかったでは済まされない？事前にできることは？

知らなかったでは済まされないのが法律の世界であるが、全てを知ってから何かをするには少々手間がかかるし、最悪始めることすらできずに終わってしまうこともあり得る。教えてgooでも「釣りと密漁の境目はどこです...
カスハラとクレームの違いは？カスハラの法的責任は？企業がとるべき対応は？

東京都が、客からの迷惑行為などを称した「カスタマーハラスメント」、いわゆる「カスハラ」の防止を目的とした条例を、全国で初めて成立させた。条例に罰則はなく、2025年4月1日から施行される。この動きは自治体...