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

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

回答数

気になる

エクセルの循環参照を削除したい！

高血圧のため、医師から毎日血圧の計測を指示されており、それをExcelに記録しています。ところが、ある時からファイルを開こうとすると、添付ファイルのようなメッセージが出るようになり、OKボタンを押せばファイルは開くのですが、毎回煩わしいのでどうにかしたくて困っています。 “循環参照”を削除する方法、或いは他の手段で解決する策を何方かご教示ください。

質問日時: 2025/03/17 09:17 質問者: hirogood

ベストアンサー

3

0
エクセルでラベルシールを印刷したい

ラベルシール　インクジェット（染料／顔料）・レーザープリンタ・コピー機対応２４面　２０枚入り　４８０片サイズがＡ４で、横70mm,縦33.9mm のラベルが横３，縦８，全部で２４ケできます行の高さ、列の幅をそれぞれ33.9と70 に指定するのではだめなんですか？単位がmmでないようなのですが、どう設定すればいいのでしょうかよろしくお願いします。

質問日時: 2025/03/16 13:13 質問者: だんちゃん16

ベストアンサー

1

0
名前の間のスペースをそろえる関数はありますか？佐藤太郎佐藤太郎

標題の件、以下を大文字スペース１つ、関数にてそろえる事はできますか？ご存じの方、関数、アドバイスの程、宜しくお願いします A1　佐藤　太郎　　　※名前と名前の間スペース全角スペース１つ B1　佐藤　　太郎　　※名前と名前の間スペース全角スペース２つ

質問日時: 2025/03/16 11:42 質問者: aoyama-reiko

ベストアンサー

3

0
重複しない値を抽出したい

エクセル2018で表から重複しない項目を抽出する方法について unique関数が対応していないので何かいい方法がないかお力をお借りしたいです。シート1に下記のような横長の表（空白セルあり） aさん　1 2 2 3 bさん 2 2 2 cさん 3 4 5 シート2にも下記のようにシート1と同じような表があります。 aさん　3 3 bさん 6 2 2 cさん 3 4 6 したいことはシート1とシート2の表から別シートに項目を下記のように抽出したいです。 1 2 3 4 5 6 よろしくお願いいたします。

質問日時: 2025/03/15 21:07 質問者: 895

解決済

1

0
【マクロ画像あり】Exact関数の結果【FALSE】という文字に条件付書式設定にて赤字にする為には

【やりたい事】 D1-D3、H1-H3の空白にも、赤色の塗りつぶしがされなようにしたいです以下コードを実行すると、空白セルにも赤色になってしまいます Exactの結果の、FALSEだけを赤色にしたいですご存じの方、コードやアドバイスのご教授お願いします【条件】 Exact関数は、C1-C3、G1-G3、K1-K3に既に設定済み FALSE【間違っている】という文字列に対して赤色に塗りつぶしされる、コードを記述【コード】 Sub sample() Dim lastrow As Long lastrow = Cells(Rows.Count, "a").End(xlUp).Row Dim fc As Object '既存の条件付き書式があれば削除 Range("C1:k" & lastrow).FormatConditions.Delete '条件を設定して、オブジェクトに格納 Set fc = Range("C1:k" & lastrow).FormatConditions.Add(Type:=xlExpression, Formula1:="=c1=FALSE") '条件成立で、背景色を「赤色」 fc.Interior.Color = vbRed End Sub

質問日時: 2025/03/15 19:08 質問者: aoyama-reiko

解決済

3

0
【マクロ画像あり】セル範囲の移動について、簡潔で短いマクロがあれば教えて下さい

