ja7awu の回答履歴

エクセルで沢山のテキストボックスのフォントを一括してMSPゴシックに変更するマクロとして以下を実行すると、処理自体は行われているようなのですが結果は元のフォンのままです。 Sub fonto() Dim con As Integer For con = 1 To ActiveSheet.TextBoxes.Count ActiveSheet.TextBoxes(con).Characters.Text = "" With Selection.Characters(Start:=1, Length:=1).Font .Name = "ＭＳ Ｐゴシック" .FontStyle = "標準" .Size = 14 .Strikethrough = False .Superscript = False .Subscript = False .OutlineFont = False .Shadow = False .Underline = xlUnderlineStyleNone .ColorIndex = xlAutomatic End With Next con End Sub どこがおかしいのでしょうか？　 また、これだと文字を削除してしまうので、削除しない方法も知りたいのですが。

エクセルの置換のVBAのことですが。 あるシートに沢山の文字列が入力されています。 abcという文字列が含まれるセルの最後の部分は、必ず以下のようになります。 カンマ　半角スペース　数字　カンマ　半角スペース　数字　　閉じカッコ 　，　　　　　　　　　　　　　13　　　　，　　　　　　　　　　　　56　　　　　　　) 数字はばらばらで、1桁か2桁のどちらかで0はないです。 このような状況で、閉じカッコの左側の数字を全て　１　に置換するVBAが知りたいのですが。

エクセルVBAの置換のことです。 ("abc 2rme3xk5")　　を　　("abc N")　　のように置換させるにはどうすればいいでしょうか？ Nは変数です。 (　) 　や　"　も対象です。 以下のようにやってみましたがダメでした。 Rng.Value = Replace(Rng.Value,"abc*""","abc " & N & """")

エクセル９７を開くと”実行時エラー９　インデックスが有効範囲にありません”と表示。終了をクリックするとエクセルは使用できるようになりますが、同じファイルのシートを選択しても同様のメッセージが表示されます。継続をクリックしても何も表示がかわりません。お手数ですが、解決方法を教えて下さい。宜しくお願い致します。

Visual Basic Editor とExelのウインドウを並べて表示し 新しいマクロの記録をすると エクセルのマクロの記録状況をリアルタイムで表示出来ると 参考書に書いているのですが Visual Basic Editor とExelのウインドウを並べて表示して 新しいマクロの記録をするとVisual Basic Editorが隠れて Exelの画面しか表示されません どんな操作をすれば両方の画面が同時に表示されるのですか よろしくお願いします。

win98seでExcel2000を使用しています。 標準の関数を使用する際、「挿入」→「関数」で「関数の貼付け」ダイアログがでますよね。その後、使用する関数名をクリックすとダイアログボックス内の下のほうに説明文が表示されます。 その説明文をユーザー定義関数にも付けたいのですが、どうすれば良いのでしょうか？どなたか宜しくお願いいたします。

エクセルのあるシート内の「abc」という文字列を「abc20」に置換するには以下で可能ですが、 Sub chikan() Cells.Replace What:="abc", Replacement:="abc" & "20", _ LookAt:=xlPart,SearchOrder:=xlByRows, MatchCase:=False End Sub 「abc」という文字列を連番で「abc20」「abc21」「abc22」・・・・・というふうに置換するにはどうすればいいでしょうか？

Excel2000または2002です。 セル内の文字例えばＡ１に「あいう」と入力されていたら その「あいう」というのをシート名として使うことはできますか？ VBAでよろしくお願いします。

