Excel VBA質問箱 IV

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

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


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

41913 / 76732

←次へ　｜　前へ→


	【39893】Re:オプションボタンのグループ？を分けたい

Hiroko - 06/7/3(月) 18:27 -


	引用なし

	パスワード

▼いなばさん：
男女の区別･･･名簿がどのような形式で作成されているか分かりませんが･･･
普通は「男」と「女」のオプションボタン各一個で出来ると思いますが。
男女全てを入れるとオプションボタン３ケでいけるます。

If OptionButton1.Value = True Then
　 Selection.AutoFilter field:=10, Criteria1:="男"
　 Unload UserForm1
End If
If OptionButton2.Value = True Then
　 Selection.AutoFilter field:=10, Criteria1:="女"
　 Unload UserForm1
End If
　　'10は性別のフィールドを表している

If OptionButton3.Value = True Then
　 Selection.AutoFilter field:=10　'男女全て含む場合
　　Unload UserForm1

End If

0 hits

▼

【39887】オプションボタンのグループ？を分けたい いなば 06/7/3(月) 17:51