
・Sheet1(コード)
Private Sub CommandButton1_Click()
Call aaa
End Sub
・Module1(コード)
Sub aaa()
Dim wb As Workbook
Dim ws As Worksheet
Workbooks.Open ("c:\test.xls")
Set wb = Workbooks("test.xls")
Set ws = wb.Worksheets("Sheet1")
wb.ws.Range("A2").Value = "CCC"
End Sub
wb.ws.Range("A2").Value = "CCC"の部分で
以下の実行エラーが出ます。
------------------------------------------------------------------------
実行時エラー'438':
オブジェクトは、このプロパティまたはメソッドをサポートしていません。
------------------------------------------------------------------------
Set wb = Workbooks("test.xls")
Set ws = wb.Worksheets("Sheet1")
の部分で特にエラーも出ないので、オブジェクトの取得は成功していると
思うのですが、WorkSheetオブジェクトのwsからRangeメソッドを呼ぶことが
できません。
動かない原因と対策を教えてください!!
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
「Columns("A:C")」の列文字を...
-
worksheetFunctionクラスのVloo...
-
VBAで既に開いている別アプリケ...
-
テキストボックス中の文字列の...
-
エクセルのVBAの標準モジュール...
-
VBAについてです。 初心者です...
-
VBScriptからDLL参照設定したい
-
VBA:オートシェイプの線の長...
-
表示されるまで待たせたい
-
VBAからPDFファイルにパスワー...
-
InternetExplorer.Application...
-
findメソッドの変数について
-
オブジェクト名が同じ図形の変更
-
Excelのシート上にtextboxを作...
-
UserForm1.Showでエラーになり...
-
エクセルでダウンロードするには?
-
パソコンへの「Dropbox...
-
VBA シートのボタン名を変更し...
-
コントロールの存在確認
-
VBAでオプションボタンによって...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
worksheetFunctionクラスのVloo...
-
「Columns("A:C")」の列文字を...
-
テキストボックス中の文字列の...
-
エクセルのVBAの標準モジュール...
-
Excelでフィルタをかけると警告...
-
実行時エラー 3265「要求された...
-
上下の位置揃えについて
-
ExcelVBAでのNZ関数について
-
VBAで既に開いている別アプリケ...
-
VBAで Set wb = Sheets(1).Cop...
-
AccessVBAで「dim dbs as datab...
-
EXCEL VBA オートシェイプナン...
-
オブジェクト変数またはWITHブ...
-
[VBA]CDOメッセージ送信エラー
-
エクセルマクロエラー「'Cells'...
-
findメソッドの変数について
-
オブジェクトが見つかりません
-
ある文字列が全て数字であるか...
-
オブジェクト変数の取得について
-
CreateObjectとGetObjectの違い
おすすめ情報