またまたお世話になります。　 (1)セル内に1つまたは2つのハイフンでつながる数字列を含む文字列(ブランクも含みます）がある場合にそこからその数字列のみを取り出す方法をアドバイス願います。 　例　cを文字、xを数字（最大7桁）とします。 セル内の文字列　cccccc cccc cccc xxxxxxx-xx-x ccccccc cccc cccc からxxxxxxx-xx-x を取り出して文字列として別のセルに置く方法です。 (2) もしこのxxxxxxx-xx-x が[ と　] で囲まれていた場合はもう少し容易になりますか？　 よろしくお願いします。 　

A列とB列を比較して、A列の文字列がB列に含まれていた場合（完全に同じ場合）、C列にA列の文字にB列の含まれていない文字を新たにくっつけてC列に表示するにはどうしたらいいでしょうか？ A列 ｜ B列 ｜ C列 りんご ｜ りんご5個 ｜ りんご5個 ケーキ ｜ ケーキ70円 ｜ ケーキ70円 OS Win95 Excel97

エクセルで沢山のテキストボックスの文字を一括して削除するマクロとして以下を実行するとエラーになってしまいます。 (テキストボックス自体は残す) Sub sakujo() ActiveSheet.TextBoxes.Select Selection.Characters.Text = "" End Sub どこがおかしいのでしょう？

エクセルのあるシートに、オートシェイプの図形とテキストボックスの文字が無数に描画してあります。このような状態で、テキストボックスのみを全てセレクト状態にするマクロが知りたいのですが。

ActiveCell.Value = 50 ActiveCell.Value = "50" 上記二つの式はどう違うのでしょうか？

エクセル等でマクロ実行後、実行前の状態に戻すことはできないのでしょうか？ "元に戻す"のボタンはクリックできない状態になってしまいますが。

エクセルのあるシートに、オートシェイプの図形とテキストボックスの文字が無数に描画してあります。これらを全てまとめて、"セルに合わせて移動やサイズ変更をしない"に一括変更するにはどうすればいいでしょうか？ 対象オブジェクトを全てセレクト状態にしてから、マウス右クリックで"オブジェクトの書式設定"を選択してみると、対象が多すぎるようで書式設定ウインドウが出てきませんでした。

Sony Vaio PCG-FX33/BP Windows ME です 普通MS-DOSを開くと　C:\WINDOWS> となっていますが、何かを変更してしまったらしく、　C:\Program Files\Common Files\SYSTEM\Mapi\1041> に変わってしまっています。もとに戻すのにはどのようにすればよろしいのでしょうか。

いま、かなり大きく、複雑な表をエクセル２０００で （ウィンドウズ２０００）つくっています。 いろんな所の列や行を非表示にして見やすくしたの ですが、その非表示にした列や行をまたぐようにして その前後、左右の周囲のセルをドラッグし反転させ、 クリア等すると、非表示になっている列または行のセル に入れてある数式等までクリアされてしまいます。 表示されているセル（可視セル）のみいじれて、 非表示セル（不可視セル）はいじれないように 一括して簡単に設定する方法はないでしょう？ 確かに、方法としてはその不可視セルだけ 保護するとかありますが、不可視セルがいろんな所に 所々あって、それらを一つ一つ保護設定すると 作業が非常に煩雑で、保護忘れもでてきそうです。 いいお知恵があれば拝借させてください。 よろしくお願いいたします。

エクセルでテキストボックスを使用するマクロのスクリプトを調べてみると、ActiveSheet.Shapes("Text Box 1").Select等の文からテキストボックスの番号が分かりますが、マクロを調べることなくシート上からテキストボックスの番号を知ることはできるのでしょうか？

セルB列に文字列で仮に 0.85*0.9 のような文字列の入力があったとします。 これをC列のセルに =ROUND(0.85*0.9.2)の計算を行った結果の答えである 0.77 が表示されるようにしたいのです。 =ROUND("="&ASC(B2),2)とやるとエラーになってしまいます。（ASCを使ったのは全角で入力があった場合を想定しました。） いい方法はないでしょうか？

セルB列に文字列で仮に 0.85*0.9 のような文字列の入力があったとします。 これをC列のセルに =ROUND(0.85*0.9.2)の計算を行った結果の答えである 0.77 が表示されるようにしたいのです。 =ROUND("="&ASC(B2),2)とやるとエラーになってしまいます。（ASCを使ったのは全角で入力があった場合を想定しました。） いい方法はないでしょうか？