バイクシートが破れたためシート張替えを自分でやってみようと思いネットで調べ道具もそろえ始めてみたところタッカーが全然通りません!!タッカーや針を色々変えてみたのですがだめでした。今更シート屋さんに持っていくのも嫌なので他に良い方法があれば教えてください。お願いします。

シートはTW200のフラットシートです。生地はホームセンターで購入しました。

A 回答 (1件)

フラットシートって何でしょう。


もしかして社外のFRPベースでしょうか。
ノーマルのポリエチレン(かな?)ならホームセンターのタッカーでも何とか刺さりますが、
FRPだと厳しいでしょうね。

接着剤で貼り付けてはどうでしょう。
    • good
    • 0
この回答へのお礼

なるほど調べてみると接着剤のやり方がでてきました。ありがとうございます。それで試してみます。

お礼日時:2009/07/25 00:45

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Qマクロでシートタブ色の変更

例えば、A1に数字が入ればシートタブが青色に、A1とA2に数字が入ればシートタブが黄色に、
A1とA2とA3に数字が入ればシートタブが赤色に、このようにするにはどのように記述したら良いでしょうか、よろしくお願いいたします。

Aベストアンサー

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Range("A1:A3"), Target) Is Nothing Then
Worksheets("Sheet1").Tab.ColorIndex = -4142
If Range("A1") <> "" And Range("A2") <> "" And Range("A3") <> "" Then
Worksheets("Sheet1").Tab.ColorIndex = 3
ElseIf Range("A1") <> "" And Range("A2") <> "" Then
Worksheets("Sheet1").Tab.ColorIndex = 6
ElseIf Range("A1") <> "" Then
Worksheets("Sheet1").Tab.ColorIndex = 5
End If
End If
End Sub
これで良いのかな。
ーー
結構、初心者には勉強点があるように思う。
(1)シートイベントというものの勉強
(2)マクロの記録でタブの色を変えるコードを勉強する
また色を抹消するコードを勉強する。
(3)3つの場合の場合分け(条件の多いほうから聞く)
(4)A1:A3以外は素通りさせる方が良いかな(ntersectの利用。これはIFでORを使っても出来る)
数字かどうかのチェックを略している(IsNumericで、使って追加してください)
しかしこの質問のアイデアは珍奇で使えるのかな(今まで質問に出たこと無いような)。
Changeイベントを扱う難しさなどがある。上記コードでは多数例テストして無いので、出来るだけテストして見てください。

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Range("A1:A3"), Target) Is Nothing Then
Worksheets("Sheet1").Tab.ColorIndex = -4142
If Range("A1") <> "" And Range("A2") <> "" And Range("A3") <> "" Then
Worksheets("Sheet1").Tab.ColorIndex = 3
ElseIf Range("A1") <> "" And Range("A2") <> "" Then
Worksheets("Sheet1").Tab.ColorIndex = 6
ElseIf Range("A1") <> "" Then
Worksheets("Sheet1").Tab.ColorIndex = 5
End If
End I...続きを読む

Q原付のシートが破れた・・・張替え以外にいい方法は?

さすがに4年も乗っていると、シートも破れて当然なのですが、
張替え価格を調べると、けっこう高いうえに、
数日かかるとの事で躊躇してしまっています。
張替える以外に自分でできるいい方法はないでしょうか?
駐輪場が青空なので、このままでは見た目がみっともないだけでなくウレタンが雨水を吸ってしまうし・・・(--;)
よく、カラーテープで修正している人は見かけますが
オシャレ度はゼロですよね。
そもそもオシャレにしたいのに張り替えたくないってのが矛盾しているのは自分でもわかっているのですが。汗。
お知恵をお貸しください。よろしくお願いします。

Aベストアンサー

以下のページを参考にされてみてわ?

参考URL:http://homepage2.nifty.com/shimamura/bike/xlr80r/xlr80r_restore_11.htm

QofficeXP Excel シートタブの色変更が出来るタイプと出来ないタイプ??? 

自宅も会社もofficeXPなんですが、少し違うところがあります。

エクセルで、自宅のはシートのタブが色変更できます。
シートタブ上で右クリックから色を選べます。

