Wendy02 の回答履歴

エクセル2007を使用しています 計算式を表示する方法は他のHPなどに書いてありました 計算内容を表示する方法は書かれておりませんでした 例えば １９０＋２５＋２５＝２４０ このように１つのセルで１９０＋２５＋２５＝　もう1つのセルで２４０と表示したいのです なぜ１つなのかと言いますと今回例に挙げたのは３つの足し算ですが ４つの場合や９つの場合などマチマチで A1　１９０ A2　＋ A3　２５ A4　＋ A5　２５ A6　＝ A7　=A1＋A3＋A5　240と表示 この方法でもいいのですが かけ算や割り算があったりと なかなか同じ書式では無理なのです

web上のCSVファイルを数秒毎にダウンロードしてテキストモードで上書き保存するマクロを作りたいのですがどのように記述すればよいでしょうか。 Windows XP SP3 Microsoft Exce2000です。 コピー元 http://www.***.***/101.csv　102.csv　ベーシック認証ありuser=**** password=**** コピー保存先 c:\****\101.csv ファイルサイズは２０KB前後です。 超初心者ですがどうぞよろしくお願いします。

この間あることで忠告めいた事を言って、これが「老婆心」だといいんですが とかきました。 そこでふと思ったのは、「老婆心」って女の年寄りだけが使うのかしら、 男の人は同じ意味で使うとしたら、「老爺心」でも辞書にはない 男の人はなんていうのかしら、ご存知の方教えてください。

以前こちらで質問させて頂いた者です。 以下の７，８の回答者様のコードが参考になり使用させて頂きました。 http://okwave.jp/qa/q6398307.html 少し上手くいかないようなので、もう1度質問させてください。 エクセルＡ列にはURL Ｂ列にはグーグルで検索した時にそのURLが載っているかどうかをチェックするというものです。 検索結果に載っていれば○、載っていなければ×で判定します。 そこで、上記URLの７，８の回答者さんのコードでは、Ｂ列に○、×の判定チェック。 さらにＣ列には検索結果の数まで載せていただきました。 スピードも速くいい感じだったのですが、ちょっと問題が生じました。 それは、手動で試してみると、グーグルに登録されているにも関わらず×の判定が多々ありました。もちろん中には正確なのもあるのですが、どうして手動と違う結果になってしまったのか分からないため質問した次第です。 ちなみに５、６の回答者さんもいい感じだったのですが、途中で止まってしまい使えない状態です。 ちぇっと、わかりずらい質問で申し訳ありませんが、もしお分かりになる方がいましたらお助けください。 よろしくお願いします。

エディタも含めて、どちらがどのような点で優れているのか、また欠点はどのようなところか など教えて頂けませんでしょうか？

以前こちらで質問させて頂いた者です。 以下の７，８の回答者様のコードが参考になり使用させて頂きました。 http://okwave.jp/qa/q6398307.html 少し上手くいかないようなので、もう1度質問させてください。 エクセルＡ列にはURL Ｂ列にはグーグルで検索した時にそのURLが載っているかどうかをチェックするというものです。 検索結果に載っていれば○、載っていなければ×で判定します。 そこで、上記URLの７，８の回答者さんのコードでは、Ｂ列に○、×の判定チェック。 さらにＣ列には検索結果の数まで載せていただきました。 スピードも速くいい感じだったのですが、ちょっと問題が生じました。 それは、手動で試してみると、グーグルに登録されているにも関わらず×の判定が多々ありました。もちろん中には正確なのもあるのですが、どうして手動と違う結果になってしまったのか分からないため質問した次第です。 ちなみに５、６の回答者さんもいい感じだったのですが、途中で止まってしまい使えない状態です。 ちぇっと、わかりずらい質問で申し訳ありませんが、もしお分かりになる方がいましたらお助けください。 よろしくお願いします。

ｏｆｆｉｃｅ 2010 アカデミック版を所有しております。 インストール可能台数はデスクトップ及びノートブックで，２台まで可能と聞きました。 最近，ショップの広告などで，「３台までインストール可能」という文言を見ます。 ３台まで可能なのは通常版のみで，アカデミック版はやはり２台までなのでしょうか？ よろしくお願いします。

