Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

12995 / 76734

←次へ　｜　前へ→


	【69250】Changeについて

今担当者 - 11/6/14(火) 22:32 -


	引用なし

	パスワード

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

以前の担当者が、下記のようなマクロを作っているのですが、
このマクロでＸ列にDateが表示されます。
あたしには、Ｅ列に表示されるようなマクロにしか見えないのですが、
どうしてＸ列なのでしょうか？
教えてください。

Private Sub Worksheet_Change(ByVal Target As Range)
　　Dim 範囲左 As Integer
　　Dim 範囲右 As Integer
　　Dim 範囲上 As Integer
　　
　　範囲左 = 1
　　範囲右 = 4
　　範囲上 = 2
　　
　　With Target
　　　　If .Column >= 範囲左 And .Column <= 範囲右 _
　　　　　And .Row >= 範囲上 Then
　　　　　　Cells(.Row, 範囲右 + 1).Value = Date
　　　　End If
　　End With
End Sub

7 hits

▼

【69250】Changeについて 今担当者 11/6/14(火) 22:32

≪