ウォーターサーバーとコーヒーマシンが一体化した画期的マシン >>

エクセルのシートにマクロを動かすボタンが張り付いています。このボタンを削除する方法を検索で探したのですが、見つかりません。

A 回答 (2件)

「表示」→「ツールバー」→「VisualBasic」でツールバーを表示させた後、そのツールバーのデザインモードをクリック、マクロのボタンをクリック、deleteで消えます。

ツールバーがいらなければ、さっきのところでツールバーのチェックをはずす。
    • good
    • 17
この回答へのお礼

ありがとうございました。

見事に消すことが出来ました。

お礼日時:2008/03/21 09:24

こんにちは



シート保護がかかっていませんか。
解除は、ツール→保護→シート保護の解除。
ボタンにもコントロールツールボックスのボタンと
フォームのボタンがあるようです。
保護を外したら、マウス右ボタンで削除はできないですか。

では。
    • good
    • 6
この回答へのお礼

ありがとうございました。

無事に消えました。

お礼日時:2008/03/21 09:24

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

QExcelシート上のマクロを登録したボタンの削除が出来ません

過去ログを検索してもなかなか見つからなかった為、
お知恵を貸して頂ければ幸いです。

【前提】
・Excel製作者はすでに居ないので確認できない
・自分はマクロ(VBA)初心者です
・該当Excel使用者からの依頼です
・Excel2003使用

【現象】
Excelのシート上にマクロが登録された「消去」ボタンがあるのですが。
そのボタンを削除しようとしても削除できません。
表示→ツールバー→フォームでフォーム修正ができる状態にして
ボタンを右クリックして「Del」キーを押せば通常は消えるはずたと思うのですが。
なぜか「Del」キーを押すと、「消去」ボタンの上に「ボタン3」というボタンが張り付き
「消去」ボタンは残ったままです。
切り取りでも消えません。

移動させようとすると、移動先にも「消去」ボタンが増えます。
(元の位置にも消去ボタンが残ったままになる)
移動先に出来た「消去」ボタンはDelキーで削除可能なのですが。
元々の場所にある「消去」ボタンがどうしても消せません。

ブックやシートの保護がかかってるかと思いましたが
かかっていないようです。

作成した「ボタン」を保護する設定がかかっているのでしょうか?
詳しい方がいらっしゃいましたら、教えて頂ければと思います。

過去ログを検索してもなかなか見つからなかった為、
お知恵を貸して頂ければ幸いです。

【前提】
・Excel製作者はすでに居ないので確認できない
・自分はマクロ(VBA)初心者です
・該当Excel使用者からの依頼です
・Excel2003使用

【現象】
Excelのシート上にマクロが登録された「消去」ボタンがあるのですが。
そのボタンを削除しようとしても削除できません。
表示→ツールバー→フォームでフォーム修正ができる状態にして
ボタンを右クリックして「Del」キーを押せば通常は消えるはずたと思うの...続きを読む

Aベストアンサー

張り付いているのはフォームのボタンではなく、コントロールツールボックスのボタンなのではないですか?
表示→ツールバー→VisualBasicでマクロ関係のボタンを表示して三角定規のボタンを押して「デザインモード」にしてから選択して削除してみてください。

QInternetからExcelにコピーすると、ラジオボタン等もコピーされ、消えない

Internetなどから、画面そっくりをコピーしてExcelに貼り付けると、文字のリンクはいいとして、ラジオボタンやチェックボックスなども貼りつきます。
そして‥‥消えません。デリートを押そうが、行ごと消しても、消えません。
私は、仕方ないので、必要な情報だけ、別シートに移し変えてますが、それは面倒です。
どうやって消せばいいのでしょうか?

Aベストアンサー

コントロールツールボックスのツールバーを表示して「デザインモード」の
アイコン(青い三角定規)をクリックし、凹んだ状態にします。
そうすれば、ラジオボタンなどが削除できると思います。

Qマクロ実行ボタンを自動削除したい

エクセル2007をしています

マクロで次のような設定をしました

取り込んだデーターを別のエクセルファイルへコピー

数式が入っているので全体を値コピー

マクロボタンを削除

終了

ですがマクロボタンが消えません

元ファイルには必要ですがコピーしたものには必要ありません

マクロボタン削除を実行させるためにはどうすればいいですか

Aベストアンサー

No.3の回答者です。

No.2の補足についている内容を見ましたが、「ボタンを削除」というコードは含まれていないようです。ムダも多いようですよ。

これくらいのコードを読み解くようにしないと、マクロを使うのは危険です。データを破壊する可能性がありますから。

とりあず次のようなコードを追加すれば実現できると思いますけど、「ボタン 1」というのは、ボタンについているオブジェクト名で、これはそのときによって違いますし、コピーした際などに変化することもあるので扱いがちょっと面倒です。

ActiveSheet.Shapes("ボタン 1").Delete

コードを拝見したところ、シートを複製して挿入する必要性はなく、別ブックに新規シートを用意して、そちらに「データ変換」シートのセルをコピーして値貼り付けすればいいのでは?

QエクセルのIF関数で、文字が入力されていたならば~

エクセルのIF関数で文字が入力されていたならば~、という論理式を組み立てたいと思っています。

=IF(A1="『どんな文字でも』","",+B1-C1)

A1セルに『どんな文字でも』入っていたならば、空白に。
文字が入っていなければB1セルからC1セルを引く、という状態です。

この『どんな文字でも』の部分に何を入れればいいのか教えてください。

またIF関数以外でも同様のことができれば構いません。

宜しくお願いします。

Aベストアンサー

=IF(ISTEXT(A1),"",B1-C1)

でどうでしょうか?

QEXCEL VBA で現在開いているブックのファイル名を取得する方法

