DreamyCat の回答履歴

エクセルのGetasynckeyというものを使ってゲームを作っているのですがなぜかキーを押してないのに反応します。この対処法はありますでしょうか？教えて下さいよろしくお願いします。 コード If Getasynckey（65) <> 0 Then 処理 End if

ウインドウズビスタで、エクセル2007を使用していますが、時折、左上のオフィスボタンをクリックしても動かず（オレンジ色に変わらず）、編集操作が出来なくなります。エクセルをいちど消して再起動すると操作可能にはなりますが、この不具合を解消する方法を教えてください。

ゆったり設定2で再設定行った後、例えばWordでは「→キー」を押し続けても連続的に移動していかない、文章の最後から文章の最初に戻るには文字の数だけキーを叩かなければならない、Delete/Back spaceなどのキーの動きも一つずつになってしまう。解決法をお教え願います。

御世話になります。 色々調べて下記の構文が出来たのですが、あと一歩が足りません。 製造シートのＡ列のデータを抽出シートのRtmが代入されたセルの上から7行目以下に貼付たいのです。 宜しくお願い致します。 Sub sappri() Dim nTotal, i Dim Rtm As Variant nTotal = Sheets("製造データ").Range("A1").End(xlDown).Row Rtm = Sheets("製造データ").Range("J1") With Sheets("抽出") For i = 1 To nTotal .Cells(i * 3 - 2, Rtm).Value = Sheets("製造データ").Cells(i, 1).Value Next i End With End Sub

御世話になります。 色々調べて下記の構文が出来たのですが、あと一歩が足りません。 製造シートのＡ列のデータを抽出シートのRtmが代入されたセルの上から7行目以下に貼付たいのです。 宜しくお願い致します。 Sub sappri() Dim nTotal, i Dim Rtm As Variant nTotal = Sheets("製造データ").Range("A1").End(xlDown).Row Rtm = Sheets("製造データ").Range("J1") With Sheets("抽出") For i = 1 To nTotal .Cells(i * 3 - 2, Rtm).Value = Sheets("製造データ").Cells(i, 1).Value Next i End With End Sub

自宅のパソコンで、最近２台目を設置しました。 一方はvista、もう一方は８です。 そして、昨日vistaのほうの更新作業を終えて、今ちょっと触ってみたら、vista側で操作していないのに、８と同じ仕様になっているものがありました。 例えば、google chromeがインストールされていたり、また画面左下のスタートボタンの右側、のショートカットボタンが８と同じものになっていた と、これらが今のところ確認できている変更です。 これはウィルスの仕業なのでしょうか？すごい不安です。 前にも同じようなことがvista側で起きて、その時は無視しました。 パソコンは２台とも無線でインターネットにつながっています。 もしwindowsに同じネットワーク内のPCは自動で同期するみたいな設定があるのなら、無効にしたいです。 お願いします。

PowerPointと組み入れた動画のファイルは全て同じフォルダに入れているのですが、 組み込んだ動画の再生が、開いた後の一度しか再生できなくなっていて困っています。 どうもPowerPoint開いたときのフォルダが再生後に既定のフォルダに移動してしまって いるようなのです。ということで、EXCELでできる以下のことと同様のことをPowerPointで したいです。なお、使ってるPowerPointは 2010 です。 Sub カレントフォルダの移動() Dim strPath As String strPath = ThisWorkbook.Path ChDrive strPath ChDir strPath End Sub できれば、PowerPointを開いた時に動作させたいです。 よろしくお願いいたします。

現在PowerPointでプレゼンテーションを作っています。 設定するアニメーションの数が多く、同じ図形に同じアニメーション効果を、オプションだけ変えて手作業で設定するのは大変時間がかかります。 そこでVBAを用いて設定したいと考えているのですが、PowerPointのVBAでアニメーション効果を詳細に設定、参照するためにはどのように記述すればよいでしょうか。 ネットで検索をかけたり、ヘルプを参照しましたが、あまり理解できずここで質問させていただきました。 設定したいアニメーション効果は アニメーション効果の 軌跡効果の 直線(下へ) です。 「軌跡の始点、終点」と 「開始,遅延,継続時間」などのオプション(リボンだと「アニメーション」の中の「タイミング」) とを設定したいです。 使用しているPowerPointは2010です。 記述の仕方をご教示お願いします。 また、ネットやヘルプで検索をかけたつもりですが、わかりやすいサイトやヘルプ項目がありましたら教えていただけるとありがたいです。 長文、乱文すみませんでした。

教えてください。 EXCELの2003で通っていた下記構文が2010だとエラーになります。 With Selection.Characters.Font wk_name = .Name wk_size = .Size wk_ul = .Underline wk_color = .ColorIndex End With ２０１０だと書き方が変わるのでしょうか？ よろしくお願いいたします。

ページ設定からできますか。わたしの初期設定はA4紙面へ、、、、図示、初期は左図です。努力して右図になりました。わたしの希望はA4用紙に適当な余白ありの印刷です。まだ余白が広すぎます。拡大ではなくて、初期設定の精密さで作図をしたいです。宜しくお願いします。

自由曲線状に直線の終点を置こうとしていますが、既存の曲線の「頂点」につかまって、思うように終点が下せないのですが、どうすればいいのですか？

