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月”)を呼び出したい」がどうすればいいでしょうかというものです。具体的には、
処理データを指定する年月一覧表があるとし、ここでたとえば8月を指定します。例えば、次を利用します。
frmSetYYMM.Show
  YYMMDD = Sheets("YYMM").Cells(5, 2).Value
  YY = Year(YYMMDD)
  MM = Month(YYMMDD)
ここで、MM=8が得られたとします。
一方、一年分の4月から翌3月までの生産データがWorkSheetsに蓄えられており、Sheets(4月)、Sheets(5月)、・・・Sheets(3月)に入っています。
ここで、課題は先に指定した8月分とそれにさかのぼり2ヶ月すなわち7月分、6月分のSheets(8月)、 Sheets(7月)、 Sheets(6月)をアクチブにして所要のデータを呼び出し処理したいのですが、この得られたMMとSheets(””)との関連付けがわかりません。
ご指導をよろしくお願いいたします。

【62629】Re:年月XXを指定しSheets("XX月”)...
回答  その  - 09/8/13(木) 14:33 -

引用なし
パスワード
   ▼mimikoqa さん:
>質問は「年月XXを指定しSheets("XX月”)を呼び出したい」がどうすればいいでしょうかというものです。具体的には、
>処理データを指定する年月一覧表があるとし、ここでたとえば8月を指定します。例えば、次を利用します。
>frmSetYYMM.Show
>  YYMMDD = Sheets("YYMM").Cells(5, 2).Value
>  YY = Year(YYMMDD)
>  MM = Month(YYMMDD)
> ここで、MM=8が得られたとします。
>一方、一年分の4月から翌3月までの生産データがWorkSheetsに蓄えられており、Sheets(4月)、Sheets(5月)、・・・Sheets(3月)に入っています。
>ここで、課題は先に指定した8月分とそれにさかのぼり2ヶ月すなわち7月分、6月分の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月”)を呼び出したい」がどうすればいいでしょうかというものです。具体的には、
>>処理データを指定する年月一覧表があるとし、ここでたとえば8月を指定します。例えば、次を利用します。
>>frmSetYYMM.Show
>>  YYMMDD = Sheets("YYMM").Cells(5, 2).Value
>>  YY = Year(YYMMDD)
>>  MM = Month(YYMMDD)
>> ここで、MM=8が得られたとします。
>>一方、一年分の4月から翌3月までの生産データがWorkSheetsに蓄えられており、Sheets(4月)、Sheets(5月)、・・・Sheets(3月)に入っています。
>>ここで、課題は先に指定した8月分とそれにさかのぼり2ヶ月すなわち7月分、6月分の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