ChaBlog
| Next»
2009年新茶 入荷しました！
- 2009-04-11 (Sat)
- cha
例年より早く9日に入荷しました。
爽やかな若葉の香り一杯の、
青味のある旬の味わいです。
年に一度、この旬の時期だけに味わえる
『新緑の若葉の香り！みずみずしい旬の味！』をゆっくりお楽しみください。
『2009年 摘みたて新茶』
改造！Excel 取引管理
- 2008-07-27 (Sun)
- web
これまで作ってきた「Excelで取引管理」を見てみると、会員の個別シートがあるので40を超えるシート数となっています。
これを取引のあった会員シートだけを作るようにして、できるだけ見やすくてコンパクトなものにしてみました。
まずは合計表に打ち込む各取引データーから必要な会員番号を抜き取り、新たに作ったベースとなる基本シートを通して取引のあった会員の個別シートを作っていきます。
次にその個別シートのデータから、集計表、手数料表に会員別取引実績を入れ込んでいきます。
最後に、出来上がった集計表と個別シートを印刷。
これで最初のシート数は会員名簿、合計表、集計表、手数料表、基本シートの5個になりました。
かなりスッキリしました♪
(注：Excel2003で作成)
これを取引のあった会員シートだけを作るようにして、できるだけ見やすくてコンパクトなものにしてみました。
まずは合計表に打ち込む各取引データーから必要な会員番号を抜き取り、新たに作ったベースとなる基本シートを通して取引のあった会員の個別シートを作っていきます。
次にその個別シートのデータから、集計表、手数料表に会員別取引実績を入れ込んでいきます。
最後に、出来上がった集計表と個別シートを印刷。
これで最初のシート数は会員名簿、合計表、集計表、手数料表、基本シートの5個になりました。
かなりスッキリしました♪
(注：Excel2003で作成)
ガトーショコラ
- 2008-07-26 (Sat)
- diary
少し前になりますが、お友達との集まりにガトーショコラを焼いてもっていきました。
紙製のケーキ型で焼くのは初めてだったので、ちょっと試し焼きを…
いつもより４～５分ほど早めに焼きあがりました。
それでも火のとおりがいいのか、いつもよりシットリ感が少なくしっかり焼きあがった感じです。
(画像は試し焼きの方）
本番用のときはもう少し早めにオーブンから出して、予熱で火が通るくらいにしました。
一晩冷蔵庫で冷やして、粉糖でお化粧して持参。
食べてもらった感想は、狙い通りのシットリ感もあり口に入れるととろける様な感じの口当たりで、かなり好評でした。
パウンドケーキ
- 2008-06-28 (Sat)
- diary
今回が2度目の挑戦になります。
初めて作ったときはちょと固めの焼き上がりで、味は良かったのですがシットリ感があまりなくいまいちのできでした。
いろいろ問題点を調べてみると、どうやらバターの練り方と卵黄の混ぜ方がまずかったようなので、その点に注意して作ってみました。
材料は
・バター 100g
・砂糖 50g（バターに入れる分）
・卵黄 2個
・薄力粉 100g
・バニラエッセンス 数滴
・卵白 2個
・砂糖 50g（卵白に入れる分）
まずバターを室温に戻し砂糖を加えて、泡立て器で白っぽくなるまで泡立てます。
卵黄をしっかりほぐし、数回に分けて少しずつ加え、その都度しっかり混ぜあわせます。
前回の失敗は、ここまでの工程での混ぜ方の甘さが原因だったようです。
特に卵黄を加えた際に乳化しきれていないと、出来上がりのしっとりした食感が損なわれるようです。
次に、薄力粉を何回かに分けてふるって入れながら、その都度ヘラで切るように混ぜ合わせていきます。
ここまでできたら、オーブンを170度で予熱し、パウンド型にバターを塗って準備します。
最後に卵白でメレンゲを作り、卵白の白い塊がなくなるまで泡をつぶさないように切るように混ぜ合わせます。
出来上がったら型に流し込み、ヘラで上を平らにしさらに中央を少しへこませます。
170度に予熱したオーブンにいれ、35～40分様子を見ながら焼きます。
焼きあがったら粗熱が取れたところでラップして冷蔵庫で一晩寝かせます。
今回のパウンドケーキは、丁寧に混ぜ方も注意しながら作ったので、口当たりはシットリとして軟らかくほぼ期待通りの仕上がりになりました。
満足できる味でした♪
シート保護とオートフィルター
- 2008-06-19 (Thu)
- web
またまたEXCEL関連で。
作成した集計マクロで、シート保護をしたシートのオートフィルターができないことが判明。
対処法をいろいろ検索して調べてみてActiveSheet.Unprotect 、Protect で保護を解除、設定する方法や、EnableAutoFilter、AllowFiltering など試してみましたがエラーばっかりでなかなかうまくいきませんでした。
根気よく調べてみると、オートフィルターの使える状態でシート保護はできているけど、マクロを使ってのオートフィルター操作ができないことが判明。
そこでUserInterfaceOnly にTrue を指定してマクロからの操作ができるようにしました。
この設定は一度してしまえばそれでOKかと思っていたら、有効なのはブックを閉じるまでの間だけだったので、この設定自体
これでようやく解決しました。
(注：Excel2003で作成)
作成した集計マクロで、シート保護をしたシートのオートフィルターができないことが判明。
対処法をいろいろ検索して調べてみてActiveSheet.Unprotect 、Protect で保護を解除、設定する方法や、EnableAutoFilter、AllowFiltering など試してみましたがエラーばっかりでなかなかうまくいきませんでした。
根気よく調べてみると、オートフィルターの使える状態でシート保護はできているけど、マクロを使ってのオートフィルター操作ができないことが判明。
そこでUserInterfaceOnly にTrue を指定してマクロからの操作ができるようにしました。
この設定は一度してしまえばそれでOKかと思っていたら、有効なのはブックを閉じるまでの間だけだったので、この設定自体
Set sheet1 = Worksheets("手数料表")として直接集計マクロに書き加えました。
sheet1.Protect Password:="*****", AllowFiltering:=True, _
UserInterfaceOnly:=True
これでようやく解決しました。
(注：Excel2003で作成)
EXCEL マクロ.5
- 2008-06-18 (Wed)
- web
今回作ったマクロのおかげで作業的にはかなり簡素化されました。
あとは入力セルを間違ったり、間違って数式を消したりというミスが出ないようにできないのか、またまた検索。
そこで見つけたのが「シートの保護」、いろいろ調べて早速設定しました。
まずは数値入力セル、日付入力セルを選択し、［セルの書式設定］［保護］で［ロック］を解除。
ついでに数式の組み込んであるセルの、数式バーに収まらないぐらい長々と入れ込んだ数式が表示されないように、［セルの書式設定］［保護］で[表示しない]にチェック。
この作業は、作業グループで各会員シートをまとめて行ったのですぐ済んだのですが、肝心なシートの保護が作業グループではできません。
各会員シートをひとつひとつ設定するのは面倒なので、マクロでパスワードを付けてシート保護することに
手数料表の会員番号欄を選択して実行。
アッという間に終了。
マクロってやっぱり便利ですね(^.^)
(注：Excel2003で作成)
あとは入力セルを間違ったり、間違って数式を消したりというミスが出ないようにできないのか、またまた検索。
そこで見つけたのが「シートの保護」、いろいろ調べて早速設定しました。
まずは数値入力セル、日付入力セルを選択し、［セルの書式設定］［保護］で［ロック］を解除。
ついでに数式の組み込んであるセルの、数式バーに収まらないぐらい長々と入れ込んだ数式が表示されないように、［セルの書式設定］［保護］で[表示しない]にチェック。
この作業は、作業グループで各会員シートをまとめて行ったのですぐ済んだのですが、肝心なシートの保護が作業グループではできません。
各会員シートをひとつひとつ設定するのは面倒なので、マクロでパスワードを付けてシート保護することに
Sub シート保護()
'変数の宣言
Dim r As Range
Dim MySheetName As String
MySheetName = ActiveSheet.Name
For Each r In Selection
Sheets(CStr(r)).Select
ActiveSheet.Protect Password:="*****"
Next
Sheets(MySheetName).Select
End Sub
手数料表の会員番号欄を選択して実行。
アッという間に終了。
マクロってやっぱり便利ですね(^.^)
(注：Excel2003で作成)
| Next»
- Search
- Links
- Feeds