エクセル２０１０なのですが、コピーはできるのですが、 そのコピーしたものを貼り付けると、必ずエクセルが止まります。 「動作は停止しました。 問題の解決策をオンラインで確認でき、情報の回復を志向できます。」 と言う表示が出ます。 どうすれば貼り付けできるようになりますか？

現在、Windows7(x64)の環境で使用しています。 いままでOfficeXPを使っていましたが、最近Office Home and Business 2010（製品版）をインストールしたのですが、docおよびxlsxのアイコンが それぞれ白紙のアイコンになっており、WordとExcelに関連付けされません。 （Wクリックしたら、使用するアプリケーション選択画面になります） これに際し、行った対処方法として、 ・「コントロールパネル」内にある「既定のプログラム」より拡張子の関連付け 　→　アプリケーションを選択するも、選択後一覧に表示されず。 ・「コントロールパネル」内にある「プログラムのアンインストール」より 　Office2010を修復 　→　症状変わらず。 ・OfficeXPをアンインストールし、さらにOffice2010のアンインストールを行っ 　た後、再度Office2010を再インストール 　→　症状変わらず。 ・レジストリエディタより、 　HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\ 　Explorer\FileExts 　内の、docおよびxlsxにあるUserChoiceを削除し再起動 　→　症状変わらず。 以上の方法を試しましたがどれもうまくいきませんでした。 他の方法で解決できる方法をご存じな方がいらっしゃったら、どうか力を 貸してください。 よろしくお願いします。

対象：Excel 2010, Windows 7 会社では機密文書が多く、Excel ファイルにアクセス制限が付与されています。アクセス制限のあるファイルを開くと、以下のメッセージ バーがウィンドウ上部に表示されます。 ---------------------------------------- (i) アクセス制限あり　現在、アクセスが制限されています。このコンテンツは指定されたユーザーだけがアクセスできます。 [権限の表示…]　× ---------------------------------------- これを非表示にしたいのですが、方法が不明です。 ファイル > オプション > セキュリティセンター > セキュリティセンターの設定 > メッセージ バー の設定は以下のとおりです。 ●ブロックされた内容に関する情報を表示しない ヘルプには「この設定によりメッセージ バーは非表示になる」と記述されています。しかし、なぜか表示されます。おそらく Excel 2010 の不具合です。 また、インターネット上では「表示タブのメッセージ バーのチェックをはずす」という説明もあります。しかし、私の Excel の表示タブには以下のチェックボックスしか存在しません。 ・ルーラー ・数式バー ・枠線 ・見出し 本来であれば「メッセージ バー」というチェックが存在するらしいのですが、私のExcel には存在しません。おそらく Excel 2010 の不具合です。 このように、メッセージ バーを絶対に非表示にできないようになっています。全部のヘルプとインターネット上の情報を確認しましたが、解決しませんでした。どうすれば非表示にできるのか教えていただけないでしょうか。よろしくお願い致します。

Powerpoint 2013で作成された資料はPowerpoint 2007で問題なく表示できるでしょうか？

パワーポイント2010を使っています。 アニメーションの設定ですが 「直前の動作と同時」と「直後の動作の後」では どのように違うのでしょうか？ 設定して、スライド表示しても 違いはないのですが・・・。 ちなみにＦＯＭ出版のＭＯＳパワーポイントスペシャリストのテキストを使っております。 lesson１２３ですが 違いがわかりません。 ぜひ、回答をお願いします。

先日、使っているPCがウイルス感染しました。復元機能を使って何とか駆除できました。ところが、以前と比べて違和感があります。例えばエクセルですがポインタをセルに合わせてクリックするのですがセル全体がなかなかアクティブにならず、入力する時のように縦棒が点滅します。何回か繰り返すとやっとアクティブになります。エクセルに限らずOUT LOOKや様々な箇所で違和感があり困っています。因みにウイルス防御のソフトは使っていません（動作が凄く遅くなるのでアンインストールしました）どなたか、解決方法をご教授下さい。宜しくお願い致します。

数か月前にwin8を購入してから、 プリントスクリーンを使って ワードで文書を作っていましたが 最近になって プリントスクリーンができなくなりました。 使えていた時は ＦＮ+ＰＲＴＳＣ（ＥＮＤ）でコピーし ワードを開いて 右クリックして貼り付け をして使っていました。 最近は、貼り付けがグレー表示で使えません。 コピーできているのかもわかりません。 Ｃドライブのwindows／system32の中に clipbrbはありませんでした。 このような場合、どうしたらよいのか お教えください。 よろしくお願いします。

エクセルＶＢＡにて 型が一致しない　エラーのポップが出ます。 プログラムは中断していますが、ＯＫボタンで　プログラムは止まらず、その後の処理を実行します。 コードを表示した状態で　デバッグを行いたいのですが、プログラムが止まらないので、箇所が特定できません。 自作フォーム、モジュール、タイマー、何でもありの状態ですが、そのまま、継続される・・・ってことが 場所の特定できる方法って　考えられるでしょうか　

自宅PCはワード２００７です。会社とのバージョンが違い保存の仕方に悩んでいます。 自宅で大まかな事をして、会社で仕上げようと思ってます。その時、自宅と同じように訂正も出来開く事も出来る保存の仕方を教えてください。