【やりたい事】以下画像にて、A列のかきくけこ３行を、C列のあいうえおの最終行の次に切取りをして、貼付したいです貼付方法や手順は、指定はありません。以下コードは自分が思いついただけのものです【条件】・xの数は、常に変動・水色は、デフォルトである、データとします ⇒ただし、常にあいうえおやかきくけこの数へ変更します・A列、上と下のセルの間は常に８セルより簡潔なコードがあれば教えて下さい宜しくお願いします【コード】 Sub かきくけこ移動() Dim lastrow1 As Long lastrow1 = Cells(1, 1).End(xlDown).Row Dim lastrow2 As Long lastrow2 = Cells(Rows.Count, "c").End(xlUp).Row Dim lastrow3 As Long lastrow3 = Cells(Rows.Count, "a").End(xlUp).Row For i = (lastrow1 + 9) To lastrow3 If Cells(i, 1) <> "x" Then Cells(i, 3) = Cells(i, 1) End If Next i Cells(lastrow1 + 9, "c").CurrentRegion.Cut Cells(lastrow2 + 1, "c").Select ActiveSheet.Paste End Sub

質問日時: 2025/03/15 18:03 質問者: aoyama-reiko

ベストアンサー

1

1
エクセルの難問。「コピペすると勝手に日付型に換算されてしまうデータ」どうやってコピペする？

質問概要タイトルの通りです。ちなみにエクセルバージョンは2002です。 OSはWin10です。質問詳細テキストデータや、WEBブラウザ上の文字列データを、右クリックでコピー　→　エクセルシート上でコピペという作業を良くやると思います。大抵のデータは、元の文字列のまま、コピペされますが、一つ、厄介なものがあります。エクセル上では 1-2-3 という文字列を、勝手に「日付型である」と解釈して 2001/2/3 というように日付としてコピーしてしまい、セルの書式設定も日付型に勝手に設定されてしまいます。これ、どうにかならないでしょうか？このままだと、「宿題丸投げだ！　通報！　通報！」「入試問題のリアルタイム漏洩だ！　通報！通報！」と通報警察が湧いて出てくるので、じぶんでいろいろ考えてみました。まず、今回の場合、元データはWEBブラウザ上の文字列なのでその属性をいじることはできません。そこで、一旦、メモ帳にテキストデータとして貼り付けた後、それをもう一回コピペしてエクセルに貼り付けてみました。ダメでした。やっぱり1-2-3、といった文字列は「日付データである」と勝手に解釈されるようです。次に、「コピペ段階においては、勝手に日付型に解釈されることは対処を後回しにしよう。　まずは勝手に日付型にされてしまったデータを、　1-2-3 　という文字列に変換してみよう」と思いました。そこで、こんな式を考えてみました。セルD8に日付データが入っています。それを計算式で加工します。 =CONCATENATE(YEAR(D8),"-",MONTH(D8),"-",DAY(D8)) 表記結果はいかのようになりました。 2001-2-3 となります。残った問題点としては、1が2001になってしまうことです。これ、どうにかならないでしょうか？下記の計算式を作ってみました =YEAR(D8)-DATEVALUE("2000/1/1") 表記結果は＃＃＃＃＃＃＃＃＃＃＃＃となりました。ただしもし2001年が1という計算ができるようになったとしても、もともとの「コピペ段階で、勝手に日付型に解釈されてしまう」問題は解決していません。なにかいい方法はないでしょうか？よろしくお願いします。

質問日時: 2025/03/15 09:53 質問者: s_end

ベストアンサー

5

0
Excelの数式？について質問です。入力した数値の上げ幅を出す数式について教えてください。具体的

Excelの数式？について質問です。入力した数値の上げ幅を出す数式について教えてください。具体的には、あるセルに数値(整数)を手動入力した際に、その数値の基準値(今回は1)からの上げ幅を別セルに出力する数式になります。例を挙げますと、あるセルに100→1からの上げ幅99→別セルに99出力あるセルに1→１からの上げ幅0→別セルに0出力 ※数値の仕様は、少数やマイナスは対象外で、1からせいぜい1000程度で大丈夫です。よろしくお願いします！

質問日時: 2025/03/14 19:06 質問者: yasuhico

ベストアンサー

2

0
至急お願いします！エクセルのフィルターについて

