エクセルのマクロで範囲を選択してみましょう。

IT関係の職種

すさまじいスピードで進化、普及してきたコンピュータ、パソコンですが、そのスピードと同化して発展してきたのがIT系の職業です。このIT系の職業は、今後もより専門的に細分化されていく事が予測されます。
■WEBデザイナーインターネットにおけるホームページデザインを行います。企業紹介や商品紹介などホームページの見栄えやインパクトは非常に大切なので、WEBデザイナーと言う職業が成立する様になりました。
■システムエンジニア企業と契約を結び、経理、総務、生産管理などの情報システム設計と開発を行います。頭文字から「SE」と呼ばれる場合が多いです。
■プログラマーSEが設計したシステムを構築する為、コンピュータ言語をプロミングする仕事です。当然取引先の要望に沿わせる為、テストと修正を繰り返し行いますが、構築日程がよく遅れ、深夜残業や徹夜が必要になる事もあるようです。
■OAインストラクターOA機器の機能説明、操作方法指導などが主な業務になります。
■セールスエンジニアセールスエンジニアとはコンピュータなどOA機器における商品機能の知識を習得し、セールスを行う販売員です。ユーザーからの質問や商品のアフターサービスまでお客様と直接接します。
■キーパンチャー派遣社員などに多いのがキーパンチャーです。棚卸し数量やアンケート、手書きの原稿などの各種データを決まった様式でコンピュータ内に入力します。膨大なデータ量を正確に、速く入力する事が要求される為、タイピング能力が無いと出来ません。

エクセルのマクロで範囲を選択してみましょう。

毎日エクセル上にデータ入力などをしているとしたら、データって毎日毎日増えていっていますよね。そのデータから何かの条件を指定して検索するときに、毎日検索範囲が変わっていくとしたらその都度対象セルを修正するのは面倒ですよね。
これをマクロを使って解決はできないのでしょうか?

データは、1行に1データで入力されていっているものとします。

【範囲を選択する方法】
方法その1.アクティブセル領域を判断する方法
Sub kettei1()
  Dim TBL As Range

  Worksheets("Sheet1").Activate: Range("A1").Select
   'セルA1を含む、アクティブセル領域(空白行と空白列で囲まれたセル範囲)を選択します
  Set TBL = ActiveCell.CurrentRegion
  TBL.Select
End Sub

方法その2.アクティブセル領域を判断する方法(表題などを除きます。)
Sub kettei2()
  Dim TBL As Range

  Worksheets("Sheet1").Activate: Range("A1").Select
   'セルA1を含む、アクティブセル領域(空白行と空白列で囲まれたセル範囲)を選択  Set TBL = ActiveCell.CurrentRegion
   '1行下の位置から1行少ないところをを設定している
  Set TBL = TBL.Offset(1, 0).Resize(TBL.Rows.Count - 1, TBL.Columns.Count)
  TBL.Select
End Sub

アンチエイジングに重要なまくら!

睡眠というのは、アンチエイジングの方法として最も重要なものです。睡眠と言うのは人間の生命維持に関わる事柄とされています。
現代人の今の生活スタイルと言うのは、ストレスが多くかかっている場合が多く、時間も足りないという方が多いです。そこからも分かるように睡眠不足になってしまうケースが多くなっているというのが現実です。アンチエイジングには睡眠が重要ということから考えると睡眠不足というのはアンチエイジングにとってはかなりよくないという事になります。

それではアンチエイジングのために「睡眠」を取るわけですが、よい睡眠をとるためにはよい寝具が必要です。その一つとして「まくら」を考えてみたいと思います。

睡眠と言うのは1日8時間くらい取った方がいいと言われています。普通に考えれば人生の1/3は眠っていると言う計算になりますよね。それだけ睡眠と言うのは重要なもので、その中でもまくらは大切です。よい睡眠をとるための快眠グッズとして最近は色々なまくらが販売されています。

【そばがら】昔からあるまくらです。

【どんぐりビーズ】アレルギー体質の人におすすめです。

【低反発】自分の頚椎に合わせて選べます。優しく頚椎にフィットします。

【磁気】体の血行を促す効果があります。

【炭・ひのきチップ】マイナスイオンが発生するために、リラクゼーション効果が得られます。

上記のようにアンチエイジングのための一つの方法として、また睡眠不足解消の方法としてまくらを変えてみてはいかがでしょうか?

ETCカードの即時発行の方法

高速道路を走るときに大変便利なETC。
ノンストップでの料金所通過の便利さはもちろん、様々な割引やサービスも見のがせません。
ETCカードを使用するだけで、たくさんのサービスが自動的に得られるなんて、とてもお得ですね。

さてそのETCカード、これはクレジットカードがあることが必要条件です。
クレジットカードを持っていない場合は、カードの新規作成が必要です。
既に使用しているクレジットカードを利用してETCカードを作ることもできますし、自分に合ったETCカードサービスのために、新たにクレジットカードを作るのもいいでしょう。

ETCカードを作るときに大切なことは、申請をしてからカードが手元に届くまでの期間です。
ETCカードが手元になければ、当然ETCは通過できません。
「長距離ドライブの前にそれに合わせて…と思ったら、カードが間に合わなくてETCが利用できなかった」なんて、残念すぎますよね。

その点オートバックスなら、ETCカード即時発行サービスというものがあります。
全国にはETCカード即時発行端末のあるオートバックス店舗がたくさんあります。
その端末を使用すれば、対象クレジットカードがある人や、対象クレジットカードを新規申し込みの人は、その場でETCカードが手に出来ます。
そのスピードは最短なんと3分!これなら間に合わないことはありませんね。

アディダスのサッカーユニフォーム08’モデル

サッカー・アフリカネーションズカップもなかなかの盛り上がりを見せているようです。
アフリカサッカーはレベルがどんどん上がっているように感じます。
そんな中、この大会に出場している国のユニフォームを支給しているメーカー構成を調べてみました。
調べたのは予選に参加した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あたりがやはり手を伸ばすのでしょうかね?