Bird-Soft Weblog

簡単ですが、観葉植物のその後です。
（数ヶ月でも植物は結構変わるものですね。
　写真がぜんぜん間に合っていないです。。）　
　
　
◆2008/05/10購入のシマトネリコ

↑5月24日のシマトネリコ。

↑5月24日のシマトネリコ。小さな新芽がでています。

↑5月24日のシマトネリコ。別のところからも新芽がでています。

↑7月13日現在。順調に成長しています。
　（購入時から比較して10〜15cmくらい成長）

　
その他の観葉植物は続きから・・・。

　
◆2008/3/15購入のガジュマル

↑5月25日のガジュマル。葉が落ちてきてしまいました。
　だんだん元気がなくなってきたため土に植え替えてみました。

↑6月16日のガジュマル。しばらく外に移動しておきました。
　　その甲斐あってか新芽もでて復活。（おそらく日照不足のせい？）
　　7月現在、新芽も大きくなっています。
　
　
◆オリヅルラン　

2008/06/06のオリヅルラン
きれいな白い花が咲き始めました。
写真が追いついていないですが、7月になり、
ランナーの葉がとても大きく伸びています。
（ランナーから根がではじめました）　　
　　
　
◆その他・・・。

・ポトスはどの株も順調に成長しています。
　（挿し木をしたポトスのうちの一つからから新芽がでて、
　成長しています。もう一つのほうはほとんど成長せず。）

・クロトンは全く成長していないように見えます。
　良くも悪くも買ったときからそのまま。。
　
　　　
・テーブルヤシは新しい葉が少し開きましたが、ほとんど成長は
　していないです。GWに水遣りが遅れ、少し葉先が枯れています。

　
・シュガーバインは一時期小さな新芽もでましたが、
　枯れてしまったため、7月19日に処分・・・。

↑7月13日の様子。倒壊してしまいました。
　このあと完全に枯死。根がぜんぜん伸びていなかったです・・・。

投稿者: BIRD 日時: 23:54 | パーマリンク | コメント (0) | トラックバック (0)

Excelでアドインを作成する方法が気になったので調べてみました。
以下のサイトが参考になります。

エクセル　アドイン　作り方　第8回 - waste rest way
http://blog.goo.ne.jp/leapdys/e/bf48ff9d45364a3de9d66e23ee4b681a
　
　
VBAのウインドウで、ThisWorkBook上に
Private Sub workbook_addininstall()
'インストール時の処理（ツールバーの作成処理）
End Sub
　
Private Sub workbook_addinuninstall()
'アンインストール時の処理（ツールバー削除処理）
End Sub

と書くだけです。
　
ツールバーの作成のところに、
.OnAction = "マクロ1"
の記述がありますが、ここがボタンが押されたときに呼び出される関数で、この関数の定義を
標準モジュールに書いておけばOKです。

※コードの内容は「エクセル　アドイン　作り方　第8回」の内容より。
　

　
上記のサイトに書いてある通りに作成し、
　　
メニューバーから、
ツール⇒アドインを選択すると以下の画像のようなウインドウが開くので、
チェックボックスをクリックし、OKを押して登録します。
　
すると、画像右のようなツールバーが現れます。

　　
今回の例ではツールバーにニコニコマークみたいなものが現れましたが、
これは「FaceId = 59」の記述があるためです。
　
どのようなマークがあるかは以下のサイトに「 ＦａｃｅＩｄ画像の一覧表示ツール 」
という便利なツールがあるのでこれで調べられます。
　
　
AddinBox(FaceId一覧)
http://www.h3.dion.ne.jp/~sakatsu/FaceIdBrowse.htm
　

投稿者: BIRD 日時: 12:12 | パーマリンク | コメント (0) | トラックバック (0)