- ベストアンサー
Excel シート内を全削除する方法
社内のWebページの入力フォームをExcelに貼り付けました。 すると、一部はセルに値が入り、一部はテキストボックス(?)として貼り付きました。このセルに入った値を別のシートで参照することにしました。そのシートに貼り付いているものを一度全てクリアして貼り付け直したいのですが、クリアする方法をご教授下さい。 普通に全選択から削除すればセルの値しか削除されません。テキストボックス(?)は、画像のように選択できないので、選択-右クリックから削除ができません。シートごと削除すれば、参照が消えます。もちろんそのまま上から貼り付けても良さそうですが、テキストボックスが何重にも貼り付くことになりそうです。
- buzhidao
- お礼率88% (288/325)
- オフィス系ソフト
- 回答数2
- ありがとう数5
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
マクロを無効にした状態で 編集→ジャンプ→セル選択→「オブジェクト」にチェック でオブジェクトが選択されます。 この状態でDeleteキーで削除できます。 これで削除できないものがある場合は、ゼザインモードに してから実行してみてください。
その他の回答 (1)
- xls88
- ベストアンサー率56% (669/1189)
マクロを試して見てください。 Sub test1() ActiveSheet.DrawingObjects.Select End Sub
お礼
まだ職場で試してないのですが、家でやった限りうまくいきそうです。 ありがとうございました。(^^)
関連するQ&A
- Excelでの複数シートへの値の入力
おはようございます。 Excel2000で複数のシートを選択した状態でセルに値を入力すると、他のシートの同じセルに内容が入力されますよね。 この機能の名称はわかりませんが・・・(^_^;) これをヒントに「フォーム内にあるTextBoxに入力された値を各シートのセルに入力しよう」というVBAのソースを作ってみましたが、 実行してみると選択されている1枚目のシートにしか値が入力されません。 汚いソースをみなさんに見せるのは恥ずかしいのですが、 是非実現したいので、どこが間違っているか指摘をいただけると幸いです。 やろうとしていること： フォームのテキストボックスに値を入力し、 コマンドボタンを押すとシートを複数枚選択し、 各シートのセル”A1”（AからDまでを結合）に値を入力する。 ******************************************* Private Sub CommandButton1_Click() 'テキストボックスの値取得と、店名の合成 Dim myTmei As String Dim myTmei2 As String myTmei = TextBox1.Text myTmei2 = "店名" & myTmei 'シートの選択 Sheets(Array(5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46)).Select '値の入力 Range("A1").Select Range("A1").Value = myTmei2 End Sub ****************************************** 結果を見ると、シート自体は選択できているのですが、 その中でも「アクティブになっている(?)シート（1枚目）のセルだけに値を入力しなさいよ。」と書いてしまったようで、 「全てのシートのセル”A1”に入力しなさい。」という部分が書けていないのだと思うのです。 Selectだけじゃ、ダメなのかな・・・ どうかよろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- 消去方法がわかりません。
ＶＢＡ初心者です。 現在フォーム上にテキストボックスを設置。 その中にSheet1の指定した範囲の値を表示させるようになっています。（RowSource) テキストボックスに表示されている列を選択して コマンドコマンドボタンを押すと、選択された データがクリアー（Sheet1から削除）されるという 作業は出来ますか？
- 締切済み
- Visual Basic
- エクセルのシート参照
Sheet1で入力した値をSheet2で参照させたい時、 Sheet1で入力したセルの行を削除してから挿入をして 値を入力させると、Sheet2のセルが「#REF!」と 表示されてしまいます。 行を削除して、挿入しても正しい値を参照させることは 可能ですか？
- ベストアンサー
- オフィス系ソフト
- エクセルシート上の［チェックボックス］を一括消去する方法を教えて下さい。
表示］→［ツールバー］→［フォーム］の、［チェックボックス］で作成した、エクセルシート上の［チェックボックス］を一括消去する方法を教えて下さい。右クリック選択して１個ずつ切り取り消去していますが、列削除や編集→クリア→すべて でも消去できず、たくさんあるときは手間がかかります。
- ベストアンサー
- その他（ビジネス・キャリア）
- エクセルのユーザーフォームについて
エクセルマクロのユーザーフォームのテキストボックスに セルの値を表示する方法で質問です。 ユーザーフォームを表示するとその時点での セルの値はテキストボックスに表示されているのですが ユーザーフォームを表示したまま 別のブックのセルを選んだ際に そのセルの内容がテキストボックスに表示されるようにしたいです。 ボタンや、なにかをするわけではなく 自分で任意のセルを選択したら、という事です。 ユーザーフォームには selectionchange などがないのでどうすれば良いかわかりません。 宜しくお願いします。
- ベストアンサー
- Excel（エクセル）
- エクセルについて質問です。
ユーザーフォームの使い方で、テキストボックスやコンボボックスのControlSourceを,フォームを開いたのとは別のシートのセルにあてたいんですけど、できますか？ 同様に、コンボボックスのRowSourceのリストも、別のシートの値を拾いたいんです。 具体的に言えば、ユーザーフォームを開くのは、常に「Sheet1」であって、入力した内容を表示するのは「Sheet2」なのです。 コンボボックスのリストは本当は、「Sheet3」の値を拾いたいのです。 今はよくわからないので、全部「Sheet1」にリンク（？）させて、値を取得させるようにしてます。 それと、セルの数式の中に別のセルの数値を代入できますか？ 例えば、あるセルの数式が「＝Ｓｈｅｅｔ２！Ａ４」だとしましょう。 この場合の「Ｓｈｅｅｔ２」の「２」に、例えば、ある別のセルの値を代入して、 「＝Ｓｈｅｅｔ３！Ａ４」とかにしたいのです。 つまり「＝Ｓｈｅｅｔ”Ａ１”！Ａ４」みたいにして、「Ａ１」のセルの値が 「２」、「３」に変われば元の数式も変わる、みたいに。 同じように、セルの範囲につけた名前や、リンクするファイルの名前も数式の変数に入れられるのでしょうか？ とりあえず、セルの数式の中に、別のセルの値を”文字”や”数値”として入れたいのです。 ちょっと説明がわかりにくいかもしれないけど、教えて下さい。
- ベストアンサー
- オフィス系ソフト
- 入力途中の入力した値をすべて削除する方法
フォームの入力値をクリア フォーム上にいくつかのテキストボックス、コンボボックスを配して入力してます。 入力途中に入力した値をすべて(削除)にして再入力したい。 現状、削除コマンドのクリック時に Me.Undo 又は Me.コントロール名Undo として試していますが、クリアされずフォームを閉じてテーブルを確認すると入力 した値がテーブルに追加されてしまいます 教えてください。
- ベストアンサー
- その他(データベース)
- 入力途中で入力して値をすべて削除する方法
フォームの入力値をクリア フォーム上にいくつかのテキストボックス、コンボボックスを配して入力してます。 入力途中に入力した値をすべて(削除)にして再入力したい。 現状、削除コマンドのクリック時に Me.Undo 又は Me.コントロール名Undo として試していますが、クリアされずフォームを閉じてテーブルを確認すると入力 した値がテーブルに追加されてしまいます 教えてください
- ベストアンサー
- その他(データベース)
- Excel VBA ListBoxについて
お世話になります。 Excelで以下のようなフォーム画面を作成しております。 １．フォーム画面には、リストボックス、テキストボックス、登録ボタンを設定 ２．リストボックスには、Sheet１のデータが表示される。 ３．リストボックスのレコードを選択すると、選択した値がテキストボックスに表示される。 ４．登録ボタンをクリックすると、テキストボックスのデータが、Sheet１に反映される。 今1～３まではできましたが、４で悩んでおります。 テキストボックスの値を取得してセルに反映させようと以下のコードを書きました。 'リストボックスで選択したレコード数 ListNo = Me.ListBox1.ListIndex 'TextBox1の値を、Sheet1のセルにセット Sheets("sheet1").Cells(ListNo, 1).Value = Me.TextBox1.Value これを実行すると、何故かここから３のリストボックスのレコードをクリックしたイベントを呼びます。 Private Sub ListBox1_Click() クリックしてもいないのですが、Private Sub ListBox1_Click() を呼ばないようにしたいので、 ListBoxをEnableプロパティをfalseにしても、呼んでました。 呼びにいかない方法をご教授いただけますでしょうか。 よろしくお願いいたします。
- ベストアンサー
- Visual Basic
- エクセルのワークシート上のテキストボックスのずれ
エクセルのワークシート上に(ユーザーフォームではなく) コントロールツールボックスからテキストボックスをいくつか作成しました。 そのテキストボックスをそれぞれ選択(アクティブ？マウスオーバー？)すると テキストボックスの大きさが微妙に変化してしまうのですが、回避する方法はないでしょうか？ 微妙というのは、テキストボックスの下・右にそれぞれ枠線1本分ほどです。 エクセルのバージョンは2003です。 どうぞよろしくお願いいたします。
- ベストアンサー
- その他MS Office製品
お礼
まだ職場で試してないのですが、家でやった限りうまくいきそうです。 ありがとうございました。(^^)