Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


42812 / 76732 ←次へ | 前へ→

【38982】Re:初心者ですがよろしくお願いします
質問  taka  - 06/6/15(木) 16:37 -

引用なし
パスワード
   ▼Jaka さん:
>シート名が数字のまんまってのは、インデックス番号と間違えるから、
>あまり使いたくないけど...。
>
>Private Sub Worksheet_Change(ByVal Target As Range)
>Dim st As String
>If Target.Address(0, 0) = "A1" Then
>  If IsNumeric(Target.Value) Then
>   If Target.Value > "0" And Target.Value <= "50" Then
>     st = Target.Value
>     Application.EnableEvents = False
>     Range("B1").Value = Sheets(st).Range("B1").Value
>     Application.EnableEvents = True
>   End If
>  End If
>End If
>End Sub

ありがとうございます。私は本当に初心者なのでよくわかりませんが。
教えていただいたコマンドはどこへ記述すればよいのですか?

0 hits

【38974】初心者ですがよろしくお願いします taka 06/6/15(木) 15:59 質問
【38977】Re:初心者ですがよろしくお願いします Blue 06/6/15(木) 16:23 質問
【38978】Re:初心者ですがよろしくお願いします taka 06/6/15(木) 16:28 質問
【38979】Re:初心者ですがよろしくお願いします Jaka 06/6/15(木) 16:31 発言
【38982】Re:初心者ですがよろしくお願いします taka 06/6/15(木) 16:37 質問
【38983】Re:初心者ですがよろしくお願いします Blue 06/6/15(木) 16:38 発言
【38988】Re:初心者ですがよろしくお願いします taka 06/6/15(木) 16:49 質問
【38990】Re:初心者ですがよろしくお願いします Blue 06/6/15(木) 17:02 発言
【39017】Re:初心者ですがよろしくお願いします taka 06/6/16(金) 9:22 お礼
【39018】Re:初心者ですがよろしくお願いします Blue 06/6/16(金) 9:25 質問
【39019】Re:初心者ですがよろしくお願いします taka 06/6/16(金) 9:30 質問
【39020】Re:初心者ですがよろしくお願いします Blue 06/6/16(金) 9:36 発言

42812 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free