VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日： 2006/04/07(Fri) 13:16
投稿者： ダンボ
ＵＲＬ：
タイトル： コンパイルエラーになるのですが

EXCEL2000のVBAです。

cmdLOCKという名前のコマンドボタンを持ったアクティブシートに対して
ForceLockという関数を2通りの方法でコーディング/コールしてみました。
方式1は問題無いのですが、方式2ではForceLockの中で、
「コンパイルエラー　メソッドまたはデータメンバが見つかりません。」
が起きます。cmdLOCKが理解できないということらしいです。
どうしてエラーになるのでしょうか？ActiveSheet以外でもこの関数は
使いたいので方式2でコーディングしたいのですが。

(方式1)
Call ForceLock()とコールする
Public Function ForceLock()
With ActiveSheet
    .Protect UserInterfaceOnly:=True
    .cmdLOCK.Caption = "シート保護をはずす"
End With
End Function

(方式2)
Call ForceLock(ActiveSheet)とコールする
Public Function ForceLock(ST As Worksheet)
With ST
    .Protect UserInterfaceOnly:=True
    .cmdLOCK.Caption = "シート保護をはずす"
End With
End Function

- 関連一覧ツリー （★ をクリックするとツリー全体を一括表示します）
- 返信フォーム （この記事に返信する場合は下記フォームから投稿して下さい）

- VBレスキュー(花ちゃん) - - Web Forum -