エクセルのフィルターで「20 30 40 50」など複数の数値を瞬時に抽出検索する事は可能でしょうか？オートフィルターオプションの抽出条件の指定は時間がかかりそうで…

質問日時: 2025/03/13 23:13 質問者: wgapt

解決済

3

0
空白のはずがSUBTOTAL関数でカウントされる

関数の処理分岐の結果で「""（空白）」となったセルを別シートに値貼付けすると、SUBTOTAL関数でカウント（集計方法は3、個数カウント）されてしまうのはなぜですか。何らかの情報が入っているセル扱いされてしまっているのかなと思ったのですが、オートフィルターで確認すると「空白セル」になっています。オートフィルターで「空白セルのみ表示」にし、該当セルを選択してdeleteキーを押すとSUBTOTAL関数が正常な結果を返すので、やはり何らかの情報が入っていたと思うのですが、オートフィルターだと空白扱いなのに…とモヤモヤしています。詳しい方、お願い致します。

質問日時: 2025/03/13 15:23 質問者: bari_saku

解決済

3

0
【マクロ】条件付き書式設定をマクロ化するには？

Exact関数がC1-C3まで入っています判定が、TRUEかFALSEの場合で FALSEの場合、条件付き書式の　赤色になる前述の挙動を、マクロにしたいですご存じの方、アドバイスorコードを教えて下さい【条件】 =EXACT(A1,B1) 【数式】=C1=FALSE 【色】Color = 255 【範囲】C1:C3

質問日時: 2025/03/13 07:53 質問者: aoyama-reiko

ベストアンサー

3

0
VBA_日時のソート

急いでいます… B列に日付と時間を含む文字列があります。日時は2025/02/02 12:12:12,231です。これをソートしたいのですが、うまくいきません。 A列に日時を貼り付けてソートしようとしました。どうか教えていただきたいです。

質問日時: 2025/03/12 10:28 質問者: めい.

解決済

4

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

セルH3とセルM3にはそれぞれ日付が表示されます。日付の大小を比較してコメントを表示する方法を教えてください。 H3＜M3の場合にコメント「ご希望にお応え出来ない可能があります。希望日の再考をお願いいたします。」 H3≦M3の場合にコメント「特にありません」と表示セルH3及びM3どちらか一方又は、両方に日付が何も表示されない場合には、コメントも無しでお願いいたします。よろしくお願いします。

質問日時: 2025/03/12 09:43 質問者: エクセル小僧

ベストアンサー

4

0
テーブルの合計、エラーをはぶくには？

標題の件、合計のセルの中に、エラー表示があり、合計が出せませんエラー表示をプルダウンにてのぞけば、合計は出せますプルダウンは、しぼりをかけずに、合計を出す、関数等はありますか？ご存じのかた、教えて下さい

質問日時: 2025/03/12 08:26 質問者: aoyama-reiko

ベストアンサー

1

0
ミリ秒を時間へ変更するには？ 3,600,000ミリ秒⇒１時間00分へ変更したい

標題の件、ご存じの方、教えて下さい例：セルに3,600,000が、入力されていて、それを⇒１時間００分に変換したいです

質問日時: 2025/03/12 03:00 質問者: aoyama-reiko

ベストアンサー

1

0
エクセルで教えてください。例えばSUM関数でA1＋B1の値をC1に出すとします。 C1数式で=SU

エクセルで教えてください。例えばSUM関数でA1＋B1の値をC1に出すとします。 C1数式で=SUM（A1:B1）を入力。そうすると、 A1が5でB1が2の場合、C1には7とでますよね？ここからは質問です。この7を8に変える時、=SUM（A1:B1）の数式を消さず、数字を8に変える方法はありますか？今順位をつけており、10人中3人合計点が7で同順位になります。それを手打ちで7、8、9と変えたいんです。でもそれを手打ちでやると数式が消えてしまう。これを避けたいんです。教えてください。

質問日時: 2025/03/11 17:51 質問者: ちまにゃ

ベストアンサー

9

