[[20200731110613]] 『VBA438エラーの対処が分かりません』(Kさん) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『VBA438エラーの対処が分かりません』(Kさん)

表題の件につきまして,教えていただきたいです.

Excel VBA マクロのエラー 438 「オブジェクトは、このプロパティまたはメソッドをサポートしていません。」が表示されるのですが原因が特定できずに困っております.下記コードの最終行でエラーが発生します.

dim navy_sum as double
navy_sum=4.123456789
Sheets(1).Cells(32, 2).End (xlUp) - navy_sum ←ここでエラー発生

なおSheets(1).Cells(32, 2).End (xlUp)=150.15で,
イミディエイトウィンドウで
?Sheets(1).Cells(32, 2).End (xlUp)-4.123456789
と試してみると,

 146.027701603435 
と無事に表示されています.

どなたかお力添えをお願いいたします.

< 使用 Excel:Office365、使用 OS:Windows10 >


「Sheets(1).Cells(32, 2).End (xlUp) - navy_sum」は引き算しているだけであり、どの変数に結果を格納するのか書いていませんよ?
(???) 2020/07/31(金) 11:31

???さま

ありがとうございます!
初歩中の初歩の誤りでしたね.
自分の不出来さに思わず笑ってしまいました.
1時間弱悩んでいましたので大変助かりました!!
(Kさん) 2020/07/31(金) 11:36


コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.