[[20150619165556]] 『Bookを指定するには』(iwasita) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『Bookを指定するには』(iwasita)

以下マクロに於いて対象Bookを指定する方法を教授ください。
列は指定しているのでOKなのですが、
複数Bookが開いているときに別のBookに謝って転記してしまうことがあるためです
指定Book名:“歩掛け一覧”です
よろしくお願いします。

Private Sub CommandButton3_Click()
With ActiveCell

    If .Column <> 13 Then
        MsgBox "M列ではありません"
    Else
            .MergeArea.ClearContents
            ActiveCell = ListView1.SelectedItem.SubItems(6)
    ActiveCell.Offset(2, 0).Select
    End If
    AppActivate Application.Caption
End With
End Sub

< 使用 Excel:Excel2013、使用 OS:Windows7 >


    If ActiveWorkbook.Name = "歩掛け一覧" Then
(???) 2015/06/19(金) 17:30

???さん
ありがとうございます。
例えばBookが違う場合コメントで
“対象Bookが違います”などの警告をだすことは可能でしょうか?
よろしくお願いします。
(iwasita) 2015/06/19(金) 19:10

 横から失礼します。

 >例えばBookが違う場合コメントで 
 >“対象Bookが違います”などの警告をだすことは可能でしょうか? 

 ???さんが

 >If ActiveWorkbook.Name = "歩掛け一覧" Then

 と提示されてますので、構文の意味は調べてみましたか?
 調べて見たら答えは自ずと出てくると思いますが。

 If ○ = □ Then

 逆だったら?

 If ○ <> □ Then

(カリーニン) 2015/06/19(金) 20:00


カリーニンさん
ありがとうございました。
出張のため返事が遅くなりました。
すみません
いろいろと試してみます。

(iwasita) 2015/06/25(木) 15:37


コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.