パソコンがなきゃ仕事にならん その肆

朝っぱらから

　どっひゃ～ん


先月の内部監査日まで　さかのぼって　　合計表を　印刷せねばならん

　うっかり　忘れてたんだよな～


この　場合ですと　・・・　２９日と　２７日を　削らにゃあならん

　しか～し　慌てる必要は　ございません


今や　パソコンの　時代ですからね～　　　　　　　　

　入力するだけで　自動計算してくれるのです

そして　別のシートに　合計の一覧表も　作ってあるのです

　監査日以降の　数字を　消すだけです

５０音順の　ボタンを　作って　そこに　マクロを貼り付け

　幅を　変動させます

名前の　頭文字が「か」の　人たちを　出すマクロ

Sub か()
'
' か Macro
' マクロ記録日 : 2009/12/29  ユーザー名 :
'
    Columns("A:EN").Select

    Selection.EntireColumn.Hidden = False

    Columns("B:AG").Select

    Selection.EntireColumn.Hidden = True

    Range("AJ2").Select

End Sub

ENまで　データが入っていて

　「か」から　始まる　名前の人は　AHからなんですが

一度　全部　表示させて　あ～お　までを　隠す作業です

これは　日中活動の　金銭管理を計算し　チェックしてます

A～Dまで　ランダムに　並んでますが

　

ボタンを　押すことで　生活介護A群を　整列させます

Sub A()
'
' A Macro
'
  ActiveSheet.Range("$A$2:$B$72").AutoFilter Field:=2, Criteria1:="生活介護A"

End Sub

７２行まで　データが入っております

さて　本日は　肉うどんって　言ってたな

　写真　撮らねば

おっと　その前に

　リンゴの５段活用　　　　　　　　　　　　　　　　　　　　　　そんなのないか・・・


普通は　この状態で　提供されます


ちょい　薄切り


刻み　　　　ぶ～すけ　これでも　むせちゃって


超刻み　　　　今や　この状態


ジュース


ジュースに　とろみを　つける方も　おります

　あっ　それじゃあ　６通りってことか・・・


え”～　桃子さん　そんなに　掛けて・・・　大丈夫なの？

　＃＄％＆っしょ　おいしっ　　おいしぃね


あ”～　しまった～　油断した～

　俺様が　桃子さんのとこで　写真　撮ってる隙に・・・

なんで　他の奴らは　対応しね～んだ　　まったく～

　うどんは　勿論　りんご　ふろふき大根　いなり寿司にまで　唐辛子を

桃太くんは　非常に　変な　強い　こだわりを　持ってます

　ま～な～　下手な職員が　タッチすれば

途端に　テーブルごと　ひっくり返すからな～

　見て見ぬ振り　しやがったな～



クニちゃん・・・

　おいなりさん　２つとも　半端に　口　つけてるし・・・


お約束だな　袖に　つけるのは

　汚く　食べることに　関しては　３本の指に　入るもんな～


いやあ　カブさん　最高ですね

　上手い具合に　食べること　出来てますわ

んだべ～　やっぱり　最初っから　比べると　上手になってるもんね

　問題は　スプーンなんだよな～

もう一回り　大きいのが　見つかんね～んだよな～

　最後の手段は

普通のスプーンを　研磨機で　・・・　やってみるか・・・な・・・
　　
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　図画・工作　　５なんだべ？