回答数
気になる
-
excelVBAについて。
「ThisWorkbookでコードを書き、ActiveWorkbookでデータを入れる」とは、マクロが書かれているブック(ThisWorkbook)から、 新しいブック(ActiveWorkbook)を作成し、操作するということを意味します。 具体的な流れ 1. ThisWorkbook(マクロが書かれているブック)にコードを書きます。ここで、新しいブックを作成する処理を記述します。 2. 新しく作成されたブックが自動的にActiveWorkbookとなるため、ActiveWorkbookを使って、その新しいブックにデータを入れたり、セルを操作することができます。の所で、新しいブックを作成する処理を記述する。とは、どういうプログラムでしょうか?教えて頂けると幸いです。
質問日時: 2024/11/22 20:45 質問者: メラゾーム
解決済
1
0
-
条件付き書式に設定する関数を教えて下さい
A列に値がある場合、B~D列の空白セルに色付けをして目立たせたいです。 (A列に値が無い場合は、B~D列はそのまま(色付けなし)にしたいです。) 条件付き書式で表全体を範囲指定して、空白セルに色付け条件にすると、 7行以下の空行まで全部色がついてしまう。 =IF(A1="",色付けなし,色付けする)を条件付き書式でどう数式を入力したらいいかわからずです。 ご教授よろしくお願いします。
質問日時: 2024/11/22 10:21 質問者: koroan-koro
ベストアンサー
7
1
-
エクセルでVLOOKUPの入ったセルをカウントしない方法
VLOOKUP関数でエラーの場合””になるようにしたのですが、範囲の空白セルでないセルの数を=COUNTAで数えると、VLOOKUPの式が入っているので全部の範囲のセルの数が出てくるのですが参照セルに値が入ったセルの数だけをカウントする方法を教えてください。
質問日時: 2024/11/22 09:52 質問者: 教えてOK知恵袋
ベストアンサー
1
1
-
エクセルVBA 同じ品名を色分けする
同じ品名を色分けしたい。セルA1~A100まで品名があり、重複する品名を色分けしたいです。 例 ”みかん”をオレンジ ”りんご”を赤 の様に。 よろしくお願いします。
質問日時: 2024/11/22 07:57 質問者: jjam123
解決済
4
0
-
Excelの数式について教えてください。
下記の数式は以前教えて頂いた数式で、 指定セル値「受付!F2」の表示の一部に{"NO.","NO","No.","No"}があった場合に (№)に表示を変更出来る数式になっております。 しかし、「受付!F2」の表示の一部のナンバー表示が{"NO.","NO","No.","No"}以外の時もあり、 その場合は(№)に表示を変更出来ません。 {"NO.","NO","No.","No"}部分が色々なケース(ナンバー表示)に対応できる方法があれば、教えてください。 現状の数式 「=REDUCE(受付!F2,{"NO.","NO","No.","No"},LAMBDA(x,y,SUBSTITUTE(x,y,"№")))」 以上となります。 よろしくお願いいたします。
質問日時: 2024/11/21 15:47 質問者: エクセル小僧
ベストアンサー
3
0
-
ieを使わずにサーバーとのやり取りを実現したい
今、「ieを使わずに」という観点で勉強しています。 色々試して、上手く機能するようであれば、切り替えようかなと思っています。 大きく現行の説明ですが、 1.あるサイトから基になるデータを取り込み、 2.そこに個人的なデータを加味して目的物を作成します。 3.そしてそれを個人的なサーバ(プロバイダからのレンタル)にアップし、、 4.関係者で参照する。 この構想の引き金は(未だ大丈夫らしいのですが)ieがなくなる、 というものです。 現在、1.データの取り込みがなんとか出来たので、 2.目的物の作成まで完了しています。 ということで、これから3.サーバーにアップの開発になります。 サーバーにアップできれば、4.その後の参照は1.と同じなので出来るかなと。 (厳密には4.でアップするのは「html」ではなく、データです。) 前段が長くなりましたが、 3.に関して、ieを使わず解決できるexcelvbaでの手法を知りたいのです。 (現在のステップは最後に貼っておきます) 条件の一つに、excel2003しか使えない、いうのがつきます。 危ない等は重々承知です。 宜しくお願いします。 *************** 現在のステップです <アップ側> lngInet = InternetOpenS(vbNullString, INTERNET_OPEN_TYPE_PRECONFIG, _ vbNullString, vbNullString, 0&) If lngInet <> 0 Then 'MsgBox "opennd" lngFTP = InternetConnectS(lngInet, Server, _ INTERNET_DEFAULT_FTP_PORT, _ UserName, Password, _ INTERNET_SERVICE_FTP, INTERNET_FLAG_PASSIVE, 0&) If lngFTP <> 0 Then 'MsgBox "conected" FtpSetCurrentDirectoryS lngFTP, strDir abytFrom = StrConv((strFrom & vbNullChar), vbFromUnicode) abytTo = StrConv((strTo & vbNullChar), vbFromUnicode) lngRet = FtpPutFileB(lngFTP, abytFrom(0), abytTo(0), _ FTP_TRANSFER_TYPE_ASCII, 0&) If lngRet <> 0 Then 'MsgBox "ファイルのアップロードに成功しました!", vbOKOnly + vbInformation End If End If InternetCloseHandle lngInet End If <参照側> Set objIE = CreateObject("InternetExplorer.Application") objIE.navigate "http://abc.jp" & trgtname & ".log" Call IEWait(objIE) 'Range("E10").Value = objIE.document.body.innerHTML
質問日時: 2024/11/21 15:04 質問者: nagahaha
ベストアンサー
5
0
-
【マクロ】文字列の一部を削除したいの件
【やりたい事】 以下の表aから表bのようにしたいです A列に並んでいる、数値の内 -08、-09がついていれば削除。 ついていなければそのままにしたいです マクロは、以下のように考えています ご存じの方、ヒントやアドバイスを頂きたいです 宜しくお願いします なお、以下のマクロステートメントでなくてもOKです 【表a】 123 456-08 789 111-09 222 ※数値は3ケタか3ケタ プラス -08or-09しかないです ※並んでいる数値の個数は増えたり減ったりします 【表b】 123 456 789 111 222 【考えているマクロ】 lastrow2 = ws2.Cells(Rows.Count, "A").End(xlUp).Row For i = 2 To lastrow2 if -08 or -09 then '-08もしくは-09 が数値についていれば -08 or -09 だけ削除 else '-08 or -09 無ければ 何もしない End If Next i
質問日時: 2024/11/21 11:19 質問者: aoyama-reiko
解決済
5
0
-
パソコン教室ってExcelとかどこまで教えてるの?
Excelコースとか貼り紙してあるパソコン教室の前を通るたびに不思議に思うんですが、素人にいったいどこまで教えてるものなんでしょうか? Excelと言っても普通の表計算からピボットとかちょっと特殊な機能もあれば、数式だって色々種類があるし、VBAでマクロ組んだりできますよね。 こんなの週一とかで教えてたら10年くらいかかるんじゃないの?と思うんですが・・・ まあ、事務職で役に立つ程度までだと思うんですが、そのライン引きもまた難しいですよね。 パソコン教室ではいったいどこまで教えてるんでしょうか? Excelコースだとどこまでできたら卒業なの?
質問日時: 2024/11/20 21:27 質問者: どちてオジサン
ベストアンサー
2
0
-
excelvbaでcsvファイルをセルに格納する。
数値が10個カンマで仕切られたCSVデータが在ります。 コレを読んで、セルB1からB10までに収めたいのですが、 簡単な方法は在りますでしょうか。 私は、頭からカンマが来るまでループで1個ずつ移動するくらいしか思いつきません。 配列は全く知りませんが、配列を使うと簡単とか、ありませんでしょうか。 宜しくお願いします。
質問日時: 2024/11/20 17:21 質問者: nagahaha
ベストアンサー
4
0
-
各種ファイルの比較をしたい
ほぼ毎日ですが、10ステップほどの一連作業を実施していますが、 この度、入口のステップを変更します。 変更内容ですが、入力データをコレまでとはガラッと変えます。 なので、後続ステップに影響しないかの検証をしたいのです。 ということで、質問は各種ファイルの比較です。 アプリなり、コマンドを教えて欲しいです。 関係ファイルは、本体(excel)と出力ファイル3本(excel,txt,log)です。 txtとlogファイルはdosの「FCコマンド」で可能と思っています。 excelを全体で比較するのにも「FCコマンド」が使えるでしょうか。 excelは未だに2003ですが、宜しくお願いします。 pcはwin10homeです。
質問日時: 2024/11/20 07:17 質問者: nagahaha
ベストアンサー
6
0
-
エクセル この場合、値の抽出できますか?
A列 B列 1 001/003/008/121 21 2 002/004/007/221 29 3 005/010/147/200 52 上記の表から、 A列 B列 7 001 21 A7セルの値001をA1:A3から抽出して、隣のB1の値を抽出したいです。 INDEX,MATCH,IF,VLOOKUPで考えてみましたができませんでした。 ご教授いただきたいです、よろしくお願いします。
質問日時: 2024/11/19 17:31 質問者: koroan-koro
ベストアンサー
3
0
-
Excelのブック内のシートの色を取得するマクロを教えて欲しいです。 未入力のところをシートを黄色に
Excelのブック内のシートの色を取得するマクロを教えて欲しいです。 未入力のところをシートを黄色にして分かるようにしてるのですが、一覧を作りたくて、シートの色が変更されているところ、またはシートの色が分かるようなマクロはないでしょうか?
質問日時: 2024/11/18 15:12 質問者: tenchans
解決済
3
0
-
エクセルのデータについて
ミクロソフト365とOFFICEを更新しますと表示され、OXC0000142と表示されエクセルがひらけません。デスクトップ、USBのデータ、新規のエクセルやその他ワードもひらけません。 アプリの更新、修復、再起動試しましたが、壊れてるようなきがします。 エクセルのデータをバックアップをして初期化すればデータは再度よみこめるのでしょうか?
質問日時: 2024/11/17 18:52 質問者: qwe123456123
ベストアンサー
3
0
-
セル内が空白設定なのに#N/Aと出てくるのを回避する方法を教えてください。
お世話になります。 A列に「重量」(1個の重量) B列に「数量」 C列に「面積」 D列に「総重量」(A列×B列) この場合、A×Bだけを求める場合、C列の面積のセルはdeleteしてまっさらにしているにも関わらず、B列に数値を打ち込んでenterするとD列に答えが出てくるのですが、何故か関数(数式)が入っていないはずなのに、#N/AとC列の面積のセルに出てきます。 そのセルをクリックすると関数式が現れます。 この現象を回避するにはどうすればよいのでしょうか。 よろしくお願いします。
質問日時: 2024/11/15 16:39 質問者: makoteru
ベストアンサー
3
1
-
excelVBAについて。
パスからファイル名を抜き出す所で、ファイル名の拡張子を抜き出した後、別の形式で保存する用途で利用できます。とはどういう事でしょうか?教えて頂けると幸いです。
質問日時: 2024/11/14 22:07 質問者: メラゾーム
ベストアンサー
4
0
-
IEを使わずHTMLを取得する
少し前に、『キャッシュがクリアされない云々』という質問をしたところ、 頂いた回答に色々リンクを貼っていただき、 コレまで勉強させていただきました。 そして、その中に『IEを使わずにHTMLを取得する』という記事があり、 コレは使えると思いました。 そして早速、サンプルコードも出ていたので、やってみました。 ***************ここからです Sub test001() Dim httpReq As XMLHTTP60 Set httpReq = New XMLHTTP60 httpReq.Open "GET", "https://www.mizuhobank.co.jp/takarakuji/check/loto/loto6/index.html" httpReq.Send Do While httpReq.readyState < 4 DoEvents Loop Dim htmlDoc As Object Set htmlDoc = New HTMLDocument htmlDoc.write httpReq.responseText Debug.Print httpReq.responseText ****************** Set htmlDoc = Nothing Set httpReq = Nothing End Sub ***************ここまでです 結果は出たのですが、 URLを貼り付けてchromeで見た結果と微妙に違うのです。 参考にしたサイトは、みずほ銀行のロト6の抽せん結果が出ているページですが、 取り込みのコードではその結果が出ていません。 コード内の*********を付けた部分が私が追加した箇所です。 長くなりましたが、 原因なり、訂正なりをして頂けると助かります。 また、ここを読めというリンクも在ると助かります。 なお、使おうとしているexcelは2003です。 これまた訳がありまして、コレしか使えません。 宜しくお願いします。
質問日時: 2024/11/14 14:55 質問者: nagahaha
ベストアンサー
7
0
-
アクセス2016 エクセル2016 重複データ複数条件にフラグを立てたい
アクセスデータを元にエクセルで車の配車表を作成しています。 折り返しの条件が複数あり、フラグを立てれなく困っています。 画像の通りに条件に合わせて折り返しのマークが付けれれば完成できます。 折り返しの条件ですが、 ※1=車番、名前が重複した出発時間が早いデータ ※2=車番、名前が重複した出発時間が※1よりも遅いデータ ※2=混載してても車番、名前が重複した※1よりも出発時間が遅いデータ ※3=車番、名前が重複した出発時間が※2よりも遅いデータ ※3=混載してても車番、名前が重複した出発時間が※2よりも遅いデータ 重複していても混載と折り返しは別なので、混載だけの車は※1は付かない。 どなたか助けて下さい。
質問日時: 2024/11/14 12:32 質問者: hapisu
解決済
3
0
-
エクセルの不調について
こんにちは、 エクセルの起動が不調でして、 ファイル名をクリックすると先ず写真の画面が出ます、 そのままファイルが開く時もあればメッセージのOKを押して開く時もあります。 大体この画面は何を言ってるのでしょう? あとエクセルのフリーズが多いです、何も出来なくなってPCを再起動するしかないです。 他のアプリではまずフリーズは無いのですが。 よろしくお願いいたします。
質問日時: 2024/11/13 14:05 質問者: PAPATIN329
解決済
4
0
-
エクセルで、数字の下4桁の0を削除する関数
10000000 10000 1500000 260000 のような数字の、下4桁の0を一気に消す関数があれば教えてください。 関数じゃなくてもエクセルで一気にできれば何でもいいです。
質問日時: 2024/11/13 13:51 質問者: ハコ2222
ベストアンサー
7
0
-
1.5ヶ月分の費用按分 エクセル関数
契約期間1.5ヶ月で合計45,000円払いました。 1ヶ月目は30,000円、残りの0.5ヶ月分は15,000円となる数式が知りたいです。 (↓セルイメージでお願いします) A B C D 金額 契約期間 1ヶ月目 2ヶ月目 45,000 |1.5 |①30,000|②15,000 ①.②共に関数知りたいです。 残期間0.5ヶ月分の関数がわからないです
質問日時: 2024/11/12 23:23 質問者: しゅしゅしゅみん
解決済
6
0
-
UNIQUE関数、配列数式を使わずに品名ごとの集計を求めたい
添付画像の左側の表から右側の表のように品名ごとの集計を求めるにはどうすればよいでしょうか? ただし、UNIQUE関数、配列数式を使わない方法でお願いします。
質問日時: 2024/11/11 11:06 質問者: ymhirokazuym
ベストアンサー
7
1
-
エクセル数式に問題があります
エクセルについてご教授願います +1,000/1.1 この数式に問題があります +100,000/1.1 90,909 問題なく計算される ※少額の場合にエラーが出ます 原因は何でしょうか もちろん=から計算式を入力すれば問題はないのですが シフトを押して=を入力する手間を省きたくて ご教授よろしくお願いいたします
質問日時: 2024/11/10 09:04 質問者: kou560
解決済
2
1
-
11ケタの数字を打つと、エクセルの表示が、1.01235E+11 になるのはなぜ?
標題の件、セルに11ケタの数値を入力すると 以下のとおり表示されるのはなぜですか? 入力した数値のまま、表示されるにはどうすれば 良いですか? ご存じの方、教えて下さい 表示形式は標準 【入力数値】 【表示される数値】 101234511001 ⇒ 1.01235E+11
質問日時: 2024/11/09 22:17 質問者: aoyama-reiko
解決済
3
0
-
Excelで、毎月の月曜と金曜の合計何日あるかを拾えるような関数ありますか?
Excelで、毎月の月曜と金曜の合計何日あるかを拾えるような関数ありますか?
質問日時: 2024/11/09 21:37 質問者: ichigo21242
解決済
3
0
-
エクセルの数式が分かりません
エクセルの数式を教えてください。 A列のNoが同じで、B列は教科違く、尚且つC列の時間がB列の国語より数学が早い場合に D列に★を表示させるにはどうしたらよいでしょうか?
質問日時: 2024/11/08 20:19 質問者: MIAX
ベストアンサー
2
0
-
Excelで合計を求めたいです
Excel初心者です。助けていただきたいですm(_ _)m 下の表①のように、日々件数を入力していくのですが、 表②のように、担当者毎&第◯週に合致するところの件数をまとめて合算したいです。 毎月シートが増えていくので、sum関数でセルを足すと、足すセルがズレてしまい面倒なのです。ちなみに<週の行>と<日付行>には既に関数が入力されています。 分かりにくい質問で申し訳ないのですが、よろしくお願いしますm(_ _)m
質問日時: 2024/11/08 02:05 質問者: なぼりたあーン
解決済
1
0
-
エクセル2021 範囲指定印刷をすると、罫線の太さが印刷結果に反映されない
エクセル2021で表を作成し、一番外枠の線のみ太くしています。 表の外側、すぐ隣のセルに作業用データがあるので表の範囲を指定して印刷したいのですが、なぜか左端の縦線だけ細くなってしまいます。 右端の縦線は細くなりません。 左端の線も設定どおりの太さで印刷するには、どうすればいいでしょうか。 左端の列の外に1列余白を設けて、そこも含めて印刷範囲とすれば解決するのかもしれませんが、データの仕様上できればそれはやりたくないです。 なお、プレビューの線も細いです。 どうぞよろしくお願いします。
質問日時: 2024/11/07 11:04 質問者: bari_saku
解決済
5
0
-
vbe でのソースコード参照(msgbox)について
VBA初心者です。 VBEにおける msgbox の表示内容(変更)を確認していますが、 ソースコードを見てもどこにもありません。 エラーイベント(メッセージ集)として、あるはずなのですが、 確認できません、 内容確認 →ここにありそうとかのアドバイスをお願いします。
質問日時: 2024/11/06 17:50 質問者: dokuganryu
ベストアンサー
2
0
-
エクセル初心者です 用語等まだ良く分からないので簡単に説明していただけると幸いです タブの挿入、図形
エクセル初心者です 用語等まだ良く分からないので簡単に説明していただけると幸いです タブの挿入、図形、フリーフォーム:図形から折れ曲がった矢印を入力してるのですが 写真のように折れ曲がって最後に二股に分かれた矢印を1つの図形で入力する事は可能でしょか? 図形2つ合わせれば簡単に作れるのですが移動させたり後から色を変えたりするので1つの図形だと助かるのですが… よろしくお願いします
質問日時: 2024/11/05 13:25 質問者: むさし9999
解決済
5
0
-
excelVBAについて。
ActiveWorkbook.ActiveSheet.Range(″◯◯″) ThisWorkbook.ActiveSheet.Range(″◯◯″) 前者は、新しく開いたブックのセルの記述で、後者は、元々開いていた(プログラムの書いてある)ブックのセルの記述です。これらは、どういう所で使えるexcelVBAのプログラムなのでしょうか?教えて頂けると幸いです。
質問日時: 2024/11/04 22:06 質問者: メラゾーム
解決済
9
0
-
【マクロ】複数の日付データをYYYY/MM/DDに読替えて、別ブックへ転記したい
標題の件について、以下の表にある3つのデータ(E1からE3)を ●別ブックへ転記したい ●転記する時に、20240101から2024/1/1に読替えて転記したい 現状、1つだけは読替えて、転記は出来ましたが、連続した複数セルの 転記は出来ませんでした コード分かる方、ご指導のほど、お願いします 1から作成でも、以下コードから修正でもokです 宜しくお願い致します 【表について】 E1 日付 E2 20240101 E3 20240102 E4 20240103 ※コピー元ブック Sheet1 ※文字書式:標準 ※変数ws1にコピー元ブックとシートを格納 ※変数W2は、コピー先ブックを格納 Sheet1。マッサラなシート Sub 日付() Dim filepath1 As String Dim wb1 As Workbook Dim ws1 As Worksheet filepath1 = ThisWorkbook.Worksheets("Sheet1").Cells(4, 1) Set wb1 = Workbooks.Open(filepath1) Set ws1 = wb1.Worksheets("Sheet1") Dim filepath2 As String Dim wb2 As Workbook Dim ws2 As Worksheet filepath2 = ThisWorkbook.Worksheets("Sheet1").Cells(5, 1) Set wb2 = Workbooks.Open(filepath2) Set ws2 = wb2.Worksheets("Sheet1") A = ws1.Range("e2") B = CDate(Format(A, "@@@@/@@/@@")) '2020/01/01 MsgBox B ws2.Range("a2") = B End Sub
質問日時: 2024/11/04 12:46 質問者: aoyama-reiko
ベストアンサー
5
0
-
【マクロ】メッセージボックスにて、キャンセルをクリックしたら、マクロ終了。エクセルへ戻すには
以下のコードにて、3つのメッセージボックスがあります Ifステートメントの条件に満たさない場合は、メッセージボックスが表示されます OK or キャンセル ボタンが出ます キャンセルをクリックした場合に、マクロを終了して、エクセルに戻るには どのようなコードにすれば良いでしょうか? なお、戻るエクセルは、マクロが書いているエクセルブック・シートです(Thisbookです) ヒントでも、新規コードでも、以下コード修正でもOKです ご存じの方、ご教授をお願いします (コード。教えてgooにて教授いただきながら作ったコードです) Sub 名前を付けて別ファイル保存() Dim filename3 As String Dim filepath As String Dim checkresult As Boolean Dim wordCount As Long Dim numberOfBytes As Long Do ' ファイル名の入力を促す filename3 = InputBox("ファイル名、半角数字3ケタを入力してください(例:01, 02, 11)") ' 半角数字3ケタかをチェック checkresult = (Len(filename3) = 3 And IsNumeric(filename3)) If checkresult = False Then 'メッセージボックス MsgBox "半角数字3ケタで入力してください。", vbExclamation Else '文字数を取得 wordCount = Len(filename3) 'バイト数を取得 numberOfBytes = LenB(StrConv(filename3, vbFromUnicode)) If wordCount <> numberOfBytes Then 'メッセージボックス MsgBox "半角文字以外のが入力されています。半角文字で入力してください。", vbExclamation checkresult = False Else ' 保存先のファイルパスを作成 filepath = "C:\Users\user\Desktop\あ\" & "あいうえお" & filename3 & "_k" & ".xlsx" ' 同じファイル名が存在するか確認 If Dir(filepath) <> "" Then 'メッセージボックス MsgBox "同じファイル名が存在します。別の番号を入力してください。", vbExclamation, vbExclamation checkresult = False Else checkresult = True End If End If End If Loop Until checkresult = True ' 入力が正しい場合、ループを終了 ' ファイルをコピーして保存 ThisWorkbook.Sheets("折衝入力").Copy ActiveWorkbook.SaveAs filepath End Sub
質問日時: 2024/11/03 21:01 質問者: aoyama-reiko
ベストアンサー
3
0
-
【マクロ】同じファイル名がある場合メッセージを出すor指定の文字でしか名前を付けられないようにする
以下のコードをご覧ください ●ファイル名前をインプットボックスに入力。指定の場所にエクセルファイルを保存します ファイル名は あいうえお11.xlsx 等です。11の部分だけ変更可能 この時、以下の1番、2番の条件を加える為のコードをご存じの方、教えて下さい 以下のコードを修正しても1から新しいコード作成でもどちらでもOKです 宜しくお願いします 1インプットボックスには半角数字2ケタしか入力できないようにする ⇒例:01 02 11 2保存先に同じファイルがあったら、再度、ファイル名のインプットボックス 入力へ戻るようにする 【コード】 Sub 名前を付けて別ファイル保存() Dim filename3 As String filename3 = InputBox("ファイル名、半角数字2ケタを入力して下さい") If filename3 <> "" Then ThisWorkbook.Sheets("Sheet1").Copy ActiveWorkbook.SaveAs "C:\Users\2020\OneDrive\マクロ\ブックからブックへコピー\" & "あいうえお" & filename3 & ".xlsx" End If End Sub
質問日時: 2024/11/02 15:52 質問者: aoyama-reiko
ベストアンサー
2
0
-
excelVBAについて。
以下のプログラムの最後から4行が分かりません。それと、使いたい処理とは何でしょうか?教えて頂けると幸いです。
質問日時: 2024/11/01 17:44 質問者: メラゾーム
ベストアンサー
14
0
-
エクセルの関数ついて
エクセルの関数が分からないので賢者のみなさま教えてください。 画像のように、A列にNo.・B列に購入したフルーツの種類(※10種類)・C列に日付・D列に金額 が入っている表があり、 その表を参照して品名別の購入金額をF列以降に出したいのですが、 画像のように抽出を7行ずつに分け、かつ、重複しないようにする方法が分からず上手くいきません。 抽出をF列とI列に分けずに続きでするとうまくいくのですが、抽出を分けたらどうしてもI列のイチゴ以降からエラーになります。 ただ、印刷の都合上、どうしてもF列とI列に分けたいので、詳しい方教えてください!
質問日時: 2024/11/01 14:27 質問者: ぱんちゃんはむちゃん
ベストアンサー
6
0
-
エクセル初心者です 用語とか良く分からないので簡単に説明していただけると幸いです 表を作っているので
エクセル初心者です 用語とか良く分からないので簡単に説明していただけると幸いです 表を作っているのですが1つのセル内で入力された文字の途中から2段にする事は可能でしょうか? 分かりづらくて申し訳ないのですがセルを分割、最初の文字から2段にする等だと使うとき不便で… 写真の円のように文字を入力したいです よろしくお願いします
質問日時: 2024/11/01 07:19 質問者: むさし9999
ベストアンサー
8
0
-
フィルター時の、別の列に書いてある数字の表に現れた個別の数字の数量のみを表す式を教えてください。
前回の質問で、回答を教えてもらい、実際にやってみましたが、どうしてもわからないので再度質問いたします。 教えて頂いた式は =SUMPRODUCT(SUBTOTAL(102,OFFSET(基準セル,ROW(セル範囲1),0))*(セル範囲2=1)) で具体的に入れた式は、 勝手に考えた式 1⇒ =SUMPRODUCT(SUBTOTAL(102,OFFSET(K$1,ROW(9:21),0))*(1)) 勝手に考えた式 2⇒ =SUMPRODUCT(SUBTOTAL(102,OFFSET($A$1,ROW(K10:K1000),0))*(1)) です。 式1では、現れた数字が何であろうと、すべて数えた結果となります。 別紙の表でやってみたのですが、別紙の表では答えが10となり、個別の数字1の分は出てきません。 1と2と3の合計値が出ます。このうちの1を指定したいのですが、簡単な方法はないでしょうか? 式2阪神完全に間違っているようで答えは0となります。 申し訳ないですがもしこの式が間違っているのなら、修正内容を教えてください。 よろしくお願いいたします。
質問日時: 2024/10/31 18:07 質問者: エクセル爺さん
解決済
1
0
-
最新I/e?のキャッシュクリア
訳在ってコード全体は表示できませんが、 毎日、webからデータを取得するexcelを使ってきました。 コレまで20年以上、問題なく使えてきていましたが、 昨日、一時ファイルだか、、キャッシュだか分かりませんが、 前日分を取り込んでしまうような現象が出ました。 コレまでにも、たまにですが、同じ現象が出た事が在り、 その時のために、キャッシュをクリアするexcelも在りました。 昨日は、それをやってもどうしても前日分しか取れませんでした。 とりあえずがexcelは辞めて、手で一時ファイルを削除し、 再作業をしたら、コレまで通り、ノーマル終了しました。 毎回手でやれば済むかもしれませんが、コレまで通りやりたいなと。 ということで、教えて欲しく質問しています。 私の分からないなりの考えですが、 コレまで使っていたexcelでは、最新版に対応出来ていないのでは、です。 宜しくお願いします。 追加; 私は普通のexcelであればなんとか分かるレベルです。 web関係については全く分かっていません。 なので、ずばり、コードまで教えていただけますよう、 併せてお願いいたします。 キャッシュクリアexcelの内容です。 Private Sub Workbook_Open()'Public Function Call_sample_Delete_Cookie() Dim objIE As Object '■IEを起動→表示 Set objIE = CreateObject("InternetExplorer.Application") objIE.Visible = True '■インターネット一時ファイルおよびWebサイトのファイルを削除 Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 8" MsgBox "done" objIE.Quit Set objIE = Nothing ThisWorkbook.Saved = True If Workbooks.Count <= 1 Then Application.Quit ThisWorkbook.Close End Sub
質問日時: 2024/10/31 10:21 質問者: nagahaha
ベストアンサー
2
0
-
excelVBAについて。
以下の写真の説明が分かりません。「自身と同じフォルダ」を利用するとはどういう事でしょうか?①パスの取得とは何でしょうか?②これらを使うのも便利です。のこれらとは何でしょうか? いまいちここでやっている事が分からないので、もう少し詳しく教えて頂けると幸いです。
質問日時: 2024/10/29 21:04 質問者: メラゾーム
ベストアンサー
11
0
-
フィルターをかけた時の、別の列に書いてある数字の表に現れた数量のみを表す式を教えてください。
別紙のような表があります。この表は2024年阪神競馬場で行われた、すべてのレースを、1レースを1行であらわしたものの一部で、CからKの列に、各レースの条件が記入されており、これに、Mから左の列に、ある特定の馬の着順が書いてあります。これにフィルターをかけた場合(例:H列で3Rを選び、J列で1200から1400を選んだ場合、N列での21行目から1000行目までの1の数の数量(Range("M13")、2の数の数量(Range("M14")、3の数の数量(Range("M15")を表す関数が知りたいのです。 ちなみに、フィルターをかけないときの、全体での数字は、Range("M2"),Range("M3"),Range("M4")に’=COUNTIF(M$21:M$656,1)、’=COUNTIF(M$21:M$656,2)、’=COUNTIF(M$21:M$656,1)で計算しています。この計算式では、フィルターをかけても数字は変わりません。 実際には、この表の他の列には様々な条件もあり、それらにもフィルターをかけた時の状況で、どのようなときにこれらの馬が入着するのかが知りたいのです。 よろしくお願いいたします。
質問日時: 2024/10/29 19:24 質問者: エクセル爺さん
ベストアンサー
3
0
-
excelVBAについて。
別シート上の範囲は、以下のようになりますで、罫線や色の変更などは可能です。とは、このプログラム片に何をすれば(付け加えれば)、罫線や色の変更などが出来るのでしょうか? 後、なぜ、.が付いているのでしょうか? 以下がプログラム片の内容です。 With Worksheets("sheet1") Set rng=.Range(.Cells(a,b), .Cells(c,d)) End With です。 教えて頂けると幸いです。
質問日時: 2024/10/29 12:21 質問者: メラゾーム
ベストアンサー
8
0
-
excelVBAについて。
ActiveWorkbook.ActiveSheet.Range(″◯◯″) ThisWorkbook.ActiveSheet.Range(″◯◯″) 前者は、新しく開いたブックのセルの記述で、後者は、元々開いていた(プログラムの書いてある)ブックのセルの記述です。これらは、どういう所で使えるexcelVBAのプログラムなのでしょうか?教えて頂けると幸いです。
質問日時: 2024/10/27 21:40 質問者: メラゾーム
解決済
7
0
-
エクセル 別セルの2進数表示を合わせて表示したい
エクセルにて、別セルの2進数を合わせて表示する方法を探しています。 例えば、2つのセルに 「1」、「000」 と入力されており、合わせた「1000」と表示したいと考えています。 「&」関数を使用すると、上記の場合「1」となってしまい、4ビットが表現できません。 何か良い方法がありましたら、教えていただきたいです。
質問日時: 2024/10/25 20:16 質問者: hama-1
ベストアンサー
3
1
-
エクセルシート保護を解除させない方法。
質問させてください。 Excelで日々データ管理しています。1日終わると次の日データを確認してその日のシートを保護して編集できない様にしているのですが保護を解除できしまうツールがあるためたまに解除されているのを見かけます。変更点をこちらに伝えてやり取りするのが億劫なのか不正があるのかはわかりませんがこの現状をなんとかしたいです。 次の日私が確認したら編集ができないような方法はありますでしょうか?
質問日時: 2024/10/25 17:18 質問者: たげ
ベストアンサー
7
1
-
Excelの数式について教えてください。
セルT24に下記の条件での数式を教えてください。 各セルS24・S25には日付が表示されます。 例えば 条件-1 セルS24に「11月11日」と表示 セルS25に「11月13日」と表示 と表示された時にT24に「ご希望にお応え出来ない可能があります。(希望日の再考をお願いいたします)」と表示 条件-2 セルS24に表示無し セルS25に「11月13日」と表示 と表示された時にT24に「特にありません。」と表示 条件-3 セルS24に「11月15日」と表示 セルS25に「11月13日」と表示 と表示された時にT24に(特にありません。)と表示 条件-4 セルS24に表示無し セルS25に表示無し の場合はT24も表示無し S25には場合によって日付が表示されたり非表示になる場合が有ります。 S25に表示がある場合はセルS24には場合によって日付が表示されたり非表示になる場合が有ります。 S24の日付がS25の日付より早い日付の場合に T24に「ご希望にお応え出来ない可能があります。(希望日の再考をお願いいたします)」と表示 S24の日付がS25の日付より遅い日付の場合又は日付無しの場合に T24に「特にありません。」と表示 以上となります。 よろしくお願いいたします。
質問日時: 2024/10/25 14:58 質問者: エクセル小僧
ベストアンサー
4
0
-
条件付き書式の効率的な設定の仕方について
office365を使っています。 添付ファイルのような表で,C列,D列,E列の各セルにおいて,1を超えていて,かつ,F列が空白のセルにつき,赤くなるような設定をしたいと思っています。 その場合,C列,D列,E列の各列につき適用先を指定して「=AND($C3>1,$F3="")」「=AND($D3>1,$F3="")」「=AND($E3>1,$F3="")」と設定しないとダメですか? 同内容で適用先を「$C$3:$E$200」というようにして,一括で条件付き書式を設定する方法があればご教示ください。
質問日時: 2024/10/25 12:29 質問者: qazxcvfr4
ベストアンサー
1
0
-
Excelの数式について教えてください。
セルBP65の下記の場合分けの数式を設定する方法を教えてください。 Excelのバージョンはoffice365です。 1.セルX79に「■」が表示 2.セルBK65に「■要」が表示 の場合にセルBP65に(□不要)と表示 3.セルAC84に「■」が表示 4.セルBK65に「□要」が表示 の場合にセルBP65に(■不要)と表示 以上となります。 よろしくお願いいたします。
質問日時: 2024/10/25 09:52 質問者: エクセル小僧
ベストアンサー
3
0
-
カーソルを合わせてる時のみ行の色付けして見やすくする関数を教えてください。 他の行に移動したら色は消
カーソルを合わせてる時のみ行の色付けして見やすくする関数を教えてください。 他の行に移動したら色は消えて欲しい、あくまでもカーソルを合わせた行のみ変換させたい、わかるかたお願いします。
質問日時: 2024/10/24 17:44 質問者: よ-ちゃん
ベストアンサー
2
0
-
ベストアンサー
6
0
-
IF 日付範囲に入っていたら
お世話になります。 エクセル365を使用しています。 IF関数で日付範囲に入っていたら〇、入っていなかったら×とする式がありますが下記のような場合はどのように組めばいいのか教えてください。 対象A の日付 D1セル 2024年2月1日 対象B の範囲 A1セル B1セル C1セル 2023年3月31日 ~ 2024年3月30日 〇 A2セル B2セル 2024年4月1日 ~ 2024年10月1日 × 対象C の範囲 A3セル B3セル D3セル 2020年10月29日 ~ 2023年10月30日 〇 A4セル B4セル D4セル 2023年10月31日 ~ 2024年10月24日 × 対象B、対象Cの Aセルは期間の始まり、Bセルは期間の終わりとなります。 対象BのCセルは、D1セルの2024年2月1日が対象Bの日付範囲のどこに入るか?を判定させるのに下記の式を入れています。 IF(AND(D1>=A1,D11<=B1),"〇","×") 対象CのCセルには、対象Bで〇となった日付範囲が、対象Cの日付範囲のどこに入るか?を判定させたいのですが、こちらの式をどのように組めばいいかわかりません。 説明が下手で申し訳ないのですが ・2024/2/1は対象Bの期間の2023/3/31~2024/3/30が〇となる。 ・対象Cは、対象Bの2023/3/31~2024/3/30の期間に入る、2020/10/29~2023/10/30の範囲が〇となる。 という風にしたいです。 よろしくお願いします。
質問日時: 2024/10/24 11:59 質問者: べるベル
解決済
2
0
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
【Excel(エクセル)】に関するコラム/記事
-
カスハラとクレームの違いは?カスハラの法的責任は?企業がとるべき対応は?
東京都が、客からの迷惑行為などを称した「カスタマーハラスメント」、いわゆる「カスハラ」の防止を目的とした条例を、全国で初めて成立させた。条例に罰則はなく、2025年4月1日から施行される。 この動きは自治体...
-
なぜ批判コメントをするの?その心理と向き合い方をカウンセラーにきいた!
今や生活に必要不可欠となったインターネット。手軽に情報を得られるだけでなく、ネットを介したコミュニケーションも一般的となった。それと同時に顕在化しているのが、他者に対する辛らつな意見だ。ネットニュース...
-
大麻の使用罪がなかった理由や法改正での変更点、他国との違いを弁護士が解説
ドイツで2024年4月に大麻が合法化され、その2ヶ月後にサッカーEURO2024が行われた。その際、ドイツ警察は大会運営における治安維持の一つの方針として「アルコールを飲んでいるグループと、大麻を吸っているグループ...
-
ピンとくる人とこない人の違いは?直感を鍛える方法を心理コンサルタントに聞いた!
根拠はないがなんとなくそう感じる……。そんな「直感がした」という経験がある人は少なくないだろう。ただ直感は目には見えず、具体的な説明が難しいこともあるため、その正体は理解しにくい。「教えて!goo」にも「...
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
【マクロ】1回目の実行後、2回目...
-
エクセル内に読み込んが画像の比率...
-
Excelのメニューについて
-
Excelで作成した出欠表から日付ごと...
-
Excel 偶数月の15日(土日祝日に...
-
Excelの数式について教えてください。
-
勤務外時間を出す表が作りたい
-
VLOOKUP FALSEのこと
-
エクセルの数式について教えてくだ...
-
【マクロ】参照渡しについて。受け...
-
Excel 日付の表示が直せません、2...
-
Excelの条件付書式について教えてく...
-
マクロを実行すると、セル範囲に @ ...
-
【マクロ】参照渡しとモジュールレ...
-
【マクロ】シート追加時に同じ名前...
-
Excelファイルを開くと私だけVALUE...
-
Excelのデーターバーについて
-
エクセルの設定、特定の列以降が無...
-
別のシートの指定列の最終行を返す...
-
エクセル 同じ行の隣り合う数字の幅...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
【マクロ】重複する同じ行を、削除...
-
Excelの条件付き書式のコピーと参照...
-
vba 印刷設定でのカラー印刷と白黒...
-
VBA の単語の意味を教えて下さい。
-
Excel 日付の表示が直せません、2...
-
エクセル 同じ行の隣り合う数字の幅...
-
エクセル条件付き書式について。
-
エクセルの数式につきまして
-
ファイル名の変更
-
エクセル 数字のみ抽出につて
-
Excelの開始ブックを固定したい マ...
-
エクセルの数式について教えてくだ...
-
エクセルのセルをクリックすると頻...
-
=INDIRECT(RIGHT(CELL("filename",A...
-
エクスプローラーで見ることはでき...
-
Excelの関数で質問です
-
至急お願いいたします 屋上の備考欄...
-
エクセルでセルに入力する前は非表...
-
関数を教えて下さい
-
Excel 関数での質問です
おすすめ情報