[[20171011202031]] 『5の倍数時に・・・』(タロウZ) ページの最後に飛ぶ

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

 

『5の倍数時に・・・』(タロウZ)

 5の倍数時に処理を行いたいのですが、
  下記では動作しないのですが、どうすればいいでしょうか?

 Sub 加工必要2()
    LastRow = Cells(Rows.Count, 1).End(xlUp).Row
    ハンイ = Range(Cells(1, 1), Cells(LastRow, 2))

     For i = LBound(ハンイ) To UBound(ハンイ)

        If ハンイ(i, 1).Value Mod 5 = 0 Then  '黄色くなり動かない
              ハンイ(i, 2) = "加工必要"
        End If
     Next
    Range(Cells(1, 3), Cells(LastRow, 4)) = ハンイ
 End Sub 

< 使用 Excel:Excel2016、使用 OS:Windows10 >


         If ハンイ(i, 1).Value
 配列はオブジェクトではないので.Valueはダメ。

(seiya) 2017/10/11(水) 20:28


 訳も分からず配列でやってるもので・・・
 .Valueをのけるとできました。
 ありがとうございました。

(タロウZ) 2017/10/11(水) 20:50


コメント返信:

[ 一覧(最新更新順) ]


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