0
【オートフィルター】３つのシートの同じ形のオートフィルターを同じ条件のしぼりを１回で実施できる？

標題の件、以下３つのシートに同じ項目の、オートフィルターがあります以下のしぼりを、３つのシートに対して１回だけ実施する方法はありますか？ ※１つ１つのシートを開いて、１回ごとにやればできます ※シートは１２シートあるので実際。１回で、しぼりをする方法は探していますご存じの方、教えて下さい【しぼり】エラーのチェックのみ外す【Sheet1】お客様【項目】佐藤エラー田中加藤【Sheet２】お客様【項目】ボブトムエラー【Sheet3】【項目】セリーヌエラージャンヌ

質問日時: 2025/03/11 17:31 質問者: aoyama-reiko

ベストアンサー

1

0
【マクロ】上のデータに下のデータを、結合する

【やりたい事】以下画像の、赤枠部分を切取し、上のデータの最終行の下（A6）に貼付したいです以下のコードは、やりたい事を実現するコードです ●他の方法で、簡単に、分かりやすいコードをご存じの方アドバイス等含めご指南をお願いします【条件】・上データの最終行の次の行から、下データの開始行の間は　常に【9セル】空いています・上のデータと下のデータの数は、増えたり減ったりします【コード】 Sub データをつなげる() Dim lastrow As Long lastrow = Cells(1, 1).End(xlDown).Row Cells(lastrow + 9, "A").CurrentRegion.Cut Cells(lastrow + 1, "A").Select ActiveSheet.Paste End Sub

質問日時: 2025/03/11 12:12 質問者: aoyama-reiko

ベストアンサー

3

0
Excelのチェックボックスについて教えてください。

Excelのチェックボックス機能を使用して ☑を入れていますが、このチェックボックスの「✔」の部分の色が今は黒ですが、（赤い✔）に出来る方法があれば教えてください。よろしくお願いします。 ExcelのVersionはoffice365になります。

質問日時: 2025/03/10 08:49 質問者: エクセル小僧

ベストアンサー

2

0
2枚のエクセル表で数字をマッチングさせる方法を教えてください

①と②の２枚のエクセルシートがあります。それぞれ400件ぐらいで違う列に数字が羅列されているとします ①シートならＡ列、②シートならＢ列、に並んでいる数字をマッチングさせて同一数字の物を①のシートの最後尾列（たとえばＧ列）に「１」の数字を出す方法はありますでしょうか？よろしくお願いします

質問日時: 2025/03/08 22:13 質問者: giveme2

解決済

5

1
マクロセルを右クリックした時のメニューバーの追加と同様に画像を右クリックしたときのメニューバーにコ

マクロ　セルを右クリックした時のメニューバーの追加と同様に画像を右クリックしたときのメニューバーにコマンドを追加したいどう変更すればいいか教えて欲しいですテキストを参考にセルを右クリックしたときのメニューを追加できたのですが、このマクロを画像を右クリックした際に出てくるメニューに追加したいです。どうすればいいですか。 Option Explicit Sub test() With CommandBars("Cell").Controls.Add(Before:=1, _ Type:=msoControlPopup) .Caption = "2ページ目" With .Controls.Add .Caption = "サイズ調整" .OnAction = "saizu" End With With .Controls.Add .Caption = "中央に配置" .OnAction = "tyuuou" End With End With End Sub

質問日時: 2025/03/08 15:44 質問者: 250308

解決済

2

0
弥生青色申告オンライン .csvの取込エラー

