[[20060630102823]]　『シートの選択』（てつ）　ページの最後に飛ぶ

『シートの選択』（てつ）

 こんにちわ。
 昨日はなんか書き込みができませんでした･･･
 シートの指定の仕方について教えてください。
 マクロを実施しシートが追加されたファイルがあるとします。
 その追加されたシート名は変換表というシートなのですが
 その前にあった元のシート名を取得することは可能ですか？
 はじめに実行したマクロの中ではms_main という名前で定義してました。
 元のシートは今回は1枚だけでしたが，次回以降何枚かはわかりません。

 同じプロシージャ内で記入していますが，
 マクロ1実行（変換表シート追加）
 変換表に追記（手作業）
 マクロ2実行　というふうにおこないたいのです。

 宜しくお願いします。

 追加です（すいません）
 シート名を列挙して選択なら出来そうな気がしてきましたが･･･

 >その前にあった元のシート名を取得することは可能ですか？
 その前とは、「変換表」というシートの手前（左）のシート名ということでしょうか？
 Sheet(Sheets.Count-1).Name
 とか、そういうことでしょうか？
　
 （キリキ）(〃⌒o⌒)b

キリキさんありがとうございます。

 そうなんですが，目で見て確認して指定できればと思っていたのですが･･･
 マクロでファイルを開くときに選択できますよね･･･
 そのような感じでシート一覧が出てきて，シートを選択できるようなもの
 があればっと追加したんですが･･･　でも結局見当たりませんでしたが。
 （今回はシートを挿入しているので一番後ろのシートを選択したかったので）

 とりあえず仕方なく

 On Error GoTo er
    ActiveSheet.Next.Select
    ActiveSheet.Next.Select
    ActiveSheet.Next.Select
 er:
 （後はそのまま･･･）
 このような式を追加しました。

 しかし確実性ではやはり目でみて指定できればなっと思いますが，
 そのような参考マクロが見つかりません。　（てつ）

 >シート一覧
 アクティブブックにしか対応してないけど...。
http://www.vbalab.net/vbaqa/c-board.cgi?cmd=ntr;tree=20704;id=excel
 (Jaka)

 Application.CommandBars("WorkBook Tabs").ShowPopup
 これでなんとか対応します。　ありがとうございました。

コメント返信：

[ 一覧(最新更新順) ]

[[20060630102823]] 『シートの選択』（てつ） ページの最後に飛ぶ

[[20060630102823]]　『シートの選択』（てつ）　ページの最後に飛ぶ