エクセル初心者のマクロ
エクセルのマクロをＶＢを覚え始めている方にとっては、すぐ色々な問題に行き当たってしまいがちですよね。
例えばですが、あるセルの内容が「Ａ」なら「マクロＡ」を実行し、「Ｂ」なら「マクロＢ」を実行するという、セルの内容によって実行させるマクロを選択するという条件分岐を付けたい場合ですが、こういうのを初心者の方がやろうと思うと結構大変な作業になるんじゃないかと思います。
セルの内容を条件にして別のマクロを実行させるというのは結構難しいので、セルの値を条件にして処理を分けるというマクロを記述してみます。
具体的にマクロを記述してみると
Sub test()
If Range("A1").Value=A Then
☆セルA1の値が「Ａ」の時の処理☆
Else
If Range("A1").Value=B Then
☆セルA1の値がBの時の処理☆
Else
☆上記のどちらでもない時の処理?☆
End If
End If
End Sub
というように記述してみてはいかがでしょうか？
「Ａ」の場合の処理と、「Ｂ」の場合の処理をそれぞれ記述し、最後に「Ａ」「Ｂ」以外の文字が入ってきたときの場合の処理も記述していた方が、色々なバージョンに対応できると思うのでいいかと思います。
まぁここまでやる前にとりあえずはメッセージを表示させて見るなど簡単な処理からはじめてみるのもいいと思います。頑張ってエクセルマクロを使いこなして、色々な処理が出来るようになるように頑張ってくださいね。
エクサージュホワイト
白い肌のためにケアを行う人々は夏などの紫外線の強い季節に限らず、一年中肌への紫外線ダメージなどに気を遣いたいものですが、それにはやはり毎日のスキンケアも重要になってくると思います。
国内大手の化粧品メーカーアルビオンには特にエイジングケアの製品が豊富にそろっていますが、エイジング以外にも美白効果のある製品もしっかりと揃っています。
アルビオンにはエクサージュというスキンケアシリーズがありますが、そのシリーズの一環としてエクサージュホワイトというシリーズがあります。
シリーズの一部というよりも、独立してシリーズ化されているほどのラインナップを持つ美白化粧品といえます。
角質層の潤いを導き、肌の白さを強調させるのがエクサージュホワイトです。
クリアクレンジングオイルはすっきり、すばやくメイク、古い角質、ケアなの奥の汚れや皮脂を落とします。
クリアクレンジングローションは紫外線でいたみがちな肌に負担をかけず、肌のうるおいを守りながらメイクアップ料をしっかりと落とします。
ルーセントアップフォームはきめ細かい泡で肌の細部まで優しくきっちりと洗い、くすみの原因の汚れも落とします。
ホワイトニングミルク〜はオイリーな肌にさらっとした感触でみずみずしい潤いを与えます。
ホワイトニングミルク〜はノーマル肌のためのミルクで、ふっくらとした潤いを肌に与えます。
ホワイトニングミルク〜はドライスキン用のミルクで、しっとりとしたコクのある潤いを肌に補います。
ホワイトニングモイストローションは夏の乾きが気になる肌へのしっとりタイプのローションで、紫外線や冷房による乾燥を防ぎます。
ホワイトニングリフレッシュローションは皮脂・毛穴が気になる肌へのローションで、過剰な皮脂やべたつきをひんやりした感触でカバーします。
ホワイトネスソリューションは、すみずみまで隙なく角質美白したい肌への製品で、メラニン生成を抑え、日焼けによるシミ・そばかすを防ぎ透明感のある白い肌を導きます。
ホワイトネスクリームは、角質層のすみずみまで潤いで満たし、肌荒れ・乾燥から素肌をしっかりと守り、白く輝くしっとりなめらかな肌を持続させます。
リペアトリートメントは洗い流すタイプのトリートメントマッサージです。
古くなった角質を取り除きながら角質層を潤し、肌を整えます。
ホワイトクリアマスクは集中美白のための薬用美白パックです。
ひんやりとした心地よい清涼感のある使い心地で、日焼けによるシミ・そばかすを防ぎ透明感のある肌を導きます。
シーバムコントロールエッセンスは過剰な皮脂や毛穴の黒ずみが気になる肌へのエッセンスで、清涼感の高いクールな感触で角質層をすっきりとさせます。
ホワイトニングチャージャーはビタミンＣをしっかりチャージしたい肌に、美白有効成分ビタミンＣなどを配合しサラサラの明るい肌を導き、日焼けによるシミ・そばかすを防ぐ効果があります。
ホワイトニングモイストマスクは乾燥トラブルに悩む夏の肌用のジェルベースです。
角質層に美白成分とうるおいを補給します。
デイリーケア製品からスペシャルケア製品までしっかりと揃ったエクサージュホワイトですが、スキンケア製品に定評のあるアルビオン化粧品の製品ですので美白ケアに関しても信頼を持てるのではと思います。
エクサージュホワイトは夏用のシリーズという感じもありますが、年中使用することでもより白い肌を目指せるのではと思います。
エクセル関数（COUNTIF編）
エクセルの関数の中に、指定条件に合致するセルの個数をカウントすると言う「COUNTIF関数」というのがあります。
「=countif（引数１,引数２）」という使い方をします。
【関数の説明】
引数１で指定された範囲の中から、引数２で指定された条件のセルがいくつあるか合計個数を返す関数です。
【引数の説明】
引数１：セル範囲の指定をします
引数２：カウント条件を指定します
単純にこの「COUNTIF関数」を使用するときは指定する条件は１つですが、複数条件指定する場合にはどう設定したらいいの？と疑問に思う方もいると思います。
解決方法としては色々ありますが、一致させる条件がセルの完全一致ならばワーク的な作業列を作成して、そこを利用してCOUNTIF関数を実行すると言うのが一番簡単だと思います。
どういうことかと言いますと、第一条件が書いてあるセルと、第二条件が書いてあるセルを「=セル1&セル2」で文字列結合します。その結合したセルに対して「COUNTIF関数」を記述すればいいという訳です。
（例）
列 A B C
条件1 条件2 結合
上記例の場合、列Cに「=条件1＆条件2」と結合させる関数を記入します。これで列Cには結合された文字列が表示されるようになります。列Cに対して「COUNTIF」を使用するようにする。
関数を使い慣れていない方だと、あるデータだけでなんとかしようと頑張ってしまいがちですが、この例のようにデータとデータを結合させて判断をするという事も可能です。
SDカードとサンディスク社
SDアソシエーションという団体があります。この団体はSDカードの仕様や規格などを定めている団体です。SDアソシエーションは当初、３社によって設立されました。３社のうちのひとつはサンディスク社といいます。
サンディスク社は１９８８年にアメリカで設立されました。本社はカリフォルニア州のミルピタスというところにあります。設立されてから、まだ日が浅いわけですが、２００５年には収益が２３億ドルにもなったようです。そして全世界に１０００人を超える従業員を抱えています。サンディスク社はフラッシュメモリなどを製造、販売する会社です。SDカードの共同研究を日本の松下電器産業、東芝と行い、これらの企業と合同でSDアソシエーションを設立しました。SDカードだけでなく、メモリースティックの製造も行っています。メモリースティックは日本のソニーが開発、生産しているメモリです。そのソニーとメモリースティック事業について、業務提携しているのです。
サンディスク社の日本法人もあります。サンディスク社の日本法人はサンディスク株式会社といいます。１９９２年に設立されました。サンディスク株式会社の主な業務は日本国内においてサンディスク社製の製品の販売、普及などです。
サンディスク社で製造されたSDカードやminiSDカードなどのフラッシュメモリ類は様々な場所で使用されています。携帯電話、デジタルカメラ、パソコン関連商品、テレビ等です。
アディダスのサッカーユニフォーム０８’モデル
サッカー・アフリカネーションズカップもなかなかの盛り上がりを見せているようです。
アフリカサッカーはレベルがどんどん上がっているように感じます。
そんな中、この大会に出場している国のユニフォームを支給しているメーカー構成を調べてみました。
調べたのは予選に参加した48ヶ国と開催国のガーナのメーカー構成及び本大会進出数です。
※数字は左が予選出場国数、右が本大会出場国数を表しています。
PUMA(12→8＋1)
エジプト、コートジボワール、カメルーン、モロッコ、ボツワナ、チュニジア、ウガンダ、セネガル、アンゴラ、リビア、トーゴ、ナミビア、ガーナ。
AIRNESS(6→3)
ギニア、ガボン、ベナン、マリ、DRコンゴ、コンゴ。
adidas(3→2)
南アフリカ、ナイジェリア、ルワンダ。
NIKE(2→1)
セイシェル、ザンビア。
UMBRO(1→0)
モーリタニア。
uhlsport(1→0)
マダガスカル。
saLLer(1→0)
ガンビア。
Le coq(1→0)
アルジェリア。
LEGEA(1→0)
ジンバブエ。
不明(18→1)
ブルンジ、スーダン、レソト、ニジェール、リベリア、モーリシャス、赤道ギニア、ケニア、エチオピア、タンザニア、シエラレオネ、ブルキナファソ他
これをみると相変わらずPUMAが強いことが分かりますね。
本大会出場国でも半数以上となる9ヶ国をサポートしていることになります。
次点はフランス語圈に強いAIRNESS。
アフリカ独特の色使いのバランスがなかなか秀逸です。
aeidasは南アフリカ、ナイジェリア、NIKEはザンビアと長年にわたって支給してきた実力国に賭けています。
不明国は18ヶ国ととても多いです。
メーカーロゴすらついていない国もあるようです。
唯一、不明国の中で本大会出場を達成したスーダンは、PUMAあたりがやはり手を伸ばすのでしょうかね？