よろしくお願いします。弥生青色申告オンラインというクラウド環境での取引データの出し入れをしています。手入力した取引データを吐き出し、Excelにて一括して大量のデータを同じ形式で追記し、再び.csvに戻し保存、再び弥生青色申告オンラインにてCSV取込という操作をしたいのですが、「インポート形式に従っていないため取込中止しました」と必ずエラーとなります。テキストの保存形式、Unicodeがどうとか数年前は苦労して直して取込ましたが、今回、時間も無いため、同じように苦労され、解決された方、お詳しい方がおられましたら、ご教示のほど、よろしくお願い致します。下記、弥生のサイトになります。 https://support.yayoi-kk.co.jp/faq_Subcontents.html?page_id=27183&grade_id=Blue#:~:text=%EF%BC%BB%E5%BC%A5%E7%94%9F%E3%83%87%E3%83%BC%E3%82%BF%E3%81%AE%E3%82%A4%E3%83%B3%E3%83%9D%E3%83%BC%E3%83%88%EF%BC%BD%E3%81%A7%E3%81%AF,%E5%8F%96%E3%82%8A%E8%BE%BC%E3%82%80%E3%81%93%E3%81%A8%E3%81%8C%E3%81%A7%E3%81%8D%E3%81%BE%E3%81%99%E3%80%82

質問日時: 2025/03/06 12:38 質問者: perikan2

解決済

2

0
エクセルで、一部のセルだけ固定しそのセルがある行・列で挿入をしても、その固定したセルだけは動かない

エクセルで、一部のセルだけ固定しそのセルがある行・列で挿入をしても、その固定したセルだけは動かないようにする方法はありますか？

質問日時: 2025/03/04 22:16 質問者: らちはちはほ

解決済

3

0
【Excel】エクセルで書式なしコピーのショートカットキーはCtrl+Shift+

【Excel】エクセルで書式なしコピーのショートカットキーはCtrl+Shift+Vだと書かれていたのですが全くコピーされません。そもそもコピーはCtrl+Cなので、Vは貼り付けなのでは？と思って、Ctrl+Cでコピーして、Ctrl+Shift+Vで書式なしペースト出来るかなと思ったら出来ませんでした。どうやったら書式なしコピーのショートカットが機能するのか、Ctrl+Shift+Vショートカットキーの使い方を教えてください。

質問日時: 2025/03/04 18:13 質問者: redminote11pro5G

ベストアンサー

2

1
セルの左に余白を付ける

エクセルでセルに文字を入力すると、左寄りになりますが、左ぴったりではなく、気持ち、文字の左に余白を空けたい場合、「セルの書式設定」→「横位置」→「左（インデント」→ 設定を１などにしたりしますが、１よりも、もう少し空白を狭めたい場合、何か方法はありますか？よろしくお願いします。

質問日時: 2025/03/04 02:53 質問者: plechl

ベストアンサー

1

1
ExcelのIF関数との組み合わせの相談

こんばんは。どなたか教えて下さい。 ExcelでA列とB列が有ります。一番上の行は項目のタイトルです。 B列の数値ががマイナスならA列に「-1」が、プラスなら「1」が表示されるようにセルA2に下記の関数を入れました。 =IF(B2＜0,"-1","1") ※後はオートフィルで下までかけました。ただB列がマイナスだと確かに「-1」と表示されるのですが、B列の数値がプラスでも空欄でもA列が「1」と表示されてしまいます。 =IF(B2＜0,"-1","1")としつつ B列が空欄の場合は、A列が空欄になるようにするにはどうすれば良いでしょうか？

質問日時: 2025/03/03 23:01 質問者: 抹茶やん

ベストアンサー

3

0
エクセルのセルに画像は埋め込めますか？

エクセルのセル内に画像を埋め込むことは出来るでしょうか？もし、ご存知でしたら、その方法をお教え頂きたいです。背景エクセルのフィルタ機能で文字列でフィルタをかけると、画像がそのまま表示されてしまい、フィルタしながら編集が出来ない状況です。その為、セルに画像を埋め込み、画像も一緒にフィルタがかかるようにしたい。

質問日時: 2025/03/03 13:29 質問者: nkk06116kk

解決済

4

0
エクセル月間シフト表で曜日ごとの休み数をカウントしたい

