Excel（エクセル）活用コミュの日にちのぶんだけ名前を入れたい

はじめまして。

皆様お忙しいところ大変申し訳ないのですが、お力をお貸しいただけたら幸いです。
使っているのは、Windows XP、Excel 2003です。

エクセルやマクロについては、初心者です。

寮の管理をエクセルでおこなっているのですが、その表については写真に示しているような形になります。(かなり簡略化して示しています。)

今年の５月から来年の４月分まで、１２シート使って作っています。

列Aには、寮の部屋番号が書き入れてあります。
列Bには先月末までその部屋にいた人が自動的に入力されるようになっています。

Totalのところは、counta関数を使って、その日に寮にいる人数を示しています。

『何日から何日まで』といったデータを入れると、その日にち分だけ入力される、といった機能があれば、とても作業が楽になるのですが、どうやってやればいいのか全く見当が付きません。

おそらくマクロを組むのだろうとは思うのですが・・・。

疑問としては、

１．今現在ある表だけでは、例えばセルC6は、６月１日のデータであると認識するのか？
(認識すると言う言い方はおかしいと思いますが・・・。他に表現が見つかりません・・すみません・・・。）

２．他のシートに入力フォームのようなものを作成し、リンクさせる方が良いのか？

というところです。

要領を得ない質問で、大変申し訳ないのですが、どうかお力添えをよろしくお願いします。

コメント(11)

最初
全て
最新の40件

[1] mixiユーザー 05月02日 22:40

質問の意図が分からないけど、なにをやりたいの？

マクロ組まなくても、入力したいセルをドラッグしておいて、
名前入力後の確定のEnterの代わりにCtrl+Enterで済むんじゃないの？

[2] mixiユーザー 05月02日 23:04

>『何日から何日まで』といったデータを入れると、その日にち分だけ入力される、

「Takako」さんが、6/2～8/31まで、部屋番号2に…
と入力すると、12ヶ月分のシートに表示される。

ということですか？
かなり頭の体操になりそうだ…

[3] mixiユーザー 05月02日 23:07

シートを一つ使って、1年分のデータを入力するようにしておいて、
各月のはそこから表示するようにすれば、入力も楽そうですね。

[4] mixiユーザー 05月02日 23:24

私もkenicさんの案に賛成です。
そうしたときに、個人的には月別の表示用のシートは保護
して、うっかり編集・削除など制限しておきたいところです。

あと、どの程度の部屋数を管理されているかにもよりますが、
200部屋を越えない位であれば、入力用のシート構成は列行の
配置を逆に管理する方が好みです。

[5] mixiユーザー 05月02日 23:58

ドラッグ等でセルを選んで名前を入力し、CTRL＋ENTERで選んだセルすべてに同じ名前を入れることができます。
マクロを利用するのであれば、１～３１の列を用意し
Sub 名前入力()

Dim 開始日 As Integer
Dim 終了日 As Integer
Dim a As Range
Dim b As Range

部屋 = InputBox("部屋の番号は？")
名前 = InputBox("名前は？")
開始 = InputBox("何日から")
終了 = InputBox("何日まで？")
開始日 = Int(開始)
終了日 = Int(終了)
if 開始日<1 or 終了日>31 then
msgbox("存在しない日です")
endif
Range(Cells(部屋 + 5, 開始日), Cells(部屋 + 5, 終了日)).Select
Selection.Value = 名前
End Sub

ただし、次の月が選べませんOTL
カレンダーと連動させるなら話は別ですが

[6] mixiユーザー 05月03日 00:43

お暇なため、誰に求められたわけでもありませんが、
入力用シート（x年分）と表示シート（6月分）のイメージ
を作ってみました。

ごっちんさん＞
もしもご興味あれば、ご覧になって下さい。
マクロは使わず、関数のみです。
＃というか、私はマクロ組めません（笑）

[7] mixiユーザー 05月03日 10:03

すごい！！皆様、本当にありがとうございます

MILANOさん＞
Ctrl＋Enterは知りませんでした・・スミマセン

たつや.com さん＞
そうです

厳密に言うと、6/2～8/31までだと、6月・7月・8月分のシートに入力されるという感じです。

kenicさん＞
なるほど、そうすればよかったんですね！
部屋数は全部で50部屋くらいですので、一つのシートで大丈夫そうです！

ＳＭＹさん＞
実際に作成までしてくださって、本当に、本当に、助かりました・・・

VLOOKUP関数は、こういうときに使えるんですね～！！
是非やってみます

　ありがとうございます！

デジタさん＞
Ctrl+Enterのような、基本的操作も知らず、すみませんでした

マクロのアドバイスもしていただいて、ありがとうございます！
いまマクロ勉強中なんで、練習の意味もこめて、一度やってみます

また、本日中に取り組んで、結果を報告させていただきます。

[10] mixiユーザー 05月03日 18:59

if～endif の間に　exit sub が抜けていましたOTL
ちなみに、　部屋＋５は　部屋＝行　と　5行目からという意味で、同じように列を入力数字から始まりますが、＋５とかにすれば6列目指定になります

ラベルの使用、入力時点での半角、最高最低数字の指定なども入れるとエラーが出ないので使いやすくなります。（マクロの記録ではコードが出ないので参考書などの参照を推奨）
by VBA暦3ヶ月

[11] mixiユーザー 05月03日 19:03

関数

ログインすると、みんなのコメントがもっと見れるよ