Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
3374 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【62628】年月XXを指定しSheets("XX月”）を呼び出したい mimikoqa 09/8/13(木) 14:23 質問[未読]
【62629】Re:年月XXを指定しSheets("XX月”）を... その 09/8/13(木) 14:33 回答[未読]
【62652】Re:年月XXを指定しSheets("XX月”）を... mimikoqa 09/8/19(水) 13:23 お礼[未読]
【62633】Re:年月XXを指定しSheets("XX月”）を... 脱　初心者 09/8/18(火) 13:30 発言[未読]
【62653】Re:年月XXを指定しSheets("XX月”）を... mimikoqa 09/8/19(水) 13:26 お礼[未読]
【62628】年月XXを指定しSheets("XX月”）を...
質問  mimikoqa  - 09/8/13(木) 14:23 -
引用なし
パスワード
   質問は「年月XXを指定しSheets("XX月”）を呼び出したい」がどうすればいいでしょうかというものです。具体的には、
処理データを指定する年月一覧表があるとし、ここでたとえば８月を指定します。例えば、次を利用します。
frmSetYYMM.Show
　　YYMMDD = Sheets("YYMM").Cells(5, 2).Value
　　YY = Year(YYMMDD)
　　MM = Month(YYMMDD)
ここで、MM=8が得られたとします。
一方、一年分の４月から翌３月までの生産データがWorkSheetsに蓄えられており、Sheets(4月）、Sheets（5月）、・・・Sheets(3月）に入っています。
ここで、課題は先に指定した８月分とそれにさかのぼり２ヶ月すなわち７月分、６月分のSheets(8月）、 Sheets(7月）、　Sheets(6月）をアクチブにして所要のデータを呼び出し処理したいのですが、この得られたMMとSheets（””）との関連付けがわかりません。
ご指導をよろしくお願いいたします。
【62629】Re:年月XXを指定しSheets("XX月”）...
回答  その  - 09/8/13(木) 14:33 -
引用なし
パスワード
   ▼mimikoqa さん：
>質問は「年月XXを指定しSheets("XX月”）を呼び出したい」がどうすればいいでしょうかというものです。具体的には、
>処理データを指定する年月一覧表があるとし、ここでたとえば８月を指定します。例えば、次を利用します。
>frmSetYYMM.Show
>　　YYMMDD = Sheets("YYMM").Cells(5, 2).Value
>　　YY = Year(YYMMDD)
>　　MM = Month(YYMMDD)
> ここで、MM=8が得られたとします。
>一方、一年分の４月から翌３月までの生産データがWorkSheetsに蓄えられており、Sheets(4月）、Sheets（5月）、・・・Sheets(3月）に入っています。
>ここで、課題は先に指定した８月分とそれにさかのぼり２ヶ月すなわち７月分、６月分のSheets(8月）、 Sheets(7月）、　Sheets(6月）をアクチブにして所要のデータを呼び出し処理したいのですが、この得られたMMとSheets（””）との関連付けがわかりません。
>ご指導をよろしくお願いいたします。

Sheets(MM & "月")で8月シート
Sheets(MM-1 & "月")で7月シート
以下同じ、または
For i = MM to MM-2 Step -1
でループ処理とかでしょうか。
【62633】Re:年月XXを指定しSheets("XX月”）...
発言  脱　初心者  - 09/8/18(火) 13:30 -
引用なし
パスワード
   >この得られたMMとSheets（””）との関連付けがわかりません。

この文章の具体的な説明を　放棄しているから
誰も答えられない状況を打破できないと
考えます。

回答者は、神様ではありません。

「言わなくても分かるはず」と考えている限り
絶対に解決しません。
【62652】Re:年月XXを指定しSheets("XX月”）...
お礼  mimikoqa  - 09/8/19(水) 13:23 -
引用なし
パスワード
   ▼その さん：
夏季休暇で確認が遅くなり失礼しました。
ご教示の通りで所望のSheetsを呼び出せました。
Sheets(MM & "月")の使い方が理解できていなかったのですね。
有難うございました。
なお、初めての投稿でしたので、どの程度まで記述すべきかがわからず、記述不足がありましたことをお詫びいたします。
>▼mimikoqa さん：
>>質問は「年月XXを指定しSheets("XX月”）を呼び出したい」がどうすればいいでしょうかというものです。具体的には、
>>処理データを指定する年月一覧表があるとし、ここでたとえば８月を指定します。例えば、次を利用します。
>>frmSetYYMM.Show
>>　　YYMMDD = Sheets("YYMM").Cells(5, 2).Value
>>　　YY = Year(YYMMDD)
>>　　MM = Month(YYMMDD)
>> ここで、MM=8が得られたとします。
>>一方、一年分の４月から翌３月までの生産データがWorkSheetsに蓄えられており、Sheets(4月）、Sheets（5月）、・・・Sheets(3月）に入っています。
>>ここで、課題は先に指定した８月分とそれにさかのぼり２ヶ月すなわち７月分、６月分のSheets(8月）、 Sheets(7月）、　Sheets(6月）をアクチブにして所要のデータを呼び出し処理したいのですが、この得られたMMとSheets（””）との関連付けがわかりません。
>>ご指導をよろしくお願いいたします。
>
>Sheets(MM & "月")で8月シート
>Sheets(MM-1 & "月")で7月シート
>以下同じ、または
>For i = MM to MM-2 Step -1
>でループ処理とかでしょうか。
【62653】Re:年月XXを指定しSheets("XX月”）...
お礼  mimikoqa  - 09/8/19(水) 13:26 -
引用なし
パスワード
   ▼脱　初心者 さん：
その　さんからのご回答で解決しました。
お手数をおかけしました。
ありがとうございました。

>>この得られたMMとSheets（””）との関連付けがわかりません。
>
>この文章の具体的な説明を　放棄しているから
>誰も答えられない状況を打破できないと
>考えます。
>
>回答者は、神様ではありません。
>
>「言わなくても分かるはず」と考えている限り
>絶対に解決しません。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
3374 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free