セルに指定された行にマクロを開く

Question

シートを開く必要があるセル "B1"に指定しました（=一致（TODAY（）、A：A、0））。

そして、その行のExcelシートを自動的に開きたいと思います。 （例：行10 =今日）

VBAでは "= today（）"関数を使用できますか？

私はVBAのなかのノブなので、私を助けてくれますか？

Private Sub Worksheet_Activate() 
    Cells(Range("B1").Value, "A").Select 
End Sub 

ワークシートが開かれると、適切なセルが自動的にSelected次のようになります：ワークシートのコード領域で、次のイベントマクロ

Answer 1

場所

ので、それはワークシートのコードです、それはインストールすると、自動的に使用するのは簡単です：

1. 右クリックしてExcelウィンドウ
2. の底部付近にタブ名はコードの表示を選択する - 場合

をしてものを貼り付け、VBEウィンドウを閉じ

これはVBEのウィンドウが表示されますあなたは心配があります、まずトライアルワークシートで試してみてください。

ブックを保存すると、マクロが保存されます。 後で2003その後、Excelのバージョンを使用している場合は、マクロを削除するにはかなりの.xlsx

より.xlsmとして にファイルを保存する必要があります。

1. が
上記のようVBEウィンドウを持ち出しますアウト
2. はクリアコード
3. 参照、一般的にはマクロの詳細についてはVBEウィンドウに

を閉じる：

http://www.mvps.org/dmcritchie/excel/getstarted.htm

と

http://msdn.microsoft.com/en-us/library/ee814735(v=office.14).aspx

イベントマクロ（ワークシートのコード）の詳細については、以下を参照してください。これが動作するために

http://www.mvps.org/dmcritchie/excel/event.htm

マクロを有効にする必要があります！

EDIT＃1：

は、ファイルが開かれているのと同じ動作を取得するには、代わりに以前のマクロを残し、ワークブックコード領域にこのマクロを置く：

Private Sub Workbook_Open() 
    Application.EnableEvents = False 
     Sheets("Sheet1").Select 
     Cells(Range("B1").Value, "A").Select 
    Application.EnableEvents = True 
End Sub 

（シート1をワークシートの名前に置き換えます）