• ベストアンサー

回転させられる出勤表

大小2つの円を重ね合わせて出勤回転盤を作って使っていました。もう数年使用しているため作り替えたいと思っています。 円にこだわっているわけではないのでどのような感じになっても良いです。現在は、4人サイクル、早番2人、遅番2人。それぞれに仕事がAとBというパターンがあります。いいアイデアを募集しております。お願いいたします。

質問者が選んだベストアンサー

  • ベストアンサー
noname#77757
noname#77757
回答No.1

 慣れてしまえば使いやすくなります。厚紙表紙に出勤簿を紐で綴じたものを早番・遅番・AとBの別に作成してタイトルを大きく書いておけば簡単でいいのではないかと思います。

sakuchan7474
質問者

お礼

ありがとうございました。教えていただいたように作成し使用しております。

関連するQ&A

  • エクセルです。とある条件下で固有名詞を別のシートに反映!(2)

    いつもお世話になっています。 さて、前回の質問を若干、手直しました。 Sheet1です。    A    B    C    D 1      1日   2日   3日 2 鈴木  早番  遅番  休み 3 木村  休み  休み  遅番 4 田中  遅番  早番  早番 以上のように打ち込んであったとして、 これを別の表で1日に早番で出勤する人、遅番で出勤する人をそのまま名前で抽出したいのです。(以下のような感じです)     A    B    C    D  6      1日   2日   3日  7 早番  鈴木  田中  田中  8  9 遅番  田中  鈴木  木村   10 11 休み  木村  木村  鈴木 上記のような状態から更に急遽、1日に休みの木村が急遽、早番になり、結果として二人になったり、あるいは1日に早番の鈴木と遅番の田中が急に入れかわったりした時に 自動で修正してくれる表が欲しいのです。 どうぞ宜しくお願い申し上げます。

  • エクセルです。とある条件下で固有名詞を別のシートに反映させたい!

    いつもお世話になっています。 さて、今回は以下のような問題なのですが、出来ますでしょうか? Sheet1です。    A    B    C    D 1      1日   2日   3日 2 鈴木  早番  遅番  休み 3 木村  休み  休み  遅番 4 田中  遅番  早番  早番 以上のように打ち込んであったとして、 これを別の表で1日に早番で出勤する人、遅番で出勤する人をそのまま名前で抽出したいのです。(以下のような感じです)    A    B    C    D 6      1日   2日   3日 7 早番  鈴木  田中  田中 8 遅番  田中  鈴木  木村   9 休み  木村  木村  鈴木 簡単なのかもしれませんが、私には分かりません。 どうぞ宜しくお願い申し上げます。  

  • エクセルの勤務表(マクロ)についての質問です。

    エクセルの勤務表から、日付別に出勤者とその出勤者の勤務を抜き出すマクロを作りたいのですが、途中で分からなくなってしまい困っています。 初めまして。私はマクロを初めてまだ、2ヶ月の初心者でございます。 質問内容に、不手際がありましたら、ご容赦ください。 勤務表マスタには勤務表があり、それ以外にsheet1 からsheet30まで、30枚のシートを用意しておき、日付別にsheet1に4月1日の勤務者とその出勤者の勤務を(早番はB3から下に表示し、遅番はB8下に表示するようにします。)抜き出し、同じようにしてsheet2には、4月2日の勤務者とその出勤者の勤務を、同じように、それぞれB3とB8に抜き出し…というように、30日分抜きだしたいのです。休みの人は表示しません(画像写真を参照願います。見にくい写真で恐縮でございます。) <勤務表マスタ> 名前 4月1日 4月2日 4月3日 4月4日… 坂本 遅番 早番 遅番 休み… 井端 早番 休み 早番 遅番… 長野 遅番 早番 早番 早番… 阿部 遅番 遅番 遅番 早番… 村田 休み 早番 遅番 遅番… 高橋 早番 遅番 休み 遅番… <sheet1=4月1日> (B3、C3から下に) 井端 早番 高橋 早番 (B8、C8から下に) 坂本 遅番 長野 遅番 まずは、勤務表から4月1日だけをとりあえず抜き出そうと、マクロを作って、勤務表マスタから、sheet1である、4月1日には、転記できたのですが、同じように、sheet2(4月2日)、 sheet3(4月3日)…と勤務表マスタから、各シートに転記するには、どうすれば良いのか?分からなくなってしまいました。 力技で、このマクロの「Sheet1」の部分を「Sheet2」にするようにしてといった感じで、あと30個書けば、できるような気もしますが、膨大な行数になりますし、何か他の方法をと考えたのですが、まだまだ、初心者で、どうすれば良いのか全く思いつきません。ここまで、インターネットで調べたりして、何とか作ったもので、全く幼稚なマクロかと思いますが、なにとぞ、ご鞭撻のほど、よろしくお願い致します。 Public Sub test() Dim strSerch1 As String Dim strSerch2 As String Dim LastRow As Long Dim i As Long, j As Long, k As Long '検索する文字を以下の二つの変数に代入 strSerch1 = "早番" strSerch2 = "遅番" 'Sheet1に「早番」の人をリスト化するための変数を設定 '最初に入れるのが3行目なのでjに3を代入 j = 3 With Worksheets("勤務表マスタ") '.Cells(.Rows.Count, 1).End(xlUp).Rowで最後の行がどこなのか調べて 'LastRow変数に代入する。 LastRow = .Cells(.Rows.Count, 1).End(xlUp).Row For i = 2 To LastRow 'ここで2列目を検索して、「早番」の人がいたら、Sheet1の3行目から、リスト化する。 If .Cells(i, 2).Value = strSerch1 Then Worksheets("Sheet1").Cells(j, 2).Value = .Cells(i, 1).Value Worksheets("Sheet1").Cells(j, 3).Value = .Cells(i, 2).Value j = j + 1 End If Next i End With 'Sheet1に「遅番」の人をリスト化するための変数を設定 '最初に入れるのが8行目なのでkに8を代入 k = 8 With Worksheets("勤務表マスタ") LastRow = .Cells(.Rows.Count, 1).End(xlUp).Row For i = 2 To LastRow 'ここで2列目を検索して、「遅番」の人がいたら、Sheet1の8行目から、リスト化する。 If .Cells(i, 2).Value = strSerch2 Then Worksheets("Sheet1").Cells(k, 2).Value = .Cells(i, 1).Value Worksheets("Sheet1").Cells(k, 3).Value = .Cells(i, 2).Value k = k + 1 End If Next i End With End Sub

  • エクセルで検索結果を範囲から検索して貼りつける

    出退勤時間の表を作成しようと思っています。 実際あるエクセルはsheet1にsheet名をシフトと入れて B3に早番(1) C3 早番(2)   D3 早番(3)  E3 早番(4) F3 普通番(1) G3 普通番(2) H3 普通番(3) I3 普通番(4) J3 普通番(5) K3 普通番(6) L3 遅番(1) M3 遅番(2) N3 遅番(3) O3 遅番(4) P3 遅番(5) Q3 遅番(6) B4から出勤時間の B4 5:30 C4 6:00  D4 6:30 E4 7:00 F4 7:30   8:00 8:30  9:00 9:30  10:00   L4 13:00 13:30 14:00 14:30 15:00 Q4 15:30 B5からは退勤時間の B5 14:00 C5 14:30 D5 15:00 E5 15:30 F5 16:00 16:30 17:00 17:30 18:00 18:30 L5 21:30 22:00 22:30 23:00 23:30 Q5 0:00 セル番号抜かしちゃっててすみません。 A8からA48まで名前 7の行に1日から31日まで(B7が1日・C7が2日…AF7が31日)になっています。 この中の B8からAF48のセルに 早番(1) 早番(2) 早番(3) 早番(4)    普通番(1) 普通番(2) 普通番(3) 普通番(4) 普通番(5) 普通番(6)     遅番(1) 遅番(2) 遅番(3) 遅番(4) 遅番(5) 遅番(6) のどれかを検索して貼りたいです。 検索する場所ですがsheet2に1週間分(1日から7日までとします)の出勤時間の作成しようと思います。sheet2の名前が1日~ sheet3が8日~と入れようと思います。 週単位か1日単位でのsheet作成を迷ってます(週初めが1日といつも決まっているわけではないので)1日単位ならsheet2名前は1日sheet3名前2日になります。 実際にsheet2を各場所に貼りだして見せるものにしたい為見やすい用に作りたいです。 載せてる情報は現在は            22日~27日                        現場A            通常 9:00~終了まで   A8さん            早出 9:00~17:30   A10さん  A12さん            遅出 13:00~21:30   A9さん   A13さん            現場B            通常 8:00~終了まで   A11さん  A18さん            早出 8:00~16:30    A14さん  A11さん            遅出 13:00~21:30    A16さん  A17さん            現場C            通常 7:30~終了まで   A15さん A25さん A35さん            早出 7:30~16:00   A22さん A32さん            遅出 13:00~21:30   A21さん  A19さん みたいな感じで貼りだしています。 月単位でエクセルを作成します。 エクセル関数は初心者でマクロはちょっとしかやったことないです。 sheet2(週か日)の作成でsheet1シフトの中のB8からAF48が検索されて入力されればいいなと思っています。どのような関数を入れればいいかご教授ください。

  • エクセル関数、COUNTIFについて質問させていただきます。

    エクセル関数、COUNTIFについて質問させていただきます。 エクセルでスケジュール表を作成しました。 記号で出勤、半休、早番、遅番、休暇・・・などを表すようにしました。 休暇を数えるセルには、 =COUNTIF(A1:A6,"☆")+COUNTIF(A1:A6,"△")+COUNTIF(A1:A6,"○") と、入力しました。ここでは仮に、☆が休暇、△が遅番、○が早番とします。 今後、△や○は半分出勤しているという意味で、△=0.5(同じく○=0.5)カウントにしたいと思います。 そうすると、上の式をどのように変更すればいいのでしょうか? とても困っています。どうか回答よろしくお願いします。

  • 疲労にシフトワークの影響は考えられますか?

    厨房に勤める兼業主婦です。 遅番では11時に出勤し、終るのは概ね20時半、(帰宅は21時半頃)翌日が早番で、4時起き5時半過ぎに職場着、15時30分頃終わっています。早番では30分くらい休めますが、遅番では15分で昼を食べてトイレ、歯磨きがせいぜいです。 このシフトパターンの勤務スタイルですが、非常に疲れます。スキルアップしたくても、帰宅すると何もできません。(以前はこのパターン後は休日でしたが、人減らしで難しくなりました)なんとか資格を取ってスキルアップしたいので、このパターンが疲れると言う根拠となる研究、論文、エビデンス等があれば教えてください。対策を立てたいです。 よろしくお願いします。

  • 残業を減らすためにはどうしたらいいですか?皆さんの会社はどんなことをされていますか?

    このたび残業削減案を提出しなければならなくなりました。 (50~100文字数程度の簡単な文章をいくつかで良いらしいのですが・・・。) 私の場合、とある工場で設備管理の仕事をしています。 工場は年中無休で私の部署は社員が3人で3人出勤のときは早番、普通、遅番があります。 2人出勤のときは、早番と普通、土日などあまり忙しくないときは1人出勤で早番のみです。 それぞれ一番遅く出勤してきた人が、工場の生産が終わるまで残るという感じです。 休日はシフト制で、日曜日~土曜日までの7日間の間に2日間休みという出勤体制です。 前置きが長くなりましたが、業種や勤務体系など問いませんので、 皆さんの会社、又は部署は、残業を少なくするためにどのようなことを 行っておられますか? 例えば、私の会社の場合ですが、一番最後の出勤者が最後まで残らなければならないため、 残業になりやすいので、3人の早番、普通、遅番のローテーションを均等にするなど・・・ 全く関係の無いことでも大歓迎ですので、とにかくたくさんのご意見を頂けたらと思います。 よろしくお願いいたします。

  • 職場で騙されました。

    Aさんが体調不良でシフト変更(遅番から早番へ)しました。 今までずっと遅番だったAさんがシフト変更して早番と遅番の混合になりました。私はシフト変更が必要なほどの体調不良の人間を不規則な勤務にするのはおかしいと思い、休みを返上したり、残業したりとAさんをすべて早番にしました。 しかしこのシフト変更の真相は、AさんがB課長に「私の指導が厳しい」と相談した際、B課長が「体調不良を理由にシフト変更しましょう」と提案しAさんはそれを了承したそうです。 私は騙されたと思っています。本気で体調不良を心配した私は何なんでしょうか?今、AさんとB課長をすごく許せません。慰謝料や謝罪の要求はできますか?法律で裁くことはできますか?教えてください。

  • 女性同士の衣類の貸し借り。

    私は某パチンコ屋の20代女店員です。 私の店にはAさん(20代女性)とBさん(20代女性)がいます。 昨日私とAさん(20代女性)は早番に入っていて 遅番でBさんが出勤してきました。 私の店の制服は、黒ストッキングを 着用なのですが 早番上がりの際、Bさんが転んでしまい黒ストッキングが破れてしまっていました。 その時、Aさんが私のを貸しましょうか?とBさんに言いました。 ここまではよかったのですが 私の中では、新しいストッキングを貸すのかと思いきや 自分の脱いだストッキングを そのままBさんに...。 Bさんも、助かりました!と 当たり前のように履きました。 私は、唖然となりました。 洗ってあるものや 上着やスカートとかならまだしも ストッキング...。 下着みたいなものですよね。 しかも、AさんとBさんは そこまでシフトも被らないので 多分、まともに会話したことも 少ないと思います。 友人同士なら100歩譲って我慢するにしても あまら仲良くない女性同士が 下着を貸し借りって。 私が潔癖なのでしょうか。 女性同士だと当たり前なのでしょうか?

  • ソープにもっと働きたいのに出勤させてもらえない…

    ソープにもっと働きたいのに出勤させてもらえない… すすきのの大衆向けソープ勤めですが女の子が多すぎるため出勤規制がかかり数多く出れません 多くて週五回の勤務です私は借金を返すためにほとんど毎日、通しもして沢山稼ぎたいのですが店がそうさせてくれません。 私が働いている店の女の子の在籍が40人でそのうち常勤している人が20人、部屋数が5部屋です。単純に計算すると片番で十人、集団待機が五人で部屋を回ることになります 私は遅番ですが週五回、しかも片番だけと出勤規制がかかり自分の思うようにいかず苛立っています。 …といっても全く稼げない訳ではなく1日四万円くらい稼いでいますが、空いた時間(早朝4時から)に別なソープで掛け持ちしています。 働いている女の子が多くて沢山出勤できないのはよくあることですか?以前ヘルスのイエスグループで働いていたことがありますがそこでも女の子が多すぎるということで週二回くらいしか出れませんでした