|
▼りん さん:
こんばんは。
>
>>>下記のset命令で「 Worksheetsメソッドが失敗しました」
>メソッド?
ですよねえ・・・、
でもこのエラー、ありそうなんですよね!!
Sub test()
Sheet1.OLEObjects("commandbutton1").Object.Caption = "aaa"
End Sub
このコードでSheet1にCommandbutton1を配置しないで実行すると、
1004 'OLEObjects' メソッドは失敗しました: '_Worksheet' オブジェクト
なんていうエラーが発生するので・・。
>
>>>Sub set1(n As Byte)
>>> Const CB As String = "CommandButton"
>>> Dim S As Worksheet
>>> Dim i As Byte
>>>
>>> 'Set S = Worksheets("設定")
>>> For i = 1 To n
>>> Sheet1.OLEObjects(CB & Format(i)).Object.Caption = Worksheets("設定").Cells(i + 1, 1).Value
>>> book1(i - 1) = Worksheets("設定").Cells(i + 1, 2).Value
>>> Next i
>>>End Sub
>>このエラーが発生したときにExcel上に開かれている
>>ブックはいくつありますか?
>>提示されたVBAコードを含むブックだけですか?
>>(気になるのは、「設定」と付けられたシートがどこにあるかですが・・・)
>>Worksheetsの前(Workbooks)を明示するとエラーがなくなるかも。
>Win98&XL2kで組んだマクロをXP&XPに持っていったら、ActiveSheetかActiveWorkbookの認識失敗でエラーになったことがありました。原因はわからないし、再現もできませんが。
ブックの上位互換の問題なんでしょうかねえ?
私もサンプルを作って試してみます。
|
|