でも、会社のは同じXPなのに、右クリックからこの機能が出てこないのです。
これってバージョンによるものなんですか?

それとも、法人向けはこの色変更の機能を抜き取っているんですか?

どなたかわかるかたいますか?
よろしくお願いします。

Aベストアンサー

こんにちは

バージョンの違いがあるのでは、バージョンは?
検索していると2002からだとか(未確認ですが)
http://www.relief.jp/itnote/archives/002047.php

では。

Qオフロードのシート張替えについて

このたび、XR250モタードのシートを張り替えようと思っています。cozyシートなども考えましたが、値段が高いのとシートの生地が選べないなどの理由で断念しています。
もし、オフロードのカスタムでシートを張り替えた方がいらっしゃったら、シート張替えのお店などを紹介してください。
よろしくお願いします。

Aベストアンサー

河名シート製作所も有名なようです。
通りがかりに見かけるだけで利用したことはないんですが。

参考URL:http://www.motorcycle-seat.com/

Q[EXCELマクロ] シートタブに自動で色をつけるには?

シートが、1日~31日まであり、シート内は31枚とも全て同じで、
例えば、セルA1 に、日付(平成19年7月18日と表示)があったとき、
その日付を参照して、土曜日なら青色、日曜日なら赤色、というふうに
自動で31枚全てのタブの色を変更してくれるようにしたいのですが、
可能でしょうか?
また可能であれば、どのようにマクロを組めばいいでしょうか?

Excel2003を使用しています。
よろしくお願い致します。

Aベストアンサー

全シートのセルA1に日付が入っている場合でのサンプル。

Sub test()
  Dim sh As Worksheet
  Dim hi As Integer
For Each sh In Worksheets
  With sh
     Select Case Weekday(.Range("A1").Value, vbMonday)
         Case 6
         .Tab.ColorIndex = 41
         Case 7
         .Tab.ColorIndex = 3
         Case Else
         .Tab.ColorIndex = xlColorIndexNone
     End Select
 End With
Next
End Sub
日付以外が入っている場合は、修正が必要かもしれません。
ご参考程度として下さい。

Qバイクのシート張替え

バイクのシートを自分で張替えたいのですが、良い生地が見つかりません。

防水で、良く伸びるシート加工し易い、バイク用レザー生地をご存知の方いらっしゃいましたら、通販のホームページを教えて頂けないでしょうか。

よろしくお願いします。

Aベストアンサー

↓NO.2です。お礼に対しての補足。

お店の状況がわかりませんので、なんともいえませんが、一度、電話又はメールで問い合わせてみてはいかがですか?

↓URL参照。

参考URL:http://shop2.youmall.jp/~advance/~dbop/ec/

Q該当月のみにシートタブに自動で色

いつもお世話になります。
Win7 Excell2010 てす。

記入 顧客名簿 1 ~ 12  とシートがあります。

1)記入、顧客名簿 のシートには色付けしています。
2)1 ~ 12 は半角文字です。 (1月~12月を意味しています)

例えば、
A1 のセルに 8 と 今月は 8月ですから 8のシートタブに自動的色付けさせたいのですが可能でしょうか。
いろんなサイトで検索しましたが見つけることができませんてした。
VBAの記述と思いますがもし可能ならご指導いただけませんか。

Aベストアンサー

例として。

Dim sh As Worksheet
    For Each sh In Worksheets
        If sh.Name = Month(Now) Then
            sh.Tab.Color = 255    ' 赤
        Else
            sh.Tab.ColorIndex = xlNone
        End If
    Next

これを「開く時」イベントに書いておくと、
おそらくお望みの
・該当月の見出しは「赤」
・それ以外の見出しは「無色」
に出来ます。

VBAの使い方は別途お調べくださいませ。

QTW200の値段

個人売買でTW200を売ってもらう話があります。
新車購入、6000キロ走行、色はベージュ、カスタムは後部泥よけとマフラーです。まだ実物見ていませんが程度は良いとのことです。保険は平成20年まででコミコミで15万と言われたのですが高いのでしょうか?バイクは興味はあるけど詳しくないのでよろしくお願いします。

Aベストアンサー

