Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

41346 / 76736

←次へ　｜　前へ→


	【40471】Re:ユーザフォームのﾁｪｯｸボタンについて

ichinose - 06/7/14(金) 13:38 -


	引用なし

	パスワード

>
>ご返事ありがとうございます。でも、
>If Controls("checkbox" & Format(idx, "00")).Value Thenの部分で
>「オブジェクトが見つかりません」とエラーがでます。

チェックボックスのオブジェクト名が
「checkbox01」ではない
としか言えません。

既定の名前はcheckbox1と01ではないですが、
このあたりは問題ないですか？

又は、全角と半角などの確認もしてみて下さい。
それでも確認が出来ない場合は、

試しにUserform2にボタンをもう一つ作って

Private Sub CommandButton2_Click()
　　Dim ctrl As msforms.Control
　　For Each ctrl In Controls
　　　 If UCase(TypeName(ctrl)) = UCase("Checkbox") Then
　　　　　Debug.Print ctrl.name
　　　　　End If
　　　 Next
End Sub

上記のコードの実行で

イミディエイトウインドウに表示された結果を

見せてください

0 hits

▼

【40464】ユーザフォームのﾁｪｯｸボタンについて まっき 06/7/14(金) 11:05