質問: マクロにて最終入力セルを選択し、それ以降の行を閉じる よろしくお願いします。 例えば、 a列に文字を入力しています(入力範囲はa1:a300) a15が最後の入力となりました。 a16以降の行をa300まで閉じる。 このマクロを、他のシートからマクロにて選択したときに処理をしたいのですが。 環境は、xp・2003です。
回答: #01です >下記の!a65536"は、どのような意味があるのでしょうか? シートの最下行から上方向に検索して最後の行を見つけるということです(office2003までは最下行が65536行になる) 301行よりも下にデータがあるなら lastr = worksheets(ws).range("a300").end(xlup).row に変更してください