
ずっと何事もなく利用していたエクセルで突然エラー13型が一致しません。と出るようになりました。マクロを作ってもらいそのまま使っているエクセルド素人です。エラーの出る数式は以下です。
Dout.Cells(G, L+1)=Dout.(G, L+1)+Din.Cells(i, j+6)'―― 金額
です。本当に素人です。プリントアウトしたマクロを見て 一生懸命式を見た目で映しました。最近まで何事もなく使っていたのに 何が悪いのかさっぱり分かりません。エラー13についてのいろんな投稿を見ましたが チンプンカンプンです。どう直したらいいのか正しい答えをお教えください。
A 回答 (4件)
- 最新から表示
- 回答順に表示
No.4
- 回答日時:
No.2の者です。
コードの全体が分からないので、Debug.Printの2行を追加して、エラーが出た時に、イミディエイトウィンドウに表示されると思うのですが、それは、
どうなっているでしょうか?
Dout.Cells(G, L) = Dout.Cells(G, L) + Din.Cells(i, j + 5) '--- 数量
Debug.Print Din.Cells(i, j + 6) '追加
Debug.Print IsNumeric(Din.Cells(i, j + 6)) '追加
Dout.Cells(G, L + 1) = Dout.Cells(G, L + 1) + Din.Cells(i, j + 6) '--- 金額
イミディエイトウィンドウの表示方法
https://www.239-programing.com/excel-vba/basic/b …
Din.Cells(i, j + 6)に入っているデータと、True 又は、Falseが表示されるかと思います。 True:数値、False:数値以外
先ずは、これで、原因の切り分けてみては?と。
ド素人の私に 手鳥足取り教えようとして戴き感謝します。イミディエイトウィンドウは開いてみましたが 何も表示されていませんでした。お時間を割いていただきありがとうございました。今エラー表示は終了で無視しても 計算式は出来ていますので しばらくこのまま使っていく事にします。ネットでお尋ねするのも 大変ですし 全く???ですので 私にはこういう形で解決を図るのは 荷に重過ぎると悟りました。実際隣で教えて下さる方を 探す事にします。質問者がダメ過ぎて 解決に至りませんでしたが、お時間とお心を砕いていただいた事に感謝致します。ありがとうございました。
No.3
- 回答日時:
最近まで使えていたのならコードよりは入力したデータにミスがあるとか?
>Dout.Cells(G, L+1)=Dout.(G, L+1)+Din.Cells(i, j+6)
は手打ちでしょうか?
取り敢えずエラーが出た際に黄色くなるでしょうから、各変数(G, L, i, j)にカーソルを持っていけば数値が見られるので『どこのセル』なのかを絞り込む(補正の +1,+6も加味して)。
そしてそのデータが正しいかを確認する。
ありがとうございます。一様やっては見ました。おそらく私のやり方が間違っているのか 変化無く どのセルか絞り込みも出来ませんでした。イミディエイトウィンドウも開いて見ましたが 此れまた同じようなもので 何も表示されていませんでした。ド素人の私では こう言う形で解決を図るのは 身の程を弁える冪と考えました。今の所は エラー表示を無視しても 一応計算も出来ていますので 暫くこのまま使い 実際に隣で教えて下さる方を探してみる事に致します。折角お時間とお心を割いて戴いたのに 愚弟で申し訳ありませんでした。お心使いに感謝申し上げます。
No.2
- 回答日時:
こんばんは。
No.1の方の意見と同じになります。
エラー13の「型が一致しません」は、変数へ値を代入する際に発生するエラーで、数値型の変数に対して文字列を代入しようとするなど、変数の型とは違う値を代入しようとすると発生します。 VBAでは変数定義時に型を指定する場合としない場合の両方が可能ですが、エラー13は型を指定している場合に発生します。
マクロコードをアップされると、原因が特定できるかも知れません。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
特定のPCだけ動作しないVBAマクロがあります。その理由は?
Visual Basic(VBA)
-
実行時エラー 438になった時の対処法を教えて下さい。
Visual Basic(VBA)
-
ExcelのVBAでエラー13が出てしまいます。(泣き)
Excel(エクセル)
-
-
4
なぜこんな初歩的なVBAのIf文でエラーか発生して使えないのか、全く理解出来ません。誰か助けてくださ
Visual Basic(VBA)
-
5
エクセル 「実行時エラー13":型が一致しません。」エラーについて"
Excel(エクセル)
-
6
ExcelVBAで、型が一致しませんのエラーについて
Visual Basic(VBA)
-
7
Vba 型が一致しません(エラー13)のセルを特定する方法を教えてください
Visual Basic(VBA)
-
8
worksheetFunctionクラスのVlookupプロパティを取得できません エラーへの対応
Visual Basic(VBA)
-
9
もしセルが#N/A"なら~をする・・・には?"
Excel(エクセル)
-
10
VBAでEmpty値って何ですか?
Excel(エクセル)
-
11
エクセルVBAで、MsgBox やInputBox は、画面の中央以外に表示させたい。
Excel(エクセル)
-
12
Excel VBA で End Subのところで「型が一致しません」のエラーとなります。
Visual Basic(VBA)
-
13
【VBA】特定の値が入った行をコピーして別シートに貼り付ける方法をおしえていただきたいです。
Excel(エクセル)
-
14
Excel マクロ VBA プロシージャが大きすぎます のエラー対処方法
Visual Basic(VBA)
-
15
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
16
VBAで文字列を数値に変換したい
Excel(エクセル)
-
17
【Excel VBA】マクロでExcel自体を終了させたい
Excel(エクセル)
-
18
空白でないセルの値を返す方法について
PowerPoint(パワーポイント)
-
19
EXCELで2つの数値のうち大きい方を採択する数式
Excel(エクセル)
-
20
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
関連するカテゴリからQ&Aを探す
今、見られている記事はコレ!
-
弁護士が解説!あなたの声を行政に届ける「パブリックコメント」制度のすべて
社会に対する意見や不満、疑問。それを発信する場所は、SNSやブログ、そしてニュースサイトのコメント欄など多岐にわたる。教えて!gooでも「ヤフコメ民について」というタイトルのトピックがあり、この投稿の通り、...
-
弁護士が語る「合法と違法を分けるオンラインカジノのシンプルな線引き」
「お金を賭けたら違法です」ーーこう答えたのは富士見坂法律事務所の井上義之弁護士。オンラインカジノが違法となるかどうかの基準は、このように非常にシンプルである。しかし2025年にはいって、違法賭博事件が相次...
-
釣りと密漁の違いは?知らなかったでは済まされない?事前にできることは?
知らなかったでは済まされないのが法律の世界であるが、全てを知ってから何かをするには少々手間がかかるし、最悪始めることすらできずに終わってしまうこともあり得る。教えてgooでも「釣りと密漁の境目はどこです...
-
カスハラとクレームの違いは?カスハラの法的責任は?企業がとるべき対応は?
東京都が、客からの迷惑行為などを称した「カスタマーハラスメント」、いわゆる「カスハラ」の防止を目的とした条例を、全国で初めて成立させた。条例に罰則はなく、2025年4月1日から施行される。 この動きは自治体...
-
なぜ批判コメントをするの?その心理と向き合い方をカウンセラーにきいた!
今や生活に必要不可欠となったインターネット。手軽に情報を得られるだけでなく、ネットを介したコミュニケーションも一般的となった。それと同時に顕在化しているのが、他者に対する辛らつな意見だ。ネットニュース...
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
実行時エラー 438になった時の...
-
VBAがブレークモードになっ...
-
実行時エラー3001「引数が間違...
-
なぜこんな初歩的なVBAのIf文で...
-
EXCEL VBAマクロ中断でデバッグ...
-
vbaのvlookup関数エラー原因を...
-
VBAでのエラー
-
実行時エラー -'-2147417848
-
Application.ActiveInspectorで...
-
【マクロ】エラー【#DIV/0!】が...
-
実行時エラー48発生時のDLL特定...
-
【VBA-AC2000】カレントプロシ...
-
VBAで、定数式が必要ですのエラ...
-
VB6+SQL サーバー 2000 で 実行...
-
Outlook.ApplicationをCreateOb...
-
VBAでピボットテーブルの作成(...
-
エクセルVBAで以下のようなコー...
-
OLEDB.NETで接続できない
-
トランスポートレベルのエラー
-
VBで構造体を使うさ際の64k...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
実行時エラー 438になった時の...
-
VBAがブレークモードになっ...
-
【マクロ】エラー【#DIV/0!】が...
-
なぜこんな初歩的なVBAのIf文で...
-
VBAでのエラー
-
実行時エラー -'-2147417848
-
実行時エラー48発生時のDLL特定...
-
マクロについて教えてください...
-
ExcelVBA Range クラスの Page...
-
EXCEL VBAマクロ中断でデバッグ...
-
実行時エラー3001「引数が間違...
-
EXCEL/VBAで、自分のPCだけエラ...
-
VB6+SQL サーバー 2000 で 実行...
-
VBAのエラー発生場所をメッセー...
-
ADODB.Streamを使用してUTF-8を...
-
【Excel VBA】マクロをボタンに...
-
OLEDB.NETで接続できない
-
なぜエラーになるのでしょうか...
-
INSERT INTOステートメント構文...
-
Outlook.ApplicationをCreateOb...
おすすめ情報
お言葉に甘えマクロのコピーを貼り付けようとしたのですが、文字オーバーになってしまいます。
なので 黄色くなっている式の辺りをコピーして貼り付けてみました。 黄色くなっているのは、金額の式です。計算は出来ています。補足欄を見つけるのもコピー貼り付けに気づくのもやっとこでした。
'--- 月別集計
'
Dout.Cells(G, L) = Dout.Cells(G, L) + Din.Cells(i, j + 5) '--- 数量
Dout.Cells(G, L + 1) = Dout.Cells(G, L + 1) + Din.Cells(i, j + 6) '--- 金額