それでは早速、先週買い揃えた木材を切ることから始める。
価格、入手し易さ、加工の容易さ等を考えて使用する木材は以下のものを選択。
骨格:杉胴縁 21x36x2000 183円/本
天板:杉プレーナー材 9x45x2000 64円/枚
これをサクサク切断する。
このサイズのものは骨格で13本、天板で29枚使用ので、必要数は胴縁4本、天板15枚。
ハンガーボルト、鬼目ナット、その他もろもろを入れても3000円前後で完成するのではなかろうか。。。
さて作業を進める。まずはこれらの木材を切断して

次にもしグラついた時用の補強材として

次に今回使用するオイルステインを塗り込んでいく。
いろいろ調べたのだが、意見もいろいろで。
それなら、塗装が難しくなさそうなオイルステインを使用することに決めた。
塗装とはいえ、オイルステインは表面に膜を形成するものではなく、染めていく感じで染料に近いとのこと。なので、このタイミングで塗装を実施する。
1回目は下地がないので、塗料が吸収される感じが強い。2回目以降は徐々に吸収されにくくなる感じがする。
画像ではわかりづらいが、回数を重ねるたびに色合いが落ち着いてくる感じがする。
ついでにテーブルの補強材も塗装してペーパー掛けをして仕上げておいた。
作業時間の都合上、各乾燥に1週間づつの時間がかかっている。
実際のところはそんなに必要ないと思うが、日曜大工なので仕方ない。。。

2度塗り後に最終仕上げのペーパーかけを実施、その後、拭きあげた。
ここまでくれば、もう一息。。。それはまた。
価格、入手し易さ、加工の容易さ等を考えて使用する木材は以下のものを選択。
骨格:杉胴縁 21x36x2000 183円/本
天板:杉プレーナー材 9x45x2000 64円/枚
これをサクサク切断する。
このサイズのものは骨格で13本、天板で29枚使用ので、必要数は胴縁4本、天板15枚。
ハンガーボルト、鬼目ナット、その他もろもろを入れても3000円前後で完成するのではなかろうか。。。
さて作業を進める。まずはこれらの木材を切断して

次にもしグラついた時用の補強材として

次に今回使用するオイルステインを塗り込んでいく。
いろいろ調べたのだが、意見もいろいろで。
それなら、塗装が難しくなさそうなオイルステインを使用することに決めた。
塗装とはいえ、オイルステインは表面に膜を形成するものではなく、染めていく感じで染料に近いとのこと。なので、このタイミングで塗装を実施する。
1回目は下地がないので、塗料が吸収される感じが強い。2回目以降は徐々に吸収されにくくなる感じがする。
画像ではわかりづらいが、回数を重ねるたびに色合いが落ち着いてくる感じがする。
ついでにテーブルの補強材も塗装してペーパー掛けをして仕上げておいた。
作業時間の都合上、各乾燥に1週間づつの時間がかかっている。
実際のところはそんなに必要ないと思うが、日曜大工なので仕方ない。。。

2度塗り後に最終仕上げのペーパーかけを実施、その後、拭きあげた。
ここまでくれば、もう一息。。。それはまた。
以前も記載したが、ファイル選択のダイアログを表示する場合は
Application.GetOpenFilename(",*.*")
しかしこれでは、1ファイルしか選択ができない。
そこで複数選択したい場合は
Application.GetOpenFilename(MultiSelect:=True)
とするといい。その使用法だが
Sub 複数のExcelFile選択のダイアログ表示()
Dim OpenFileName As Variant
OpenFileName = Application.GetOpenFilename(MultiSelect:=True)
End Sub
単体で選択する場合とほぼ変化はない。
上記使用法で1ファイルだけ選択することも可能。その場合は OpenFileName に選択したファイルのパスが格納されるので前回と使用上の変更はない。
ただし、複数選択された場合は単体で選択された場合と違いが出てくる。
複数選択された場合、 OpenFileName に格納されるファイルのパスは配列の扱いで格納されていく。
よって選択されたファイルを利用したい場合は簡単だがそれなりの処理方法が必要となる。
☆☆☆☆☆使用例☆☆☆☆☆
Sub 複数のExcelFileを指定して開く()
Dim OpenFileName As Variant, Target As Variant
OpenFileName = Application.GetOpenFilename(MultiSelect:=True)
If IsArray(OpenFileName) Then
For Each Target In OpenFileName
Workbooks.Open Target
Next Target
Else
MsgBox "キャンセルされました。"
End If
End Sub
☆☆☆☆☆☆☆☆☆☆☆☆☆
はじめてのキャンプではいろいろと過不足が出てくる。
うちの場合は積載量の関係で、今後絞り込んでいく必要がある。
初回のキャンプで気になったのはテーブル。使用したのは以前から手元にあった