TWというと、TW200、TW200E(フロントディスクブレーキ)、TW225E(排気量UP)とあります。
その中でTW200だと言うなら、僕なら買いません。TW200だと少なくとも8年前のバイクです。
8年間で6000キロの走行は少なすぎです。外から見えない部分の交換が相当必要と思われます。(サビ、ゴムの劣化等々により)
それから、TWはカスタムしてなんぼといったバイクです。
本当に信頼できる友達とかでないなら、メーターの走行距離は信用してはいけません。
ただ、「ベージュ」がノーマル色なら、2003年式のニューホワイトでしょうか?だったら安いかも・・・

参考URLで96年以降のTWが見れます。

参考URL:http://www.yamaha-motor.jp/mc/world/archive/tw/index.html

QEXCELシートのタブの色

EXCELでシート(初期設定でsheet1とかsheet2とか)の色が変えられたと思ったんですけどやり方を忘れてしまいました。
教えてくださ~い!

Aベストアンサー

こんにちは。maruru01です。

一応、2000以前での方法を載せてあるページです。
裏技的なので、おすすめしませんが。

http://xcelfiles.homestead.com/Excel01_J.html#anchor_14133

参考URL:http://xcelfiles.homestead.com/Excel01_J.html#anchor_14133

QTW225 キャブレター調整

TW225のキャブレター調整について教えてください。
中古購入してから何もいじらずに約1年乗っていたのですが、メーカー不明の社外マフラーがうるさすぎて、beams ss300のマフラーに変更しました。
K&Nのパワーフィルターは購入当初から装着しております。
そこでキャブレターの見直しをしてみたのですが、MJ170、PJ32が付いておりました。
ノーマルでMJ132だったはずですので濃すぎなのだろうとMJを160→155→150と下げていき、今は145をつけています。
ところが、MJが薄いという判断がわからないのです。
友人からはアフターファイヤーが出れば薄い、アクセルがスカスカで付いてこなければ薄い、プラグ判別というように聞きました。

しかしプラグを新品に交換して100km走行しましたが、碍子部は薄く薄く薄くですがベージュ色(ほぼ白)でキツネ色にはなりません。
一般的にキツネ色といわれてますが、無鉛ガソリンだからキツネ色にはなりませんよね?

MJ170の時は坂道を走行しているとスピードが落ちていく。
エンブレが効きすぎて、アクセルを離すとすぐスピードが落ちる。
最高速は90km。

MJ145を付けている現状は、坂道もスピードは落ちることなく登りきる。
エンブレはMJ170の時より抑えられた。スピードが緩やかに落ちていく。
坂道(くだりのみ)でエンブレを利かせるとアフターファイヤーが起きる。
最高速は95km。

キャブレター調整が難しすぎて何から手を付けるべきかわからず、とりあえずメインジェットだけ触ってみました。
最高速をあげたいのですが、どこをどうすれば良いか教えてください。
よろしくお願いいたします。l

TW225のキャブレター調整について教えてください。
中古購入してから何もいじらずに約1年乗っていたのですが、メーカー不明の社外マフラーがうるさすぎて、beams ss300のマフラーに変更しました。
K&Nのパワーフィルターは購入当初から装着しております。
そこでキャブレターの見直しをしてみたのですが、MJ170、PJ32が付いておりました。
ノーマルでMJ132だったはずですので濃すぎなのだろうとMJを160→155→150と下げていき、今は145をつけています。
ところが、MJが薄いという判断がわか...続きを読む

Aベストアンサー

ノーマル状態では最高速はどの位なんですか。もしもノーマル状態がマフラーとエアクリでエンジンの回転数を抑えるような仕様になってるようなら最高速アップは期待できます。ノーマルで回転が限界に近いならそれは難しいです。

駆動系をいじらないで最高速を上げるには、エンジンの回転数を上げてやる必要があります。そういうわけで、キャブのセッティングでより高回転まで回るところを探る必要があります。もう一段MJを薄くするとより回るかもしれませんけどちょっと怖いです。これからもっと気温が下がればなおさらです。ムリすると壊れるかも。

アフターファイヤは社外マフラーにつきものです。MJよりスローの調整の方が即効です。


このQ&Aを見た人がよく見るQ&A

人気Q&Aランキング

おすすめ情報