FC2ブログ
カウンタ
プロフィール

sc440ge

Author:sc440ge
「あめた」です。大ケガをして拾われたニャン。サーバーの空き箱に入ってるニャン。
「あめた」ありがとう。
20130603

sc440ge@yahoo.co.jp
パソコン価格情報
1.最新価格情報
2.中古ショップリンク
3.パーツショップリンク
4.PCメーカーリンク
5.おすすめソフト
6.通販

* VBA Tips

　[--/--/--]　*

スポンサーサイト


■■■■■■■■■■　Entry Start　■■■■■■■■■■


・ブログトップへ戻る


上記の広告は１ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。



・ブログトップへ戻る


ちょっと待ってニャン。まだ何か買うニャンか? パソはやめれないニャンか？いたずらしないからゲージから出してニャン。拍手はちょっとだけ好きニャン。
ame-thinks.jpg


スポンサー広告 | 【--------(--) --:--:--】 | Trackback(-) | Comments(-)
編集

　[2010/07/06]　*

[ DWR-PG ] ハブを使って複数台のパソコンで有線接続する


■■■■■■■■■■　Entry Start　■■■■■■■■■■


・ブログトップへ戻る


[ DWR-PG ] ハブを使って複数台のパソコンで有線接続する


buffalo（NTTドコモ）のポータブルWi-Fiルーター「DWR-PG」をハブに有線接続して、複数台のパソコンでインターネットできるか試してみました。 2台のパソコンを有線接続してみましたが、問題なく動作しました。動画サイト（YouTube等）を同時にみたりするのは厳しいと思いますが、ISDNしか使えない地域では、救世主的な存在だと思います。

dwr-pg-hub-001.jpg




1. クレードルのスイッチを「LAN」にする
dwr-pg-hub-005.jpg





2. ハブの1番目にクレードルからのLANケーブルさします
3. ハブの4番・5番にパソコンからのケーブルをさします。
 *どこにLANケーブルをさしても問題ありません。
dwr-pg-hub-003.jpg




ケーブルをつなげるだけで、自動的にIPアドレスがふられます。
dwr-pg-hub-006.png




[ DWR-PGのクライアントモニター ] 2台のパソコンにIPアドレスがふられています。
「端末同時接続数 6台」となっているようですので、6台まではIPアドレスがふられると思います。
dwr-pg-hub-007.png






関連記事



・ブログトップへ戻る


ちょっと待ってニャン。まだ何か買うニャンか? パソはやめれないニャンか？いたずらしないからゲージから出してニャン。拍手はちょっとだけ好きニャン。
ame-thinks.jpg


その他 | 【2010-07-06(Tue) 09:24:32】 | Trackback(-) | Comments(-)
編集 　

　
Ads by Google 1
最新記事
△ TOP PAGE
Copyright © 我的PC古箱 All Rights Reserved. Powered By FC2.　 skin：cuteblog

[Key]
vbCrLf Chr(10) Chr(13) Application.WorksheetFunction.Max　End(xlUp)　ActiveCell.Row - 1 Cells(11,"B").Select　Worksheet_SelectionChange UserForm　Application.Wait Now() Application.Speech.Speak　CreateObject("SAPI.SpVoice") voice.getdescription()　Do While　　TimeValue< Len　vbNarrow　Replace　trim　Until 　Exit Do　Like Right　UBound　Split　vbLf　ActiveSheet.Hyperlinks.Add Anchor　Range　GetVoices.Count　voice.getdescription　Item　ColumnCount ColumnWidths 　ColumnCount ColumnWidths Cells(10, "IV").End(xlToLeft).Column　.PageSetup.PrintArea　Label ComboBox CheckBox OptionButton ListBox vlookup　NumberFormatLocal 　Application.GoTo Reference:=Range("$B$4"), Scroll:=True　ActiveSheet.ScrollArea = "A1:D65536"　　Cells(1, "A").NumberFormatLocal = "yy/mm/dd" Selection.Delete Shift:=xlUp　IsError　Application.VLookup DoEvents　Loop　CriteriaRange　AdvancedFilter Action:=xlFilterInPlace　.SaveAs , xlCSVActiveSheet.Hyperlinks.Add Anchor:=Selection, Address< Dir(ThisWorkbook.Path & "\*") Set myRng = myData.Find(myWord, LookAt:=xlPart) Application.WorksheetFunction.Match InStr　Left　Mid　Trim　Replace　StrConv　vbNarrow　ComboBox1.AddItem　ListBox1.AddItem　Like 'ActiveCell.Interior.ColorIndex = 37 Rows(ActiveCell.Row).Interior.ColorIndex = xlNone Selection.ClearContents Selection.Clear Range(Cells(myRow1, "A"), Cells(myRow2, "C")).ClearContents ActiveSheet.PageSetup.PrintArea = "$A$2:$C$10"

上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。