2016-11-30 5 views
0

ExcelでVBAを使用してコーディングしています。 私の質問はやや複雑ですが、機能は単純です。Cell.Valueが同じ値であることを確認します.IF Not Then

私は、細胞が、親細胞に追従させるためにしようとしています。私に説明してみましょう:C2スルーA2は、「親セル」C3スルーA3が「フォロワーセル」

ユーザーの意志入力「フォロワー細胞の日付である 細胞である

1 A    B    C 
    2 29/11/16  30/11/16  1/12/16 
    3    30/11/16 

細胞親細胞 'は、次の 『』 『親細胞』は動的であり、そのような時間をかけてそのプロパティを変更します:

1 A    B    C 
    2 30/11/16  1/12/16   2/12/16 
    3 30/11/16 

私の問題は、私は「フォロワー細胞」を持っている必要があり、上記に示したものと同様に、自動的に「親セル」を辿ることです。

私はコーディング開始していると私はIF elseステートメントを使用して、さまざまなソリューションを設計しようとしたが、それは私が知っている限りであり、そのは私にとってあまりにも複雑になったが、私はさまざまなサイトから学び、コードを実行しようとしています。

私はこの上の専門家からの助けを必要としています。

答えて

0

セルA2〜C2は、=Today(),=$A$2+1=$A2+2などの値を持つのですか?

それはケースがある場合は、別の日にブックを開いたとき、それが開かれたとき、これらの値が自動的に変更されますので、移動するには、「フォロワー細胞」をトリガーする方法はありません。

Private Sub Workbook_Open() 

    If Range("A2").Value <> DateValue(Now()) Then 
     Range("A2").Value = DateValue(Now()) 
     ' Code to move "follower cells" 
    End If 

End Sub 

はそれが当てはまらない場合は、私に教えてください:。

私は(B2が=$A$2+1することができ、C2は=$A2+2することができます)と、ブックが開かれたときにそれを変更A2に値を書きます

関連する問題