web上のCSVファイルを数秒毎にダウンロードしてテキストモードで上書き保存するマクロを作りたいのですがどのように記述すればよいでしょうか。 Windows XP SP3 Microsoft Exce2000です。 コピー元 http://www.***.***/101.csv　102.csv　ベーシック認証ありuser=**** password=**** コピー保存先 c:\****\101.csv ファイルサイズは２０KB前後です。 超初心者ですがどうぞよろしくお願いします。

エクセル2007を使用しています 計算式を表示する方法は他のHPなどに書いてありました 計算内容を表示する方法は書かれておりませんでした 例えば １９０＋２５＋２５＝２４０ このように１つのセルで１９０＋２５＋２５＝　もう1つのセルで２４０と表示したいのです なぜ１つなのかと言いますと今回例に挙げたのは３つの足し算ですが ４つの場合や９つの場合などマチマチで A1　１９０ A2　＋ A3　２５ A4　＋ A5　２５ A6　＝ A7　=A1＋A3＋A5　240と表示 この方法でもいいのですが かけ算や割り算があったりと なかなか同じ書式では無理なのです

エクセルのＡ列にはURLが600ぐらいあるとします。 ある仕事をたのまれたのですが、 各ページがgoogleに登録されているかをチェックしています。 そこで効率のよいやり方（マクロ）があったら教えていただけないでしょうか？ Ｂ列には登録されている場合は「○」をつけ、登録されていない場合は「×」と記入しています。 IEを開いてgoogoleのページでコピペで調べているのですが、しんどいです。 どなたかお助けください。 よろしくお願いします。

エクセルのＡ列にはURLが600ぐらいあるとします。 ある仕事をたのまれたのですが、 各ページがgoogleに登録されているかをチェックしています。 そこで効率のよいやり方（マクロ）があったら教えていただけないでしょうか？ Ｂ列には登録されている場合は「○」をつけ、登録されていない場合は「×」と記入しています。 IEを開いてgoogoleのページでコピペで調べているのですが、しんどいです。 どなたかお助けください。 よろしくお願いします。

何もマクロが組み込まれていないエクセルファイルを 開いたときに、自動でアドイン「テストアドイン」をインストール する良い方法はないでしょうか？ 現在は、テストアドインのインストールを実行するマクロファイルを XLSTARTフォルダに置いています。

いつもお世話になっています。 色々しらべて試してみたんですが、うまくいかないんで教えてください。 CHANGEイベントに複数のイベントを書き込みたいんですが。 今現在、問題なく動いている以下のイベントがあります。 (1) Private Sub Worksheet_Change(ByVal Target As Range) Dim rang3 As Range Dim rang4 As Range Dim ■■ As String Dim LastRow1 As Long LastRow1 = Worksheets("○○").Cells(Rows.Count, "b").End(xlUp).Row Set rang4 = Worksheets("○○").Range("b:I" & LastRow) Set rang3 = Range("h4") If Intersect(Target, rang3) Is Nothing Then Exit Sub On Error Resume Next ■■ = WorksheetFunction.VLookup(Target.Value, rang4, 2, 0) If Err.Number > 0 Then MsgBox Target.Value & "はありません。基本情報台帳に入力してください。" Range("h4").Select Else Application.EnableEvents = False Range("I4").Value = Application.WorksheetFunction.VLookup(Target, Worksheets("△△").Range("b:I"), 2, False) Range("j4").Value = Application.WorksheetFunction.VLookup(Target, Worksheets("△△").Range("b:I"), 3, False) Range("k4").Value = Application.WorksheetFunction.VLookup(Target, Worksheets("△△").Range("b:I"), 7, False) Range("l4").Value = Application.WorksheetFunction.VLookup(Target, Worksheets("△△").Range("b:I"), 8, False) Range("m4").Value = Application.WorksheetFunction.VLookup(Target, Worksheets("△△").Range("b:I"), 5, False) Application.EnableEvents = True Range("K4").Select End If End Sub このシートにもう一つ、イベントを入れたいのですが。 (2) If Target.Count > 1 Then Exit Sub If Intersect(Target, Range("E4")) Is Nothing Then Exit Sub Else If Range("e4").Value = "1" Then Target.Offset(0, 19).Value = "☆" End If どこに入れればいいのかわかりません。 (3) また、(2)のイベントの他に、 (1)のＶＬＯＯＬＵＰが実行され、尚且つ(2)のイベントのＥ４が値が１だった場合、Ｙ４にＨ４の値を入れたいのですが・・・。 (2)のみなら動くことは確認できましたが、(1)のｅｘｉｔ　ｓｕｂ　の直前に入れたり、ｅｎｄ　ｉｆの前に入れたりしましたが、片方は動くが、もうひとつが動かないです。 (3)については、まったくわかりません。 マクロについて、自分でネットで勉強した程度なので、基本がわかっていないからなのでしょうが・・・。 どなたか、教えてください。 お願いします。

