人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

エクセルのマクロについての質問です。回答くださった方には、100ポイント差し上げます。
ファイルは、1?12月のカレンダーが入った家族のスケジュールファイルです。
シートは、「200801」から「200812」まで、12のシートに分かれています。
組みたいマクロは、ファイルを開く度に、前回の最終保存に左右されることなく、
当月のシートが選択されているというものです。
(例:本日10/18に開いたら200810シートが選択されている)
どうぞよろしくお願いいたします。

●質問者: cane100
●カテゴリ:コンピュータ
✍キーワード:エクセル カレンダー スケジュール ファイル ポイント
○ 状態 :終了
└ 回答数 : 2/2件

▽最新の回答へ

1 ● SALINGER
●50ポイント

VBEの画面からプロジェクトエクスプローラのThisWorkbookをクリックして開く画面に以下のマクロを貼り付けてください。


Private Sub Workbook_Open()

Dim str As String

str = Year(Now) & Month(Now)

' str = StrConv(str, vbWide)

On Error Resume Next

Worksheets(str).Activate

On Error GoTo 0

End Sub


シート名が全角の場合は、コメントになっているところのコメントを外してください。

http://q.hatena.ne.jp/

◎質問者からの返答

早速の回答、ありがとうございました。動作確認できましたが、実はシート目名が「200810」ではなく、「0810」なのです。4桁ではうまく起動しなかったのですが、「200810」と6桁に直したところ、思いどおりに起動しました。何か対策がありますでしょうか。


2 ● SALINGER
●50ポイント
 str = Year(Now) & Month(Now)

 str = Format(Now, "yymm")

でどうでしょう。

http://q.hatena.ne.jp/

関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