SI299792 の回答履歴

全3004件中161~180件表示
  • 重複の数によって塗潰しの色を変える方法

    このカテゴリーのエクセルの達人の方々に質問です。 どなたか回答して頂ける方がおみえでしたらよろしくお願いします。 (ちゃんとした回答ではなく、文句やクレーム等を混ぜた記載はご遠慮ください。  私の質問が気に入らない場合は無視して頂ければ結構です。) 【質問】 添付図のとおり、A列とB列に数字が入っていて重複がありますが 昇順で並んでいます。それが100行あります。重複の数に応じて以下のとおりセルの塗潰しがしたいです。  A列&B列重複 ・・・2個なら”黄色”で塗潰し。  A列&B列重複 ・・・3個なら”青色”で塗潰し。  A列&B列重複 ・・・ 4個なら”緑色”で塗潰し。  A列&B列重複 ・・・ 5個なら”赤色”で塗潰し。 上記を実現する方法をVBAで実現する方法が知りたいです。   【注意事項】   ・A列、B列の数字は毎回異なります。   ・VBAで実現する方法~、と書きましたが、    同様のことが他の方法でも実現できればそれを教えて下さい。   ・使用するエクセルは2021です。 以上、よろしくお願いします。

  • ExcelでURL文字列を連続して挿入させたい

    Excelで、A1、A2、A3と連続して、URLの文字列が入っていて、 B1に、イメージを挿入するHTMLタグ<img src="">があり、 <img src="A1"> <img src="A2"> <img src="A3"> のようにURL文字列をB1に挿入させたいのです。 自分で試しましたところ、 =CONCATENATE("<img src=""", A1, """>")でしたら、1個はできますが、 <img src="A2"> <img src="A3">というように、連続してB1内に挿入する事ができません。 どのようにすれば良いか関数を教えていただけないでしょうか。 よろしくお願いいたします。

  • 春と言えば…

    何色を連想しますか? パッと出てきた1色のみお答えください 私は平凡ですが桜のピンクです よろしくお願いします、ペコリンm(*μ_μ)m

  • 検索値で枠内を検索して一致したら黄色に塗潰す。

    このカテゴリーのエクセルの達人の方々に質問です。 どなたか回答して頂ける方がおみえでしたらよろしくお願いします。 (ちゃんとした回答ではなく、文句やクレーム等を混ぜた記載はご遠慮ください。  私の質問が気に入らない場合は無視して頂ければ結構です。) 【質問】  添付図のとおり、35列×6行の中に数字が1~37まであり、  重複数字を含んでおります。また、AL列とAM列は54行で、  数字が1~37まであり重複数字を含んでおります。  AL1とAM1の2つの値で、35列×6行の中を検索して一致したら  セルを黄色に塗り潰します。これを、AL列とAM列の  最終行(54行目)まで繰り返します。  上記を実現する方法をVBAで実現する方法が知りたいです。   【注意事項】   ・35列×6行の中にある数字の並びは毎回異なります。   ・枠線や塗り潰しの黄色、検索対象~、検索値~は説明の    ために付けているだけです。   ・AL列とAM列は2つで1つの値として昇順に並んでいます。   ・VBAで実現する方法~、と書きましたが、    同様のことが他の方法でも実現できればそれを教えて下さい。   ・使用するエクセルは2021です。 以上、よろしくお願いします。

  • ExcelでURL文字列を連続して挿入させたい

    Excelで、A1、A2、A3と連続して、URLの文字列が入っていて、 B1に、イメージを挿入するHTMLタグ<img src="">があり、 <img src="A1"> <img src="A2"> <img src="A3"> のようにURL文字列をB1に挿入させたいのです。 自分で試しましたところ、 =CONCATENATE("<img src=""", A1, """>")でしたら、1個はできますが、 <img src="A2"> <img src="A3">というように、連続してB1内に挿入する事ができません。 どのようにすれば良いか関数を教えていただけないでしょうか。 よろしくお願いいたします。

  • 反ワク陰謀の人たち

    コロナワクチンから、反ワク陰謀論者が生まれたと思います。反種痘や反BCGや反インフルエンザワクチンはありませんでした。なぜ、コロナから反ワク陰謀論者がでてきたのでしようか?

  • Excelで右シフト横のスラッシュの入力が不安定

    Excelを使っているときに右シフトキーのすぐ横の/キーの入力時、オルトキー押下と同じ現象が起きます。IMEでアルファベット入力、またUS入力時どちらも同じでした。USハイブリッドタイプS,USプロフェッショナル2,別のパソコンのExcelでも試しましたが、どうやら症状は同じようです。 キーマップも初期化してみましたが、同じ状態です。そしてそれが/キーが入力されたり、オルトキー押下状態になったり毎回不安定です。fnキーを押下しながら/キーでは下矢印キーがちゃんと入力されます。スラッシュを押下するとスラッシュキーが入力される状態にしたのですが何か対処方法がありますでしょうか。 ※OKWAVEより補足:「「ScanSnap/fiシリーズ/HHKB」商品について」についての質問です。

  • 火のないところに煙は立たないは正しいのか

    ある人物に関するネガティブなニュースを見ていたら (最近ではないです。2年ほど前の話です) 「火のないところに煙は立たない」とコメントで書いている人がいました。 例えば、昔好きだったが最近は一切テレビに出なくなって有名女優さんに関しても、「性格悪いからじゃない?」 「現場でトラブル」だとか、嘘か本当か分かりませんが、そう思っている人が多いように感じます。 嘘か本当か確かめようがないので、そんな単なる憶測を気にしても意味はないですが、「火のないところに煙は立たない」と言うように、その人物はやはり何かしらの嫌われる要素があるからそう言われると思います。 →なぜなら本当に周りの人間に好かれているなら誰もネガティブな意見は言わない どのように思いますか。

  • テレビの撮影

    ○テレビ撮影の時に、アルコールを違うものに変えるのはなんで? ○バラエティー番組で水浸しになった動ける自動車とか料理 その後は? ○日本の映画にアメリカみたいな パトカー爆破・警察(FBI)ヘリ墜落・大都会トレーラー暴走・貨物列車脱線 爆発 炎上・旅客機墜落っちゅうアクションがないのはなんで?

  • ロリコンはダメなような風潮

    若い女性の方が価値が高いんだからそれが正常ですよね? そういう風潮はオバサンの印象操作ですよね?

  • ロリっていくつまで?

    ロリって中3までですか?それとも小学生までですか?個人の感想で大丈夫です。それと、小6で150センチの子とかはロリなのでしょうか?ロリって何センチまでがロリなのでしょうか?

  • トリガー条項の凍結は民主党政権ですよね?

    立憲や国民民主党は、ガソリン税の引き下げを廃止するトリガー条項凍結について主張してますが、 ガソリン税の暫定税率の廃止を辞めたのは民主党政権ですよね? トリガー条項の凍結したのも民主党政権でしたよね。 国民の玉木などが声高に「ガソリン税の暫定税率のトリガー条項の凍結を解除~」どや顔して言ってるけど、おかしくないでしょうか? 民主党政権時代に予算を多く使いたい為に、ガソリン代の引き下げを凍結したのですよね?

  • 全シート内の差分比較とそのセル色塗りつぶしマクロ

    Excelファイルデータの差分比較とそのセル塗りつぶしのマクロを作成したいのですが、今の自分には、下記のマクロでとどまっており、 マクロを実行するファイル内シートにデータをコピーしたり、 マクロ内でその都度、シート名の記載の変更、差分比較データ範囲の変更が必要になり、大変不便で困っております。 やりたい事は、マクロでユーザがExcelのファイルを選択出来て、 そのファイルの中の全シートのデータについて、差分比較とそのそのセルの塗りつぶしをして、塗りつぶしをファイルへ反映させて保存させることです。 どうか、お分かりの方がいらっしゃいましたら、ご教示をお願い出来ますと大変助かります。 各シート内のデータは、列、行共にほぼ同じフォーマットで値が入っています。 それらのシート内のデータで修正した箇所を見つける為、差分比較がしたいです。 例えば、シートが3つの場合は、 1つ目のシートは修正前のデータ、 2つ目のシート内は1つ目のシートの値を部分的に修正したものです。 3つ目のシート内のデータも、1つ目のデータの値を更に再修正したものです。 この3つのシート内のデータを差分比較したいです。 シートの数は、選択したファイルによって異なります。 Sub TEST1() Dim s1, s2 As Worksheet 'Worksheetsオブジェクト用 Set s1 = Worksheets("修正前S装置検索システム") '比較元シート名 Set s2 = Worksheets("修正後装置検索システム") '比較先シート名 Dim arr1 As Variant, arr2 As Variant arr1 = s1.Range("$A$2:$W$548").Value arr2 = s2.Range("$A$2:$W$548").Value For i = 1 To UBound(arr1, 1) For j = 1 To UBound(arr1, 2) If arr1(i, j) <> arr2(i, j) Then '塗りつぶし処理 s1.Cells(i + 1, j).Interior.Color = RGB(255, 0, 0) s2.Cells(i + 1, j).Interior.Color = RGB(102, 255, 51) End If Next Next End Sub

  • なぜ日本では建国記念日を盛大に祝ないのでしょうか?

    アメリカでは独立記念日を盛大に祝いますが、なぜ日本では建国記念日を盛大に祝ないのでしょうか?

  • 全シート内の差分比較とそのセル色塗りつぶしマクロ

    Excelファイルデータの差分比較とそのセル塗りつぶしのマクロを作成したいのですが、今の自分には、下記のマクロでとどまっており、 マクロを実行するファイル内シートにデータをコピーしたり、 マクロ内でその都度、シート名の記載の変更、差分比較データ範囲の変更が必要になり、大変不便で困っております。 やりたい事は、マクロでユーザがExcelのファイルを選択出来て、 そのファイルの中の全シートのデータについて、差分比較とそのそのセルの塗りつぶしをして、塗りつぶしをファイルへ反映させて保存させることです。 どうか、お分かりの方がいらっしゃいましたら、ご教示をお願い出来ますと大変助かります。 各シート内のデータは、列、行共にほぼ同じフォーマットで値が入っています。 それらのシート内のデータで修正した箇所を見つける為、差分比較がしたいです。 例えば、シートが3つの場合は、 1つ目のシートは修正前のデータ、 2つ目のシート内は1つ目のシートの値を部分的に修正したものです。 3つ目のシート内のデータも、1つ目のデータの値を更に再修正したものです。 この3つのシート内のデータを差分比較したいです。 シートの数は、選択したファイルによって異なります。 Sub TEST1() Dim s1, s2 As Worksheet 'Worksheetsオブジェクト用 Set s1 = Worksheets("修正前S装置検索システム") '比較元シート名 Set s2 = Worksheets("修正後装置検索システム") '比較先シート名 Dim arr1 As Variant, arr2 As Variant arr1 = s1.Range("$A$2:$W$548").Value arr2 = s2.Range("$A$2:$W$548").Value For i = 1 To UBound(arr1, 1) For j = 1 To UBound(arr1, 2) If arr1(i, j) <> arr2(i, j) Then '塗りつぶし処理 s1.Cells(i + 1, j).Interior.Color = RGB(255, 0, 0) s2.Cells(i + 1, j).Interior.Color = RGB(102, 255, 51) End If Next Next End Sub

  • なぜ一夫多妻制にしないのか

    お金を沢山持っている稼ぐ能力のある人、顔がいい頭がいい優秀な遺伝子を持つ人がたくさん子供を作った方が少子化も解消できて優秀な子供が産まれるのでいい世の中になりませんか? 一妻多夫もいいと思います

  • 理科の月の満ち欠けの自作の問題が解けません。

    自作の問題を作成しました。作る資格ありませんが。。。 9月28に月を観察したら、下がんの月が見られた。12月12 日の観察で見られる月の写真はアからオのどれか。なお1か月 は31日とする。 この問題の正解がわからず困っています。 以下の2通りを考えたのですが、どうでしょうか?違いますでしょうか? 解答:上げんの月 29.5ではなく新月から満月まで29日とした場合 正解オになる。9月28から12月12日まで月令の月の変化のイラストを指で直接数えていくと上げんの月 の所になる。 解答: 新月から新月までは29.5日とした場合 ウが答えになる??? (月令10~11日)の写真ウが答え???  9月28~12月12日まで月令の月の変化の写真を照らし合わせて数えていくと上げんの月(月令8日)に丁度なりますが、ただ月令の月の変化の写真は29日までのイラストしか描かれていませんが、新月から新月までは29.5日ありますよね? そうなると、 9月から12月まで2.5ヶ月ほどの期間があるので1.5日ほどずれることになり月令8日の上げんの月から1.5日後の月令9.5くらになると思うのですが、違いますでしょうか? 左から ア:月令5 イ:月令6 ウ:月令10 エ:月令18 オ:月令8を指してます。 回答よろしくお願いいたします

  • 猫がペットになった理由

    犬はなるほど、狩猟に使えますから、 何千年の昔から手なづけてるうちに愛玩動物としても人気が出たのは分かります。 しかし猫はなぜでしょう?はじめから愛玩動物として飼われていたのでしょうか?

  • なぜ遊ぶのか

    富を生み出さない、非生産的な活動がなぜ淘汰されず残り続けるのですか?

  • 人は死んだらどうなりますか?意識など

    皆さんの見解を教えてください