エクセルのＡ列にはURLが600ぐらいあるとします。 ある仕事をたのまれたのですが、 各ページがgoogleに登録されているかをチェックしています。 そこで効率のよいやり方（マクロ）があったら教えていただけないでしょうか？ Ｂ列には登録されている場合は「○」をつけ、登録されていない場合は「×」と記入しています。 IEを開いてgoogoleのページでコピペで調べているのですが、しんどいです。 どなたかお助けください。 よろしくお願いします。

エクセルのＡ列にはURLが600ぐらいあるとします。 ある仕事をたのまれたのですが、 各ページがgoogleに登録されているかをチェックしています。 そこで効率のよいやり方（マクロ）があったら教えていただけないでしょうか？ Ｂ列には登録されている場合は「○」をつけ、登録されていない場合は「×」と記入しています。 IEを開いてgoogoleのページでコピペで調べているのですが、しんどいです。 どなたかお助けください。 よろしくお願いします。

すいません。教えてください エクセルのハイパーリンクを一括で登録したいです。 Ｄの列に品番がずらっとのっていて、その各行ごとのＨの列にハイパーリンクを別のフォルダに格納されている、エクセルの同じ品番を検索して貼りたいです。マクロ初心者で大変なやんでます。よろしくお願いします。

ある人が、シート「Sheet1」のセルA1をコピーして セルB1にペーストしました。 この操作をされたことを知る方法ってありますか？ やりたいことは、セルがペーストされたときに 「A1のセルがB1のセルにコピーペーストされたました。」 とメッセージを表示したいと思っています。

ある人が、シート「Sheet1」のセルA1をコピーして セルB1にペーストしました。 この操作をされたことを知る方法ってありますか？ やりたいことは、セルがペーストされたときに 「A1のセルがB1のセルにコピーペーストされたました。」 とメッセージを表示したいと思っています。

こんにちは、いつもお世話になります。 Nothing worth having can be had without labour.（明治時代の仙台工業高校の試験問題） He seemed not to notice the bustle any more than if the silence of a desert had been around him.(明治４３年の外国語学校の入学試験問題） （英文箇所の出典：日本人と英語　もうひとつの英語百年史　著者：斉藤兆史　出版：研究社） 上記の英文は二つとも英文和訳の問題です。 僕は上記の英文を、見た瞬間に「？？？」となり、結局何回も読み返してやっと、５分から１０分後に理解できました（区切り箇所を見抜くのに時間がかかりました）。　こんなに一問一問に時間がかかっていたら、絶対に時間切れで明治時代の英語の試験には落ちていたと思います。（しかも当時の中卒、現代の高校２年終了した人が解く問題です。） 上記の英文は僕が感じた通りにかなりやっこしい英文なのでしょうか？　それとも、一文一文に１０分近くもかかってしまった僕の英語力は低すぎるんでしょうか？？　 この英文の難易度を教えていただけますか？　よろしくお願い致します。

Private Sub Clear() With Worksheets("abc") With .Range("A2", .Range("A" & Rows.Count).End(xlUp)) If .Row = 2 Then .EntireRow.Resize(, 7).ClearContents End If End With End With End Sub シートabcの、A2から最終行まで取得。 A2からA15までデータがあれば、それらの行のG列までクリア。 というコードですが、 If .Row = 2 Thenというのは、2行ならという意味ではないのですか？ 1行でもデータがあればクリアにしてもらいたいのですが、 If .Row > 0 Thenみたいな感じにならないのでしょうか？ 教えていただいたコードですが、この部分がわからないです。 ご教授くださいませ。