ワークシートをアクティブにするには
ワークシート.Activate

で良いけど、現在アクティブなシートは何かってどうやったら判別出来るんでしょうか？