No.3ベストアンサー
- 回答日時:
#1です。
補足に関して全セル対象なら
Private Sub Worksheet_Change(ByVal Target As Range)
Worksheets("sheet2").Cells.Font.Size = 12
End Sub
範囲指定するなら
Private Sub Worksheet_Change(ByVal Target As Range)
Worksheets("sheet2").Range("a1:c10").Font.Size = 12
End Sub
上記の真中の行を#1と組み合わせて使うこと。
Sheet1のどこを変化させてもフォント設定が行われる。それで宜しいか。変化を反映させるセルを限定するなら、また別の知識が必要です。マクロの初めはイベントに手を出すのは難しいと言うことです。
No.2
- 回答日時:
関数をつくればどうでしょう?
ツール->マクロ->Visual Basic Editor を選び
挿入->標準モジュール を選びます
そこに
Function hoge(dum As Range)
'↓↓↓ここに好きな命令を書いてください。
MsgBox "aaa" ' 例です
'↑↑↑ここまで
End Function
等を書きます。
一旦保存して
EXCELのシートに戻りましょう
特定のセルB2が変わったらでしたね
B2以外のセル(範囲外のセル)に =hoge(B2)
って入れてください 複数でしたら B2:C5など出来ます
Worksheet_Changeは他のセルが変わった時もイベント(処理)が
されますので 非常に時間がかかりますよ。
No.1
- 回答日時:
シート(Sheet1と仮定)のメニューで、ツール-マクロ-VBEをクリックする。
VBE画面になりますが、そのVBAProjectの中のシート名等のツリー表示の中に、Sheet1があると
思いますので、そこをダブルクリックします。
すると画面が出てきます。その上部の(General)の▼をクリックして、「Worksheet]をクリック
、右の(Declarations)の▼をクリックして
「Change」をクリックします。
Private Sub Worksheet_Change(ByVal Target As Range)
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
End Sub
下のSelectionChange部分が出てしまったら、範囲指定して、Delキーで抹消してください。
間の行にプログラムコードを打ち込んでください。
シート(Sheet1)に戻り、どこかのセルにデータを入れて、予想通りなるかチェックします。
Changeイベントは色々欠点もあるイベントですが
自分が使う程度なら使い物になるでしょう。
もう一つ、変化を捉え変化させると、このイベントに該当し、処理がぐるぐる回りになることです。
それで一旦その働きを止めて、処理が終わると、元へ戻してます。なかなか初めての場合は難しいです。
下記は右隣のセルに+10した数をセットしてます。
漢字をいれたら?->他人に使ってもらうには、チェックがどんどん必要になり、コードが増えます(略)。さらに知識が必要になります。実用に耐えるマクロを作るのは難しいですよ。
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
Target.Offset(0, 1) = Target + 10
Application.EnableEvents = True
End Sub
この回答への補足
ありがとうございました。sheet1に数値入力したらsheet2のフォントサイズを12に変更したいのです。回答のtarget部分をsheet2select range指定 font指定にしてみましたがフォントサイズは変化しませんでした。すみません 重ねて教えて頂けたら幸せます。
補足日時:2004/10/31 13:14お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
見学に行くとしたら【天国】と【地獄】どっち?
みなさんは、一度だけ見学に行けるとしたら【天国】と【地獄】どちらに行きたいですか? 理由も聞きたいです。
-
ちょっと先の未来クイズ第6問
2025年1月2日と1月3日に行われる、第101回箱根駅伝(東京箱根間往復大学駅伝競走)で、上位3位に入賞するチームはどこでしょう?
-
自分独自の健康法はある?
こうしていると調子がいい!みたいな自分独自の健康法、こだわりはありますか?
-
【選手権お題その1】これってもしかして自分だけかもしれないな…と思うあるあるを教えてください
「出身中学と出身高校が混ざったような校舎にいる夢を見る」「まぶたがピクピクしてるので鏡で確認しようとしたらピクピクが止まってしまう」など、 これってもしかして自分だけかもしれないな…と思うあるあるを教えてください
-
【大喜利】【投稿~1/20】 追い込まれた犯人が咄嗟に言った一言とは?
【お題】追い込まれた犯人が咄嗟に言った一言とは?
-
Excel VBA あるセルでENTERを押すと特定のセルへ移動したい
Excel(エクセル)
-
特定のセルがアクティブになったときのイベント?
Excel(エクセル)
-
エクセルで、セルに値を入力して確定した時(フォーカスが隣に移動した時)に発生するイベントを教えてください!
Excel(エクセル)
-
-
4
Enterキーでマクロを起動さす。
その他(ソフトウェア)
-
5
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
6
エクセルのVBA 特定のセルでエンターキーでマクロ実行
Excel(エクセル)
-
7
値を入力後、自動的にアクティブセルが移動するマクロ
Excel(エクセル)
-
8
ユーザーフォームを表示中にシートの操作をさせるには
Excel(エクセル)
-
9
エクセルVBAのフォームを最前面にする方法を教えてください。
Visual Basic(VBA)
-
10
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
11
セルが移動した時に値の代入を行いたい
その他(コンピューター・テクノロジー)
-
12
エクセルvba (ByVal Target As Range)について
Excel(エクセル)
-
13
Enterキーで順番にセルの移動する。
Visual Basic(VBA)
-
14
VBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。
Excel(エクセル)
-
15
エクセルVBAで、条件に一致するセルへ移動
Excel(エクセル)
-
16
エクセルでエンターを押すと任意のセルに移動は出来ますか?
その他(コンピューター・テクノロジー)
-
17
VBAでダブルコーテーション入りの数式をセルにセットしたい
Visual Basic(VBA)
-
18
エクセル イベントマクロ Changeイベントを複数作りたい
Access(アクセス)
-
19
ExcelのVBA。public変数の値が消える
Visual Basic(VBA)
-
20
【VBA】Worksheet_changeイベントで特定のキーが押されたときだけ無効にしたい
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・集中するためにやっていること
- ・テレビやラジオに出たことがある人、いますか?
- ・【お題】斜め上を行くスキー場にありがちなこと
- ・人生でいちばんスベッた瞬間
- ・コーピングについて教えてください
- ・あなたの「プチ贅沢」はなんですか?
- ・コンビニでおにぎりを買うときのスタメンはどの具?
- ・おすすめの美術館・博物館、教えてください!
- ・ことしの初夢、何だった?
- ・【お題】大変な警告
- ・【大喜利】【投稿~1/20】 追い込まれた犯人が咄嗟に言った一言とは?
- ・洋服何着持ってますか?
- ・みんなの【マイ・ベスト積読2024】を教えてください。
- ・「これいらなくない?」という慣習、教えてください
- ・今から楽しみな予定はありますか?
- ・AIツールの活用方法を教えて
- ・【お題】逆襲の桃太郎
- ・自分独自の健康法はある?
- ・最強の防寒、あったか術を教えてください!
- ・【大喜利】【投稿~1/9】 忍者がやってるYouTubeが炎上してしまった理由
- ・歳とったな〜〜と思ったことは?
- ・モテ期を経験した方いらっしゃいますか?
- ・好きな人を振り向かせるためにしたこと
- ・スマホに会話を聞かれているな!?と思ったことありますか?
- ・それもChatGPT!?と驚いた使用方法を教えてください
- ・見学に行くとしたら【天国】と【地獄】どっち?
- ・これまでで一番「情けなかったとき」はいつですか?
- ・この人頭いいなと思ったエピソード
- ・あなたの「必」の書き順を教えてください
- ・14歳の自分に衝撃の事実を告げてください
- ・人生最悪の忘れ物
- ・あなたの習慣について教えてください!!
- ・都道府県穴埋めゲーム
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
EXCELで特定のセルに表示...
-
エクセル 数字をすべて○などの...
-
Excel内での検索結果をシート...
-
Excelで、図形内の文字をセルに...
-
クリックすると文章が表示され...
-
太字に設定されているセルの個...
-
Excel ハイパーリンクのURLを別...
-
アポストロフィーの一括挿入 ...
-
Excelでセルをクリックす...
-
Excel:セルの値(文字列)を数...
-
フォントの色を指定して削除出...
-
エクセル 未入力セルがあると...
-
マクロを実行すると画像がズレ...
-
ページ内ハイパーリンクの表示...
-
現在のセルの位置を返す関数は...
-
セルの内容をテキストボックス...
-
空白セルを空セルに置き換える...
-
セルがクリックされた回数をカ...
-
エクセルでページ数をあるセル...
-
excelで セルの移動時に...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
EXCELで特定のセルに表示...
-
Excel内での検索結果をシート...
-
エクセル 数字をすべて○などの...
-
クリックすると文章が表示され...
-
Excelで、図形内の文字をセルに...
-
太字に設定されているセルの個...
-
Excel ハイパーリンクのURLを別...
-
Excelでセルをクリックす...
-
マクロを実行すると画像がズレ...
-
【EXCEL】先週の月曜日の日付を...
-
現在のセルの位置を返す関数は...
-
フォントの色を指定して削除出...
-
セルがクリックされた回数をカ...
-
エクセル 未入力セルがあると...
-
セルの内容をテキストボックス...
-
エクセルでPDFリンクを大量...
-
エクセルでページ数をあるセル...
-
アポストロフィーの一括挿入 ...
-
Excel2007 色のカウント (VBA)
-
エクセルでセルをダブルクリッ...
おすすめ情報