エクセルで図のようなシフト表を作成しています。（会社の都合上、データが持ち出せないため、スプレッドシートで同様のものを作成しましたが実際の操作はエクセルになります） A1セルはyyyy/m/dの入力をyyyy年m月の表示形式に B2セルは=A1、以下右に手前セル+1の数式で31日まで入力 B3セルは=B2で表示形式を曜日にしてあります（以下右同様）やりたいこと AG列で★のcountifを求めたのち、各職員の曜日ごとの休み数（空白）をAH以降で求めたいできるだけ同じ曜日での休みが発生しないようにする目安となります ★のカウントはできたのですが、上記の休み曜日が求められず、アドバイスをいただければと思います。 VBAではなく、できれば関数で求めたいと考えていますが、可能でしょうか？ xlookupやcountifs、weekdayの組み合わせなのかと思うのですが、知識不足で思いつきません。ご存じの方、教えてください。

質問日時: 2025/03/02 23:13 質問者: makun100

ベストアンサー

2

0
クラスモジュールにあるプロシージャを、シートモジュールへコピーする為には？

【やりたい事】・クラスモジュールの内容を丸ごと、シートモジュールへコピーしたいです・コピーしたい内容は以下コードです・クラスモジュール　Sheet11　シートモジュール　sheet1　です・Excelのファイル名は　鏡.xlsm ですご存じの方、ヒントやコードを教えて下さい【クラスモジュール　Sheet11】 Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim ws As Worksheet Set ws = Me ' 既存の条件付き書式をクリア ws.Cells.FormatConditions.Delete ' アクティブセルの行をハイライト With ws.Rows(Target.Row).FormatConditions.Add(Type:=xlExpression, Formula1:="=ROW()=" & Target.Row) .Interior.Color = RGB(255, 255, 153) ' ハイライト色（黄色） End With End Sub

質問日時: 2025/03/02 11:19 質問者: aoyama-reiko

ベストアンサー

2

0
Excel「VLOOKUP関数」について質問になります。因みに、Excelは初心者なのでご理解くだ

Excel「VLOOKUP関数」について質問になります。因みに、Excelは初心者なのでご理解ください。古いデータと新しいデータ（シート別）を比較して、新しいデータにある古いデータと同じ内容（セル内の入力値）を反映させたいと考え、VLOOKUP関数を作成しました。しかしながら、古いデータ内容が表示される事が無く、セルに”#VALUE!”や”#N/A”などのエラーが表示が表示されません。表示内容は、VLOOKUP関数の入力値が打ち込まれたままでした。ネット等で調べましたが解決策が見つかりません。原因や解決策をご教授願いいたく質問しました。よろしくお願いします。

質問日時: 2025/03/02 00:10 質問者: まっく236

ベストアンサー

5

0
エクセル

以前縦列の数字をすべて＋5にしたいと相談したものです。解決しました。ありがとうございます。今回ですが、10、20、30と数字が縦列に並んでおり、20以上なら+5をするといったことは出来るのでしょうか？ご存知の方は教えて頂きたいです。よろしくお願いします。

質問日時: 2025/03/01 10:28 質問者: gyrocanopy

解決済

7

1
【マクロ】行を条件付き書式設定にてハイライト表示するマクロのコードを知りたい

標題の件、以下のハンド入力にて、条件付き書式設定とシートモジュールへのマクロコードを記述すると、アクティブセルの行をハイライト表示できます知らいたい事は、以下を全てマクロコードにて記述したいでですコードわかる方、教えて下さいなお、マクロの記録実施しましたが、条件付き書式の設定は、記録が取れませんでした【ハンド入力】条件付書式設定新しい書式ルール数式を使用して、書式設定するセルを決定以下数式を設定 =CELL("ROW")=ROW() 適用先以下設定 =$A$1:$ai$1000 【マクロ入力】シートモジュールのsheet1に以下を記述 Private Sub Worksheet_SelectionChange(ByVal Target As Range) Application.ScreenUpdating = True End Sub

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

ベストアンサー

2

0
エクセルオートサムでセル選択できません

