エクセルコードについて

質問

エクセルコードについて
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
　　If Target.Row >= 1 And Target.Row <= 10 And Target.Column >= 1 And
Target.Column <= 10 Then
　　　　If Target.Value = "○" Then
　　　　　　Target.Value = ""
　　　　Else
　　　　　　Target.Value = "○"
　　　　End If
　　　　Cancel = True
　　End If
End Sub
ではセルA1～J10ですが、これをA1～A10などに変更するのにはどのようにすればよろしいでしょうか。

回答No.2

nag0720

＞例えばC1～C10だけをこの動作をさせたい場合

　　If Target.Row >= 1 And Target.Row <= 10 And Target.Column >= 1 And
Target.Column <= 10 Then

この文は、
「行(Row)が1～10、列(Column)がA～Jのとき」
という意味です。
列(Column)は、Aが1、Bが2、Cが3、Dが4、・・・のような対応になっています。

列(Column)をCだけにして、C1～C10にしたい場合は、

　　If Target.Row >= 1 And Target.Row <= 10 And Target.Column = 3 Then

となります。

回答No.1

nag0720

If Target.Row >= 1 And Target.Row <= 10 And Target.Column >= 1 And
Target.Column <= 10 Then

↓

　　If Target.Row >= 1 And Target.Row <= 10 And Target.Column = 1 Then

お礼

ありがとうございます。
追加で申し訳ないですが、セルの範囲を指定するときはどうすればよろしいでしょうか。
例えばC1～C10だけをこの動作をさせたい場合