【送料無料】Coleman(コールマン) イージーロール2ステージテーブル/65 170-7640/
¥7,880 (楽天)
Coleman(コールマン) テーブル イージーロール2ステージテーブル/65 170-7640/
¥8,640 (Amazon)
を使用したが思ったより小さい。4人分の食器を並べるとそれだけでいっぱいに…
これでは、ちょっと窮屈なので探してみたものの、大きさと価格で満足できるものが見つからない。
それならってことで自作することに。自作を決意する大方の理由はこれです。
せっかく自作するのならそれなりに満足できるの物にしたいので今回こだわるのは…
1.満足できる大きさ
2.十分な強度
3.可能な限り安価
以上を踏まえつつ、思い描いたものがコレ↓
イメージとしては「ロール式天板のコタツ」
接合部はダボを使用して、足だけはハンガーボルトと鬼目ナットを利用。天板はゴムを利用してつなぎ合わせロール可能の状態にする。
塗料はオイルステインを使用するとして、ざっと材料費が4500円くらいかと思われる。
内訳は
材木2種類で 2000円しない程度
金物類で 500円程度
オイルステインが 2000円しない程度
でおつりがくるのではと思われる。
とりあえず、近所のナフコで材料を買いそろえてくる。
木材

ハンガーボルト

鬼目ナット
天板接続用ゴム(自転車のチューブ)
塗料(オイルステイン)
後は手持ちの工具類とべニア材
工具類の中でドリルだけはハンガーボルトや鬼目ナットを使うには下穴が必要になるからあったほうがいい。
ドリルとはいうものの電動ドライバー程度のものでよい。
実際、2~3000円程度で購入した簡単なものを使用している。
とりあえず材料がそろったので、採寸、切断と実際の加工に入るが今回はここまで。
うちの場合は積載量の関係で、今後絞り込んでいく必要がある。
初回のキャンプで気になったのはテーブル。使用したのは以前から手元にあった

【送料無料】Coleman(コールマン) イージーロール2ステージテーブル/65 170-7640/
¥7,880 (楽天)
Coleman(コールマン) テーブル イージーロール2ステージテーブル/65 170-7640/
¥8,640 (Amazon)
を使用したが思ったより小さい。4人分の食器を並べるとそれだけでいっぱいに…
これでは、ちょっと窮屈なので探してみたものの、大きさと価格で満足できるものが見つからない。
それならってことで自作することに。自作を決意する大方の理由はこれです。
せっかく自作するのならそれなりに満足できるの物にしたいので今回こだわるのは…
1.満足できる大きさ
2.十分な強度
3.可能な限り安価
以上を踏まえつつ、思い描いたものがコレ↓
イメージとしては「ロール式天板のコタツ」
接合部はダボを使用して、足だけはハンガーボルトと鬼目ナットを利用。天板はゴムを利用してつなぎ合わせロール可能の状態にする。
塗料はオイルステインを使用するとして、ざっと材料費が4500円くらいかと思われる。
内訳は
材木2種類で 2000円しない程度
金物類で 500円程度
オイルステインが 2000円しない程度
でおつりがくるのではと思われる。
とりあえず、近所のナフコで材料を買いそろえてくる。
木材

ハンガーボルト

鬼目ナット
天板接続用ゴム(自転車のチューブ)
塗料(オイルステイン)
後は手持ちの工具類とべニア材
工具類の中でドリルだけはハンガーボルトや鬼目ナットを使うには下穴が必要になるからあったほうがいい。
ドリルとはいうものの電動ドライバー程度のものでよい。
実際、2~3000円程度で購入した簡単なものを使用している。
とりあえず材料がそろったので、採寸、切断と実際の加工に入るが今回はここまで。