オートサムを使って、32列のセルにいくつかのセルの合計を出したいです。セルを入力したい場所が、計算式の囲みの中に入っていて選択出来ないセルがあります。どうすれば良いですか。 31列のセルも加算も加算したいのですが、隠れてしまっていて、選択できません。よろしくお願いします。

質問日時: 2025/02/26 18:27 質問者: ayubo

ベストアンサー

3

0
Excelに貼ったＸのURLのリンクをクリックするとエラーメッセージが表示される原因と対処について

ExcelにＸ(旧ツイッター)のURLのリンクを貼って、クリックすると該当のXが表示することができました。しかし昨日から、Excelに貼ったＸのURLのリンクをクリックすると下記のエラーメッセージが表示されて、Xが表示されなくなってしまいました。何か原因があるのでしょうか？また、どうすれば、ExcelのURLリンクから表示できるようになりますでしょうか？該当のURL: https://x.com/2i2jp（左記は一例です）エラーメッセージ: https://x.com/2i2jpを開くことはできません。必要な情報をダウンロードできません OS:Windows10 Pro バージョン：Excel2013

質問日時: 2025/02/25 19:58 質問者: エゾリス

解決済

2

0
Excelについて教えてください。

別紙添付の資料はある方のユーチューブを参考にしています、私が取り出したい営業日の日付一覧は２０２５年１月から１２月末までの一年間の土日祝日を除いた日付一覧表をA2から下に作りたいのですが、ユーチューブを参考に取り込んだ数式　=WORKDAY($D$1,ROWS($B$2:$B2),$F$3:$F$23)の意味がよく分かっていません、例えばなぜ＄B＄2:B2が必要なのかとか？この数式の意味を分かりやすくご説明いただけないでしょうか？私なりに２０２５年の営業日一覧表が作りたいのです、よろしくお願します。

質問日時: 2025/02/24 20:51 質問者: RichardAnthi

ベストアンサー

4

2
【マクロ】データ移動について代替案（コード）or助言を下さい

【やりたい事】 A13-15のトム・ジョン・ボブのデータを D列の前田さんの下に、コピーにて、移動したいです ※現在は３人のデータですが、人数は変動します。0～２０人位です 0人の時は下の表は何もありません【質問事項】１以下のコードは動きますが、複雑な気がします。代替え案ないかなぁと思い相談しています２以下コードでご指摘あれば、お願いします条件・上の表と下の表の間は常に３行・項目名は基本、固定ですが、変更もできます・上の表と下の表の、お客様名や状態が削除の件数は、変わります

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

ベストアンサー

1

0
【マクロ】データ移動について代替案（コード）or助言を下さい

以下画像をご覧ください【やりたい事】 A13-15のトム・ジョン・ボブのデータを D列の前田さんの下に、コピーにて、移動したいです ※現在は３人のデータですが、人数は変動します。0～２０人位です 0人の時は下の表は何もありません【質問事項】１以下のコードは動きますが、複雑な気がします。代替え案ないかなぁと思い相談しています２以下コードでご指摘あれば、お願いします条件・上の表と下の表の間は常に３行・項目名は基本、固定ですが、変更もできます・上の表と下の表の、お客様名や状態が削除の件数は、変わります

質問日時: 2025/02/24 16:14 質問者: aoyama-reiko

ベストアンサー

3

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

下記の条件を成立できる数式を教えてください。セルT145に「■」且つセルP143に「2階以上」又はセルR143に「200超え」と表示された場合に数式に「■」上記の条件に該当しない場合は「□」と表示できる数式を教えてください。エクセルのversionはoffice365です。よろしくお願いいたします。

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

ベストアンサー

3

0
【マクロ】Formulaプロパティにて、３行全てに、数式を入れるためには？

