Excel VBA質問箱 IV

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

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


6338 / 13644 ツリー ←次へ | 前へ→

【45827】日付から曜日を表示したい Wz 07/1/15(月) 14:53 質問[未読]
【45828】Re:日付から曜日を表示したい ぱっせんじゃー 07/1/15(月) 14:59 発言[未読]
【45829】Re:日付から曜日を表示したい Wz 07/1/15(月) 15:19 お礼[未読]
【45831】Re:日付から曜日を表示したい ひげくま 07/1/15(月) 16:16 発言[未読]
【45832】Re:日付から曜日を表示したい Wz 07/1/15(月) 16:23 お礼[未読]

【45827】日付から曜日を表示したい
質問  Wz  - 07/1/15(月) 14:53 -

引用なし
パスワード
   お世話になります。

日付が入力してあるセルの隣に曜日を表示するマクロを作っています。
内容自体は単純だと思うのですがエラーが出て困っています。

A列に日付、B列に曜日とするとこんな感じになると思うのですが

Range("B2").Value = WeekdayName(Weekday(RC[-1],1), True, 1)


これだとRC[-1]のところでエラーが出てしまいます。
かといって絶対指定だと下にコピーできませんし。。。

相対参照を使うことができないとなるとどうしたらいいでしょうか。
ご教授よろしくおねがいしますm(__)m

【45828】Re:日付から曜日を表示したい
発言  ぱっせんじゃー  - 07/1/15(月) 14:59 -

引用なし
パスワード
   Offset
を使ってみてはいかがでしょう?

【45829】Re:日付から曜日を表示したい
お礼  Wz  - 07/1/15(月) 15:19 -

引用なし
パスワード
   ▼ぱっせんじゃー さん:
>Offset
>を使ってみてはいかがでしょう?

おお、できましたー
For Eachとoffsetを使ったらうまくいきました。

簡単なことなのに失念してましたね(^^;

どうもありがとうございました!

【45831】Re:日付から曜日を表示したい
発言  ひげくま  - 07/1/15(月) 16:16 -

引用なし
パスワード
   ▼Wz さん:
こんにちは。

解決したようなので、もう必要ないかもしれませんが、とりあえず参考までに。

B列のセルに、
=IF(RC[-1]="","",RC[-1])
という計算式を書き、セルの書式−表示形式−ユーザー定義で、
aaa
とすれば、A列に日付を入力すると、B列に曜日が表示されます。

また、A列の表示形式を
yyyy/mm/dd(aaa)
とすれば、A列に日付を入力するだけで表示は
2006/01/15(月)
となり、
yyyy"年"mm"月"dd"日"(aaa)
とすれば、
2006年01月15日(月)
となります。
これだと、A列だけで済みます。

【45832】Re:日付から曜日を表示したい
お礼  Wz  - 07/1/15(月) 16:23 -

引用なし
パスワード
   ▼ひげくま さん:
>B列のセルに、
>=IF(RC[-1]="","",RC[-1])
>という計算式を書き、セルの書式−表示形式−ユーザー定義で、
>aaa
>とすれば、A列に日付を入力すると、B列に曜日が表示されます。
>
>また、A列の表示形式を
>yyyy/mm/dd(aaa)
>とすれば、A列に日付を入力するだけで表示は
>2006/01/15(月)
>となり、
>yyyy"年"mm"月"dd"日"(aaa)
>とすれば、
>2006年01月15日(月)
>となります。
>これだと、A列だけで済みます。

なるほど!
表示形式で(aaa)なんてものがあったんですねぇ
これは便利ですね。
今回は解決しましたが、今後もすごく役にたちそうです。

ありがとうございます!

6338 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free