No.2ベストアンサー
- 回答日時:
こんな感じで如何でしょうか。
セル範囲を選択し、このマクロを実行すると、範囲内にあるチェックボックスの
チェックを外します。
Sub HaniChkOff()
Dim N As Integer
Dim HaniUp As Single
Dim HaniDown As Single
Dim HaniLeft As Single
Dim HaniRight As Single
With Selection
HaniUp = .Top
HaniDown = .Offset(.Rows.Count).Top
HaniLeft = .Left
HaniRight = .Offset(, .Columns.Count).Left
End With
With ActiveSheet
For N = 1 To .CheckBoxes.Count
With .CheckBoxes(N)
If .Top >= HaniUp And .Top < HaniDown And _
.Left >= HaniLeft And .Left < HaniRight Then
.Value = False
End If
End With
Next N
End With
End Sub
ご回答どうもありがとうございます。
教えていただきましたマクロで上手くいきました!
丸ごと書いてもらってしまい、どうもすみません…でもとても勉強になりました。
またわからないことがありましたらよろしくお願いいたします。
No.4
- 回答日時:
#3です。
> マクロでセル範囲を選択(C26:R48)して
この部分を読んでなかったです。
範囲固定ならこんな感じで良いかと思います。
Sub CheckOff2()
Dim cb As CheckBox
With ActiveSheet
For Each cb In .CheckBoxes
If Not Application.Intersect(cb.TopLeftCell, _
.Range("C26:R48")) Is Nothing Then cb.Value = False
Next cb
End With
End Sub
ご回答どうもありがとうございます。
教えていただきましたマクロで上手く動きました!
範囲固定のものまで書いていただきまして、とても勉強になりました。どこから手をつけたら良いのか全くわからなかったものですから…。
またわからないことがありましたらよろしくお願いいたします。
No.3
- 回答日時:
これで良いと思います。
Sub CheckOff()
Dim cb As CheckBox
If TypeName(Selection) <> "Range" Then Exit Sub
For Each cb In ActiveSheet.CheckBoxes
If Not Application.Intersect(cb.TopLeftCell, _
Selection) Is Nothing Then cb.Value = False
Next cb
End Sub
No.1
- 回答日時:
リンク先セルの TRUE を FALSEもしくは空白
にすれば?
(それぞれのリンク先をチェックボックスの配置してるセル位置にしてる場合)
早速のご回答ありがとうございます。
説明が足りなかったようですみません…。
チェックボックスはリンク先セルを設定していません。
そのチェックボックスは、チェックを入れると、同じ行にある複数のセルに○印を入れ、
チェックを消したら○印も消える、というマクロを作ってあります。
今作成していますのは、コマンドボタンをクリックすると、チェックボックスを含んだ行を増やす(既存の行をコピーして下の行に貼り付ける)マクロなのですが、
もしコピー元の行にチェック済みのチェックボックスがあった場合、貼りつけた先のチェックボックスにもチェックが入っているのでそれを全て自動で外したいということなのです(コピー元のチェックは外さないようにしたいです)。
何か良い方法がありましたら教えていただけませんでしょうか?
よろしくお願いします。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) 表内で、Enterキーで横→行の最後入力したら次の行の先頭に移動するマクロを作りたい 3 2022/05/01 21:19
- Excel(エクセル) Excelのプルダウンメニューの内容を人によって可変する方法 2 2023/03/28 14:52
- Visual Basic(VBA) Excelのマクロコードについて教えてください。 1 2022/03/27 13:25
- Excel(エクセル) エクセルの散布図で新たに入力した値のデータラベルが空欄になる現象 1 2022/04/26 09:31
- その他(Microsoft Office) 選択行の列範囲に二重線を引く 3 2022/06/08 12:21
- Excel(エクセル) マクロ セルの選択 5 2022/08/12 22:47
- Visual Basic(VBA) データのある範囲を選択するVBAについて 2 2022/09/03 00:20
- Excel(エクセル) エクセルVBA 複数行にまたがっている選択を判定するには 2 2023/05/21 21:54
- Excel(エクセル) 余計なお世話的な「入力規則」?対策は? 2 2023/01/14 12:39
- Access(アクセス) チェックボックスにチェックが入った後の挙動 1 2022/08/21 12:39
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
エクセルのチェックボックスを保護対象から外すには
Windows Vista・XP
-
エクセル チェックボックスの連動の範囲指定
Visual Basic(VBA)
-
エクセルでシート保護をかけるとチェックボックスが操作できない
Excel(エクセル)
-
-
4
Excel マクロ VBA プロシージャが大きすぎます のエラー対処方法
Visual Basic(VBA)
-
5
【VBA】シート上の複数のチェックボックスのうちどれか一つでも変更した場合のイベント
Visual Basic(VBA)
-
6
EXCEL VBAにて動的にCheckBOXを複数作成し、同BOXにイベントを追加したい
Visual Basic(VBA)
-
7
エクセルでチェックボックスをクリックしたらセルに数値を入力&消去
Excel(エクセル)
-
8
エクセルの、記録を終了したマクロに内容を追加したい
Excel(エクセル)
-
9
エクセル マクロの実行について
Excel(エクセル)
-
10
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
11
ExcelVBAを使って、値がある場合は作業を繰り返し実行するプログラムを作成したい。
Visual Basic(VBA)
-
12
エクセル チェックボックスの解除について(VBA)
Excel(エクセル)
-
13
VBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。
Excel(エクセル)
-
14
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
15
エクセルVBAでセル番地を指定してオブジェクト名取得
Excel(エクセル)
-
16
EXCEL あるセルに数字が入力されれば既存マクロ実行させたい
Excel(エクセル)
-
17
エクセルのチェックボックスで3つあるうち1つチェック入れたら自動的に残りにチェック出来ないようにするには
Excel(エクセル)
-
18
特定セルの内容を更新したら、その更新日を自動的に表示する方法について
Excel(エクセル)
-
19
UserForm1.Showでエラーになります。
工学
-
20
Excel チェックボックスにチェックが付いた複数のセルを別のシートにコピー・貼り付けするマクロを教
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
EXCELで特定のセルに表示...
-
現在のセルの位置を返す関数は...
-
エクセル 数字をすべて○などの...
-
Excel ハイパーリンクのURLを別...
-
Excel内での検索結果をシート...
-
フォントの色を指定して削除出...
-
クリックすると文章が表示され...
-
エクセルでページ数をあるセル...
-
Excelで、図形内の文字をセルに...
-
太字に設定されているセルの個...
-
エクセルでの検索ボックスの作...
-
エクセル 未入力セルがあると...
-
Excelで挿入した図をセルの中央...
-
excelで セルの移動時に...
-
エクセルである範囲のセルから...
-
エクセルでセルをダブルクリッ...
-
VBA 見つからなかった時の処理
-
エクセルマクロ 赤色の文字を検...
-
シート保護とグループ化機能を...
-
マクロでオートシェイプを表示...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
EXCELで特定のセルに表示...
-
エクセル 数字をすべて○などの...
-
Excel内での検索結果をシート...
-
太字に設定されているセルの個...
-
クリックすると文章が表示され...
-
Excelで挿入した図をセルの中央...
-
【マクロ】ファイル名の変更に...
-
Excelで、図形内の文字をセルに...
-
マクロを実行すると画像がズレ...
-
Excel ハイパーリンクのURLを別...
-
フォントの色を指定して削除出...
-
Excelでセルをクリックす...
-
Excel2007 色のカウント (VBA)
-
エクセルでの検索ボックスの作...
-
現在のセルの位置を返す関数は...
-
エクセル マクロ チェックボックス
-
VBA 見つからなかった時の処理
-
アポストロフィーの一括挿入 ...
-
エクセルでPDFリンクを大量...
-
セルの値が変ると自動でマクロ...
おすすめ情報