- ベストアンサー
マクロのコードについて
いつも大変お世話になっております。https://okwave.jp/qa/q9846043.html 以前、こちらで質問したものです。 実際、コードを入力したら、1上がったらオレンジに、1下がったら緑になりました。本当にありがとうございました。 その続きで、そのまま一旦保存し、次回には、3から4に上がったものでも、4のままで色を付けない状態にしたいのですが（数字はそのままで、色付きを色なしにしたい）可能でしょうか？マクロボタン？などでの対応できないでしょうか？ 説明が上手く出来ず、大変申し訳ありません。
- yokoyama0106
- お礼率34% (34/100)
- Excel（エクセル）
- 回答数2
- ありがとう数1
- みんなの回答 （2）
- 専門家の回答
関連するQ&A
- マクロのボタン（コード）について
いつも大変お世話になっております。https://okwave.jp/qa/q9884968.html で質問した者です。 マクロのボタンにコードを入力しましたが、エラーが出てしましました。（エラーは【マクロを実行できません。このブックでマクロが使用できないか、またはすべてのマクロが無効になっている可能性があります。】と出ました。） ネットでエラー検索し、 ①オプションのセキュリティーセンターでメッセージの表示にチェックを入れる。 ②マクロの設定で【警告を表示しすべてのマクロを無効にする】を選択する。 ③エクセルを開きなおす。 の3つのことをしてもエラーが出てしまいます。 私のやり方が何かおかしいでしょうか？ 他の何かの設定でしょうか？ （マクロのボタンを作成しそのボタン上で右クリックしマクロの登録マクロ名を選び、編集からコード入力をしました。） シート1に、1上がればオレンジに、1下がれば緑にのマクロが組んだままです。 これが悪さをするのでしょうか？
- 締切済み
- Excel（エクセル）
- マクロのコードについて
https://okwave.jp/qa/q9846043.html 以前こちらで質問しました。 ご丁寧にコードを教えてくださり、本当にありがたいです。 ただ、私の勉強不足で、マクロの使い方がわからないためこのコードを入れてもできませんでした。 コンパイルエラーで（Endsubがあるのに）Endsubがありません。と出てしまいます。 マクロでは、一行目に、 Sub マクロ名（） と入力してからコードを入力する でいいのでしょうか？
- 締切済み
- その他（パソコン）
- マクロのコードについて
いつも大変お世話になっております。 https://okwave.jp/qa/q9884968.htmlにて、質問した者です。 回答してくださった方のとおりにやってみたのですが、背景の色が消えません。 Sub ボタン1_Click() If Application.Intersect(Selection, Range("A1:F3")) Is Nothing _ Or Selection.Count > 1 Then Exit Sub End If Application.EnableEvents = False Selection.Interior.Color = xlNone Application.EnableEvents = True End Sub 上記のように教えていただき、コピペしてやってみたのですが、背景の色は変わらなかったです。 私のやり方がだめでしょうか？ マクロのボタンを作成し、コードを入力しました。 エラーも出たので、エラー検索し https://okwave.jp/qa/q9885232.html 上記も設定済です。 回答してくださった方々には大変失礼なことを聞いているのもわかっています。本当に申し訳ございません。
- 締切済み
- Excel（エクセル）
- マクロボタンのリセットについて
いつも大変お世話になっております。 以前こちらで、、、、https://okwave.jp/qa/q9846043.html を質問し、コードを教えていただき、シートにマクロが組まれた状態です。 今回はそのシートにマクロが組まれた状態で、マクロボタンを作成しそのボタンに、数字は守りつつ背景のカラーをリセットしたいボタンを作りコードを教えていただきました。 シートのマクロはうまくいくのですが、マクロボタンはうまくいきません。 私のやり方が間違っているのでしょうか？（『開発』→コントロールの『挿入』→フォームコントロールのボタン→『ボタン1_Click』と登録しました。） コードは以下です。 Sub ボタン1_Click() If Application.Intersect(Selection, Range("D16:CJ48")) Is Nothing _ Or Selection.Count > 1 Then Exit Sub End If Application.EnableEvents = False Selection.Interior.ColorIndex = xlNone Application.EnableEvents = True End Sub 誹謗中傷等ははお断りしています。
- ベストアンサー
- Excel（エクセル）
- 【Excelマクロ】指定した文字の行を色付け
以前、https://okwave.jp/qa/q10012573.html にてマクロで色付けする方法をご教示いただきました。 さらにE列に入力された指定の文字の行は違う色で色付けしたいのです。 (例) E列が”×”の行(A10～E10)をオレンジに色塗り 前回同様、条件付き書式は無しでお願いします。
- ベストアンサー
- Excel（エクセル）
- エクセルマクロのコードを隠す
とあるExcel2003で開けるxlsファイルを貰いました。 セルに値を入力すると、セルの背景の色が変わります。 そういうマクロを組んでいるんだと思ったのですが、 シートに対して「コードを表示する」で見ても何も書かれていません。 プロジェクト欄にはこのシートと[ThisWorkbook]しかなく、 [ThisWorkbook]にも何も書かれていません。 組んだマクロのコードを何かして隠しているのでしょうか？ それともエクセルの設定でそのようなことが可能なのでしょうか。
- ベストアンサー
- オフィス系ソフト
- マクロで教えてください。
つい先ほど、色を塗るというマクロは教えていただきました。 http://okwave.jp/qa/q7829474.html 次に、sheet1のA列にある図番を参照しsheet2のA列の機種名に適合しない行全体を 削除したいのですが、可能でしょうか？
- ベストアンサー
- オフィス系ソフト
- マクロでタイムレコーダーを作りたいのですが・・
マクロを使ってタイムレコーダーを作っています (マクロの勉強用です) ユーザーフォームで社員コードを入力し、出社をクリックすると エクセルシートに記録されるようにしたいのですが、どのように書けばいいか わかりません。 フォームにテキストボックスを作り、下に出社ボタンを作りました。 テキストボックスに数字を入力し、出社ボタンを押すというのが手順 なのですが、 社員コードから「どこに出社時刻を入力すればよいか」を判断させ、 ボタンを押した時刻を入力できるようにしたいです。 手順として、社員コードを入力し、出社ボタンを押すと、エクセルシートを 検索し、合致する社員コードを見つけ、見つかったらそこの列の今日の日付の 部分に時刻を入力・・となるのかな？と思うのですが。。 はっきりいってさっぱりです。。ご存知の方、ご教授ください。
- ベストアンサー
- Visual Basic
- 以下のマクロ実行と共に行の色を付けたい
https://sp.okwave.jp/qa/q9534560.html ↑ このマクロを実行したら挿入した行に色を付ける方法を教えて下さいますか？ 宜しくお願いします。
- ベストアンサー
- Excel（エクセル）
- モニターがうつりません
パソコンのモニターがうつらないです。 電源コードを入れると電源ランプが、緑になるのですがすぐにオレンジに変わってしまいます。一瞬も画面がうつらず黒いままです。電源のランプがオレンジになったあとに電源ボタンを押しても何の反応もありません。オレンジ色も消えません。電源コードを引き抜いてもう一度入れるとまた一瞬だけ緑になります。どうすれば直るのでしょうか？
- ベストアンサー
- その他([技術者向] コンピューター)
お礼
いつもいつも、本当にありがとうございます。