便利にスピーディーに！

確定申告@インターネット

インターネット情報ハンターになる

新しいタブについて・・・◆◆500枚！◆◆最近インターネット閲覧時に使用する「新しいタブで開く」の機能が使用できなくなってしまいました。
これは設定等で修正できるのでしょうか？
OSはwindows vista home premium （SP２）で、IE８にて使用しています。
最近新しいソフト等を入れた事もありませんし、原因が分かりません。
記憶にあると言えばキーボードの左下辺りを手の平で押してしまった事位です。
状態としてはインターネット自体は普通に閲覧出来るのですが、新しいタブで開こうとすると新しいウィンドウで開いてしまいます。
新しいウィンドウで開くを選択するとそれに関してはそのまま普通に新しいウィンドウで開きます。
他にも同じ事で質問されている方がいらっしゃいましたので、それを参考にツールにてタブに関する設定を行ってみましたが症状は変わりません。
かなり困っています。
お詳しい方のご教授を願います。
宜しくお願い致します。
「Internet Explorer 8」で、新しい「タブ」を開くには、・「Ctrl＋T」同時押し。
・現在開いている「タブ」の右側（右端）に、小さな正方形をクリック。
・「ファイル」→「新しいタブ」。
となります。
「タブ」の設定を「ツール」→「インターネット・オプション」から既にやられても改善されないとの事ですが、原因が「キーボード」云々は少し考えづらいと思います。
以下を実施されて下さい。
・「ツール」→「インターネットオプション」→「詳細設定」から「リセット」※：注意。
これは、言わば「IE」の「リカバリ」ですので、「ツールバー」や各種設定が初期値になります。
以上、ご参考まで。

インターネットでホテルの検索をしていたら設備に「ＢＴ付」と記載されていて無しより値段が高いでもＢＴってなんだか分かりませんバストイレ付って事なのかな？
でもそれならそう書くでしょうね、教えて下さい

パソコンの環境とインターネット接続時間の関係についてノート型パソコンを使用しているのですが、電気のコンセントにつないでいる時と、パソコンだけをつながずに単体でいつもと違う場所で使用するときでは、後者の方がインターネット接続がおそくなるようなきがします。
気のせいでしょうか？
ノート型パソコンとはいえ、常にコンセントにつないでいた方が、パソコン自体に負担をかけることなく、スムーズにいくものなのでしょうか？

VBAの初心者です。
どうか教えていただきたく知恵袋に掲載しました。
私はVBAの初心者です。
下記のサンプルをインターネットから引き出してきたのですが、私流に変更できません。
変更したいポイント①現在のマクロだと、検索先のファイルを指定しなければならないのですが、私は毎回同じ検索先（サーバー）に変更したい。
②検索結果は表示せずに、見つかった場合じゃ、検索したファイルを自動的に展開したい。
見つからないは「見つかりませんでした。
」などの表示をしたい。
この2つだけですが、何かいい方法はありませんか？
あったら、私にお教えください。
何卒よろしくお願い致します。
Sub Sample() Dim f, buf As String, cnt As Long, FSO Set FSO = CreateObject("Scripting.FileSystemObject") With Application.FileSearch .NewSearch buf = InputBox("検索するファイル名を指定してください") If buf = "" Or buf = "False" Then Exit Sub .Filename = buf buf = GetFolder("検索を開始するフォルダを指定してください") If buf = "" Then Exit Sub .LookIn = buf .SearchSubFolders = True ''サブフォルダも検索する If .Execute() > 0 Then For Each f In .FoundFiles cnt = cnt + 1 Cells(cnt, 1) = f ''パス＋ファイル名 Cells(cnt, 2) = FSO.GetFile(f).Name ''ファイル名 Cells(cnt, 3) = FSO.GetFile(f).ParentFolder ''パス Next f Else MsgBox "見つかりませんでした" End If End With Set FSO = NothingEnd SubFunction GetFolder(msg As String) Dim Shell, myPath Set Shell = CreateObject("Shell.Application") Set myPath = Shell.BrowseForFolder(&O0, msg, &H1 + &H10) If Not myPath Is Nothing Then GetFolder = myPath.Items.Item.Path Else GetFolder = "" End If Set Shell = Nothing Set myPath = NothingEnd Function