【やりたい事】 Q1.コードを実行し、C1-C3セルに、数式を以下のように入れたいです現在は、=EXACT(A1,B1)　が３つのセルに入っています C1セル⇒=EXACT(A1,B1) C2セル⇒=EXACT(A2,B2) C3セル⇒=EXACT(A3,B3) Q2.最終行の宣言におけるデータ型は、Dim surveydatalastrow As Integerであっていますか？ ※Integer 整数型　-32,768 ～ 32,767 上記２つについて、ご存じの方、ご指導お願いします【コード】 Sub exact関数() Dim surveydatalastrow As Integer lastrow = Cells(Rows.Count, 2).End(xlUp).Row For i = 1 To lastrow If Cells(i, 2) <> "" Then Cells(i, 3).Formula = "=EXACT(A1,B1)" End If Next i End Sub

質問日時: 2025/02/23 14:23 質問者: aoyama-reiko

ベストアンサー

2

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

数式「=SWITCH(TRUE,AND($G$87>=-0.005,$G$87<0.005),"",$G$87>$I$87,"＞",$G$87=$I$87,"＝","＜")」を設定しております。セルI87に「2」が表示されていてセルG87の表示数字より「＝」「＞」「＜」が表示されます。又、セルG87に何も表示が無ければ数式のセルには何も表示されません。この式をセルI87に「2」が表示されていてセルG87に「2」と表示されると「≧」と表示セルG87に「1」と表示されると「＜」と表示変更する方法を教えてください。よろしくお願いいたします。

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

ベストアンサー

4

0
ACCESSにExcelの改行のあるデータ（数式）を適切に取り込む方法について

office365を使用しています。 Excelのvlookup関数で取得した改行のあるデータをAccessに取り込むと，改行部分が「_x000D_」という文字として表示されてしまい，改行もされておりません。 Accessに取り込んだときに適切に改行されるようにする方法があればご教示願います。

質問日時: 2025/02/21 14:27 質問者: qazxcvfr4

ベストアンサー

3

0
複数条件の合計を求める数式を教えてください。

Excelで複数条件の合計を求める数式一つ目の条件が　45点以上二つ目の条件が　文字列（大阪）求めるものは45点以上で大阪地域の合計を求めたい。 ※100件のデータがある内大阪地域は55件あります。その内45点以上が30名います。その30名の点数の合計を求める数式を教えてください。 SUMIFSで試しましたがうまくいきません宜しくお願い致します。

質問日時: 2025/02/20 10:09 質問者: よろしくひでさん

ベストアンサー

4

0
【マクロ】１回目の実行後、２回目からは実行できないようにはできますか？

以下のマクロを画像に登録してボタンとしていますマクロ内容は以下です・別ファイルに、モジュール（マクロ）を登録・別ファイルに画像を作成・作成した画像にマクロを登録これを２回目実行すると、画像の上にさらに画像ができまた、マクロは登録されません１回登録したら、次から実行できないようにできますでしょうか？？？別ファイル（１ファイル）に１回までしか実行できないようにしたいですアドバイス、コード分かる方は教えて下さいなお、別ファイルは１日ごとに変わりますなので、次の日にはまた、初めて新しく上記マクロを実行し、画像にマクロを登録します【コード】 Sub macro_import() '鏡ブックへマクロコードをimport Dim filepath1 As String Dim wb1 As Workbook Dim ws1 As Worksheet filepath1 = ThisWorkbook.Worksheets("Sheet1").Cells(7, 1) Set wb1 = Workbooks.Open(filepath1) Set ws1 = wb1.Worksheets("Sheet1") Const filepath As String = "C:\Users\2020\OneDrive\マクロ\マクロファイル\" With wb1.VBProject.VBComponents .Import filepath & "delete.bas" End With Call sample End Sub Sub sample() 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") With ws1.Shapes.AddShape(msoShapeRectangle, 120, 60, 120, 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("f1").Top .Left = Range("f1").Left End With ws1.Shapes("あいう").OnAction = "delete1" 'プローシージャ名を記述 End Sub

質問日時: 2025/02/18 21:20 質問者: aoyama-reiko

ベストアンサー

3

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

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

質問日時: 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

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

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

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

質問する（無料）

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

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

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

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

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

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