- 締切済み
エクセルでチェックボックスを使用してシートの抽出及び一括印刷
某HN クロメート(Chromate)（@CoalTar）の回答
- 某HN クロメート(Chromate)（@CoalTar）
- ベストアンサー率40% (705/1742)
明らかに、検証不足でしたm(_ _)m Sheet4は印刷されてしまいました 印刷に関することはVBAを使うことになりそうです すみませんでした
関連するQ&A
- エクセル2003のチェックボックス一括解除について
シート上にある、フォームで作成したチェックボックスに付けられたチェックを、 コントロールツールボックスで作成した、「ボタン」をクリックして、 一括に、チェックを外したいと思うのですが、 「ボタン」にVBAを記述して、このようなことは可能でしょうか? ご教授いただけます方、どうぞよろしくお願い申し上げます。
- ベストアンサー
- その他MS Office製品
- Excelチェックボックスのリンクするセル一括
Excelでチェックボックスのリンクするセルを一括設定したいです。 sheet１に複数のチェックボックスを作成し、それぞれのリンクするセルをsheet2に入れたいのですが、チェックボックスが数10個あるので、1つづつやっていると手間がかかります。 例 sheet1のB2のリンクするセルをsheet2のB2 sheet1のB3のリンクするセルをsheet2のB3 sheet1のB4はsheet2のB4 … 一括でやる方法（多分VBA)はわかりますか。
- ベストアンサー
- Excel（エクセル）
- エクセルシート上の［チェックボックス］を一括消去する方法を教えて下さい。
表示］→［ツールバー］→［フォーム］の、［チェックボックス］で作成した、エクセルシート上の［チェックボックス］を一括消去する方法を教えて下さい。右クリック選択して１個ずつ切り取り消去していますが、列削除や編集→クリア→すべて でも消去できず、たくさんあるときは手間がかかります。
- ベストアンサー
- その他（ビジネス・キャリア）
- Excel VBA 複数シートの一括印刷について
標記の件、御指導願います。 シート1：印刷設定（チェックボックスが印刷したいシート分あります） シート2～34：チェックボックスがオンである表題のシートを選択し一括で印刷する。 を、VBAで作ってみましたが、エラー（インデックスが有効範囲にありません）が出てしまいます。 Sub CheckBoxPrint() Dim ArrySheet() As String Dim I As Long Dim k As Long k = 0 For I = 1 To 33 If ActiveSheet.OLEObjects("CheckBox" & I).Object.Value = True Then ReDim Preserve ArrySheet(k) ArrySheet(k) = ActiveSheet.DrawingObjects("CheckBox" & I).Object.Caption k = k + 1 End If Next I ThisWorkbook.Worksheets(ArrySheet).PrintOut ←エラー（インデックスが有効範囲にありません） Erase ArrySheet End Sub このエラーを回避する方法を御指導してください。 よろしくお願い致します。
- ベストアンサー
- オフィス系ソフト
- エクセルのチェックボックスについて
エクセルで、フォームにて下記のようなチェックボックスを作りました。（Exel2003） □あいうえお □かきくけこ □さしすせそ □たちつてと そこで、チェックを入れた項目の文字だけを抽出して、他のセルに、上から順番に表示させることは可能でしょうか？（他のセルは、複数、一つを問いません） さらに欲をいうと、下記のように、抽出した項目の、上から順番に、項目の先頭に番号がふられるとうれしいのですが、このようなことは可能でしょうか? 例：か行とさ行にチェックを入れた場合 (1)かきくけこ (2)さしすせそ チェックしたものから抽出できるだけでも結構ですので、何かご存知の方がいらっしゃいましたら、何卒よろしくお願いいたします。
- ベストアンサー
- その他MS Office製品
- VBA チェックボックスをチェックした名前のみ抽出
数百名のリストからチェックした名前のみ抽出したいと思いまして。 1.シート1のA、C、E…奇数列にフォームのチェックボックスを配置 2.B、D、F…偶数列に名前を並べる 3.チェックボックスでクリックし、チェックマークが出る 4.マクロでSheet2のA列から抽出された名前を並べる 宜しくお願いします。
- ベストアンサー
- Visual Basic
- Ｅｘｃｅｌのチェックボックスについて
Ｅｘｃｅｌにてチェックボックスを使用した資料を作成しています。そこで教えていただきたいのですが、シート内に二つのチェックボックスがあり、一つにチェック入れると、もう一つにもチェックが入るようにしたいのですが・・・。もちろん、チェックを外すと、もう一つもチェックがはずれるようにしたい。どなたか教えていただけないでしょうか？
- ベストアンサー
- オフィス系ソフト
- エクセル：チェックボックスで他シート複数図形を操作
現在、エクセルにて sheet1に帳簿内容入力画面 sheet2に入力画面の項目を反映した印刷用帳簿 というものを作成しています。 その中で、sheet1にチェックボックスを１つ設置し、チェックONでsheet2任意の場所に ４個のオートシェイプの楕円を一括表示、チェックOFFで４つの楕円を一括消去、 とさせたいのですが、うまくいきません。 sheet1上にチェックボックス１個・楕円を１個設置し、 ------------------------------------------- Sub test01() With ActiveSheet If .CheckBoxes(Application.Caller).Value = xlOn Then worksheets("sheet2").Shapes("楕円１").Visible = True Else worksheets("sheet2").worksheets.Shapes("楕円１").Visible = False End If End With End Sub ------------------------------------------- とイベント設定をしたところ、チェックON/OFFで楕円１個の表示/非表示はできるように なりました。 残りの楕円２、３、４を構文内に色々当てはめてみましたが、エラーが出てしまいます。 どのように記述すれば一括表示できるでしょうか。 連投申し訳ないですが、詳しい方アドバイスを宜しくお願いします。
- 締切済み
- その他MS Office製品
- VBA チェックボックスをチェックした項目のみ抽出
1.シート1のA列にフォームのチェックボックスを配置 2.B列に名前を並べる 3.チェックボックスでクリックし、チェックマークが出る 4.マクロでシート2のA列から抽出された名前を並べる 以上のことをしたいと思い、検索しましたところ、似たようなものが見つかりました。 https://okwave.jp/qa/q5065347.html ただ、このVBAは抽出先がG列です。抽出先はシート２のA列にしたいのです。 .Cells(i, "G").Value = cb.TopLeftCell.Offset(, 1).Value これをどうしたら良いでしょうか？ 宜しくお願いします。
- ベストアンサー
- Visual Basic
- EXCELでチェックボックスの一括オンオフ
EXCEL2000を使用してます。 アンケート作成をしており、設問毎にチェックボックスで複数選択できるようにしていますが、１つの設問にチェックボックスが８～１０等多くあるため、設問毎にチェックボックスの一括オンオフができるようにしたいのです。 今は、次の記述で、ある設問のみ全てのチェックボックスにレが入りますが、はずす事ができません。 Sub チェック11_Click() ActiveSheet.CheckBoxes(Array(1, 2, 3)).Value = True End Sub どうすれば、チェック11のボックスで、オンオフができるのでしょうか？ どうか教えて頂きますよう、よろしくお願い致します。
- ベストアンサー
- その他MS Office製品