EXCEL2003 VBAで業務を簡素化するために、現在開いているブックのファイル名を取得する方法が分かりません。
作業手順をマクロを使って処理していますが、オリジナルのワークブックをファイル名を変えて保存し、以後、このワークブックを読み込んで使用しています。
このときのVBAは、オリジナルのファイル名を使っているため、ファイル名を変更するとエラーになり、以後の業務に使用できません。
常にファイル名を取得出来るVBAをどなたか、教えて下さい。

Aベストアンサー

>現在開いているブックのファイル名
 ちょっと曖昧な表現かなぁという気もいたしますが、VBAが書いてあるブックのブック名は
ThisWorkbook.Name
で、現在 "アクティブにして" 操作対象になっているブックの名前は
ActiveWorkbook.Name
ですね。

 しかし、
>VBAは、オリジナルのファイル名を使っているため、ファイル名を変更するとエラーになり
というような文脈からすると、
ThisWorkbook.Name
の方ですかね。

Qエクセルのシート上のコマンドボタンを編集したい

お世話になります
エクセルのシート上のコマンドボタンが配置
されています
これをそのまま、押すと、そのコマンドが実行されてしまいます
このコマンドボタンを編集したいのですが
ACCESSで言うところの、デザインモードにするには
どうしたらいいのでしょうか
よろしくお願いします

Aベストアンサー

コマンドボタンがボタンをクリックせずに編集する為には、コントロールツールボックスを表示する必要があります。

[表示]メニューから[ツールバー]を選択し、[コントロールツールボックス]にチェックを入れる。
ツールバーから[デザインモード]アイコンをクリックする。
(三角定規と定規と鉛筆の組み合わさったアイコンです)

QExcel 全シート上のボタンを削除 VBA

いつも大変お世話になっております。

Excelのシート上のボタンを削除したいと考えています。
ボタンはVBAで自動で作成してます。

Sub ButtonCreate()
With ActiveSheet.Buttons.Add(Range("C1").Left, _
Range("C1").Top, _
Range("C1").Width, _
Range("C1").Height)
.Characters.Text = "起動"
.Characters.Font.Size = 8
End With
End Sub

シート上にはグラフ等もあるため、
まとめてオブジェクトを消すという方法は取れません。
ボタンのみを消したいと思っています。


Worksheets("テスト").Activate
ActiveSheet.Buttons.Delete

と削除する方法を取っていますが、
他に方法はありますか?

BOOKを指定し、全シート上の
ボタンを削除する方法があれば、知りたいです。

回答よろしくお願い致します。

いつも大変お世話になっております。

Excelのシート上のボタンを削除したいと考えています。
ボタンはVBAで自動で作成してます。

Sub ButtonCreate()
With ActiveSheet.Buttons.Add(Range("C1").Left, _
Range("C1").Top, _
Range("C1").Width, _
Range("C1").Height)
.Characters.Text = "起動"
.Characters.Font.Size = 8
End With
End Sub

シート上にはグラフ等もあるため、
...続きを読む

Aベストアンサー

全シートのボタン削除はループを回して削除するだけです。

Sub test()
Dim W As Worksheet
For Each W In Worksheets
W.Buttons.Delete
Next W
End Sub

Q別のシートから値を取得するとき

Worksheets("シート名").Activate
上記のを行ってから別シートの値を取得するのですが、
この処理を行うと指定したシートへ強制的にとんでしまいます。。。

※イメージ
For ~ To ~
  Worksheets("シートA").Activate
  シートAの値取得
       :
  Worksheets("シートB").Activate
  シートBの値取得
Next

このイメージ処理を行うとものすごい勢いで画面がチカチカします。。。
シートを変えずに他のシートから値を取得する方法はないのでしょうか。
教えてください!

Aベストアンサー

Worksheets("シートA").Range("A1")

みたいな感じでできませんか?

QEXCELファイルのカレントフォルダを取得するには?

EXCELファイルのカレントフォルダを取得するには?

C:\経理\予算.xls

D:\2005年度\予算.xls

EXCEL97ファイルがあります。

VBAで
  カレントフォルダ名
(C:\経理\,D:\2005年度\)
を取得する事は可能でしょうか?

CURDIRでは上手い方法が見つかりませんでした。

Aベストアンサー

こんばんは。
Excel97 でも、同じですね。以下で試してみてください。

Sub test()
'このブックのパス
a = ThisWorkbook.Path
'アクティブブックのパス
b = ActiveWorkbook.Path
'Excelで設定されたデフォルトパス
c = Application.DefaultFilePath
'カレントディレクトリ
d = CurDir
MsgBox "このブックのパス   : " & a & Chr(13) & _
   "アクティブブックのパス: " & b & Chr(13) & _
   "デフォルトパス    : " & c & Chr(13) & _
   "カレントディレクトリ : " & d & Chr(13)
End Sub

QExcel:コマンドボタンの移動

エクセルシート内に埋め込んだコマンドボタンが、ソート処理などしていたら位置が移動した。元の場所へ戻したいが動かない。どうしたらいいか。

Aベストアンサー

エクセルのコマンドボタンを移動しようとしても、ボタンクリックになってしまう・・ということでよいでしょうか?

まず、
エクセルの
表示(V)

ツールバー(T)

Visual Basic
にチェックをいれます。はいっていたらこの作業はなしでいいです。

そうすると、
ツールバーのところに、トンカチマークボタンやら三角定規マークのボタンやらが追加で表示されているはずです。
この三角定規ボタン(デザインモード)をクリックします。
すると、コマンドボタンを移動することができるようになりますので、この状態でボタンを好きな位置に移動してください。

その後、再び三角定規ボタンを押してデザインモードを終了して終わりです。


このQ&Aを見た人がよく見るQ&A

人気Q&Aランキング