重要なお知らせ

「教えて! goo」は2025年9月17日(水)をもちまして、サービスを終了いたします。詳細はこちら＞

【GOLF me！】初月無料お試し

ExcelやPowerPoint等を利用中のパソコン利用者に欠かせないOfficeアプリケーション。パージョンが古く、最新版へのバージョンアップを考えている人もいるのではないでしょうか。最新版の機能や購入方法の回答が寄せられています。

回答数

気になる

  • excel

    表があるとします。 食品　　　200円 材料　　　100円 食品　　　150円 食品　　　250円 素材　　　 90円 この時に、VLOOKup関数で「　食品　」を選ぶときに 　　　一つだけでなく、 　　　　　食品　　200円 　　　　　食品　　150円 　　　　　食品　　250円 　　　といった具合に、一覧にしたいのですが、分かりません。 どうしたら良いのか？ よろしくお願いします。　　困っています。

    質問日時: 2025/07/15 06:31 質問者: takatuka カテゴリ: Excel（エクセル）

    回答受付中

    1

    0

  • if関数の複数条件について

    A1セルに半角数字の点数が入っています B1セルに、点数に応じて、以下のとおり、△、〇等の記号を表示したいです ifの複数条件が出来たらと考えています ご存じの方、教えて下さい 1～3⇒△ 4～9⇒〇 10～20⇒◎ 0⇒空白

    質問日時: 2025/07/14 07:12 質問者: aoyama-reiko カテゴリ: Excel（エクセル）

    回答受付中

    3

    0

  • Yahooマップでキーワードを入力する画面が小さくなる原因を教えてください。

    久しぶりにマップを開いたところ、キーワードを入力する画面が大幅に縮小されて非常に見づらくなっています。様式が変わったのか、それとも間違ってどこかをクリックしてしまったのか、従来の大きさの画面に戻りません。 思い当たるようなことがございましたら教えていただけますでしょうか。

    質問日時: 2025/07/13 23:05 質問者: やきまんじゅう カテゴリ: Word（ワード）

    回答受付中

    3

    0

  • Dualsafe Password Manager

    Amazonへ注文品の確認に行ったら、 パスワードのところに Dualsafe Password Manager になっていました。入れろと。 これってどこのメーカのやつですか？ いつのまにか・・？google chroneではないし 削除したいので教えて下さい。

    質問日時: 2025/07/11 12:43 質問者: ひらりん2 カテゴリ: Word（ワード）

    回答受付中

    0

    0

  • エクセルの文字数列関数と競馬に詳しい方！ 教えて下さい！！

    エクセル2002（2020ではありません　2002です） OS＝Win10 添付の図を見てください。 JRAの競馬結果をWEBから取り込んだものです。（データ元はヤフー競馬です） 三連複の的中買い目情報を取り込みました。 取り込んだ直後の現状では、三連複の3つの馬番について桁数が揃っていません なぜならば、一桁の馬番は一桁のまま（つまり、十の位が無い）、二けたの馬番は二桁で表示しているからです 例えば↓こんな感じです 3つの馬番とも一桁の場合、途中のハイフン二文字を入れて全体の文字列長は5文字となる 1-2-3 3つの馬番とも二けたの場合、途中のハイフン二文字を入れて全体の文字列長数は8文字となる。 10-11-12 これを何とかして、すべて8桁（8文字）に揃えたいです。 例えば下記のような状態です 1-2-3　　 ↓上記を下記のように変換する 01-02-03 しかし、馬番が二けたの場合に頭にゼロを付加すると意味のないことになります。 ですので 10-11-12 ↓上記については何も変換しない 10-11-12 （つまり「010-011-012」のようにしない） このようにしてすべての三連複の買い目を文字列長を8文字に揃えたいのです。 これ、どうやってやったらいいでしょうか？ ちなみに、レース結果データを取り込む際に複勝3着までのデータも取り込んでいます。 友人に相談したら 「そんなの簡単だよ、複勝の馬番を3つ並べて、間にハイフンを挟めば簡単にできるじゃん！ 　テキスト関数やconcatenate関数で簡単にできるよ！ 　そんなことも分からないの？　馬鹿だなあ！」 と言われました。 ぱっと見はそれでいいかもしれませんが、そこには連勝複式の落とし穴があります。 三連複など連勝複式の買い目を表記する場合、予想着順、結果着順は問わないので、 連勝複式なら2つの馬番を、三連複なら3つの馬番を、「昇順に並べなおして表記する」ということになっています。 ところが競馬の結果の複勝のデータは、馬番の大小は関係なく着順通りに並んでいます。 ですので友人の言うところの 「複勝入賞の3つの馬番をハイフンでつなげればいい」 ということを実行すると、それは「3連単の的中買い目」となってしまいます 私が必要としているのは、三連複の買い目であり、その買い目を一桁馬番は十の位にゼロを付加して、強制的に二桁（二文字）にしたい、ということなのです。 ですので友人に相談するのは止めにしました。 競馬とエクセルに詳しい方、よろしくお願いします。

    質問日時: 2025/07/06 15:11 質問者: s_end カテゴリ: Excel（エクセル）

    ベストアンサー

    3

    0

  • パワーポイントを2in1でPDF化したい

    パワーポイントを2in1でPDF化したいのですが方法を教えて下さい。パワーポイントを印刷でMicrosoft Print to PDFを選択し、２スライドで印刷すると2in1でPDF化されますが、スライド形式なので全体的に小さくなってきます。イメージとしては２in1で印刷してそれをPDF化するイメージです。 今は２in1で印刷してそれをハンド作業で複合機を使ってPDF化しています。 Docuworksを利用するとよいのでしょうか？

    質問日時: 2025/07/05 10:27 質問者: yasumitsuyo カテゴリ: PowerPoint（パワーポイント）

    解決済

    1

    1

  • PowerPointの置換の「すべて置換(A)」をキーボードでクリックするには

    PowerPoint(Microsoft365)の右上の置換画面（図参照）で、キーボードから「すべて置換(A)」をクリックするにはどうすればよいですか？ Alt + A は反応しません。 半年くらい前まではダイアログボックスで置換のウィンドウが表示され、そこで「Alt + A」で置換ができていました。

    質問日時: 2025/07/04 12:14 質問者: workpad30j カテゴリ: PowerPoint（パワーポイント）

    ベストアンサー

    2

    0

  • Windows10のクイックアクセスとマクロをWindows1１で動作させたい

    パソコンがWindows1１に替わったので、Windows1０のWordとExcelの クイックアクセスとマクロをWindows1１の方に使用できるようにしたいのですが、Windows1１のファイル構成が変わり、どこにそれをコピーしてよいかわかりません。 下記のファイルはWindows1１のどのデレクトリーにコピーしたら良いですか？ もしくは、どういう方法で処理したら良いですか？詳しくないので、手順も教えてください。 ・Wordのクイックアクセス　　Word.officeUI ・Wordのマクロ　　　Normal.dotm ・Excelのクイックアクセス　Excel.officeUI ・Excelのマクロ　　PERSONAL.XLSb

    質問日時: 2025/07/02 16:33 質問者: greenhope カテゴリ: Word（ワード）

    ベストアンサー

    1

    0

  • パワーポイントでスライドショーを作成したい

    シナリオの入った漫画を４枚作成しペイントとワードで保存しています。この４枚を使ってパワーポイントでスライドショーを作りたいのです。原版（漫画）が写真であありませんがスライドショーは作成可能でしょうか？またその方法をも教えてください。

    質問日時: 2025/07/02 14:34 質問者: Newkitakarasu カテゴリ: PowerPoint（パワーポイント）

    ベストアンサー

    3

    0

  • アイコン名に(1)が付いているのはなぜですか?

    Office365のワードとエクセルのアイコン名に(1)が付いているのは何故ですか? 以前は付いていなかったと思います、最近気付きました。 このまま使用続けてよろしいか? 必要な対策が有れば教えてください。

    質問日時: 2025/06/28 23:04 質問者: fghjrtyu カテゴリ: Word（ワード）

    ベストアンサー

    3

    1

  • 表計算ソフトでの様式の呼称

    複数ページに渡る表データがあります。 ①印刷する場合、表の項目の書かれた行をタイトル行として指定し、全ページに自動でタイトル行が印刷されるよう想定された様式。（添付画像の左のような状態） そうではなくて、 ②１ページの印刷範囲ごとに、直接タイトル行を書き込んでいるような様式。（添付画像右のような状態） この２つの様式を区別する呼称はありますか？ AIに聞いてみると、 ------------ ① タイトル行を印刷設定で繰り返す方式 （＝印刷時に各ページの上部に自動で表示される） 印刷タイトル行方式 自動繰り返しタイトル行 ヘッダー行の自動繰り返し ② 各印刷ページの範囲内に、手動でタイトル行を直接書き込む方式 （＝表の途中に同じ見出し行が何度も手書きで挿入されている） 手動タイトル行方式 繰り返し見出し行の挿入方式 複製見出し行付き表 中間見出し行挿入型 ------------ ・・・とのことで。 わかるっちゃわかるけど、なんかもっと他の表現はないのかなと。 個人的にこう言い分けているとか、IT用語、スラングみたいなものがあるようなら知りたいです。

    質問日時: 2025/06/28 13:10 質問者: zongai カテゴリ: Excel（エクセル）

    解決済

    3

    0

  • Office2024インストール後の疑問点

    お世話になります。 【補足】ノートPC／HPを2024年大手電化店で新品購入・Windows11搭載） 【状況１】 先日、Office2024Home（Family）永続版を マイクロソフト社の公式HPから正規価格で購入後 24時間以内にメールでプロダクトキーの情報などを受け取りました。 同社のマイアカウントにサインインして、 今回購入した製品をダウンロード→インストールしました。 問題なくインストールできたのですが、 プロダクトキーを入力することなく完了し、 WordやExcelなども無事インストールされています。 【質問１】 プロダクトキーを入力することなく自動的にインストールできたのですが 後々不都合が生じることはないでしょうか。 【状況２】 今回インストールしたWordやExcelを使用する時だけ PCのウィンドファンの音がうるさくなり長時間続きます。 ちなみにそれらの使用以外は、動画を視聴していてもほとんどファンの音はしません。 ＊PCはまだほぼ新品です。 【質問２】 ファンの音がうるさくなるのは 新Officeの使用がPCに負担をかけるのでしょうか。 他のPCや他の利用者も同様の現象が起こりますか？ それは今後も続きますか？それとも最初だけ？ 【状況３】 WordやExcelを開くたびに、自動的にサインインされます。 【質問２】 自動サインインを解除する方法を教えて下さい。 ちなみにネットでいろいろ調べましたが、 どれも有用ではありませんでした。 以上、全て、あるいはどれか一つでも結構ですので ご回答をよろしくお願い致します。

    質問日時: 2025/06/25 23:04 質問者: erika7811 カテゴリ: その他（Microsoft Office）

    ベストアンサー

    6

    0

  • access vbaでフォームを開くとき、Yes/No型のコンソールに全てYesを代入したいです。

    T_供給テーブルから表フォーム（F_配達処理）を作成し、T＿供給テーブルの配達処理（Yes/No型）項目をフォームのプロパティシートにあるフィルターで配達処理=Noと配達処理項目がＮｏのデータだけに絞っているのですが、今度は絞られて開いてくるF_配達処理の配達処理項目を予めYesを代入したいのですがどの様な方法がありますでしょうか？ 説明下手で申し訳ありません。供給テーブルから未配達のデータをフォームに表示し、表示された際には、予めYesを代入したいのです。 フォームのオープン処理に以下を入れるとエラーになってしまいました。 Private Sub Form_Open(Cancel As Integer) Forms!F_配達処理.配達処理.Value = Yes End Sub 何か良い方法を思いつく方がお見えでしたご教授下さい。

    質問日時: 2025/06/24 16:04 質問者: 浩一51 カテゴリ: Access（アクセス）

    解決済

    3

    0

  • 【画像あり】【関数】指定した条件に一致する地域を、抜き出す為には？

    【やりたい事】 以下画像をご覧ください C列のC2からC6へ関数を入れたいです 関数は A列に表示している地域があり 条件B列に一致する地域を、C列に表示する関数 【補足】 例はA列データ５。E列条件は２。 結果、C列の該当は３　ですが 実際は A列２，０００。E列が７０～８０ E列条件は約１００　入力可能を希望 ご存じの方、関数orアドバイスを教えて下さい

    質問日時: 2025/06/24 08:08 質問者: aoyama-reiko カテゴリ: Excel（エクセル）

    ベストアンサー

    2

    1

  • エクセルでフィルターした値をフィルター行のみに貼り付けする方法がうまく出来ません

    以下手順をネットで見つけ実行しましたが出来ません。Ctrl+Rを押しても左から右へ コピー貼付出来ません。ちなみに、フィルターかける事なしに単純にA1セルをB1セルへ 貼付も出来ません。Office365です。同バージョンでは以下オペできないのでしょうか？？？ ご存じの方、教えて下さい ●セルを複製して移動させるなどして、コピーするセルがコピー先よりも左の列に来るようにする ●フィルターをかけてコピーしたい値のみを表示させる ●コピーしたいセルをShiftと左クリックを組み合わせた通常の範囲選択で選択する ●Alt + ; のショートカットキーで選択したセルを可視セルのみにする ●Ctrlキーを押す（押したままにする） ●Ctrlキーを押したまま貼り付け先のセル範囲を左クリック&ドラッグで選択する ●Ctrl + R のショートカットキーで左側の選択セルを右側の選択セルにコピーする

    質問日時: 2025/06/24 08:05 質問者: aoyama-reiko カテゴリ: Excel（エクセル）

    ベストアンサー

    1

    0

  • ＱＲコードについて

    Ａ４一枚の紙に書いた文章と絵（画像）（ワードファイルといいます）をＱＲコードにして皆に見てほしいのです。①私は自分のＵＲＬは持っていません。②ワードファイルは今ＰＣのデスクトップに「ワード形式」と「ＰＤＦ形式で」保存しています。③ＱＲコードを作る際はクルクルのソフト（無料版）を使いたいと思っています。　　以上のことをベースにして、ワードファイルをＱRコード化してだれでも読み取れるように巣ｒ方法を教えてください。

    質問日時: 2025/06/23 10:37 質問者: Newkitakarasu カテゴリ: Word（ワード）

    ベストアンサー

    4

    0

  • エクセルに写真が貼れない（フォトの写真をダウンロードしました）

    エクセルに写真を貼り付けたい グーグルフォトで任意の写真をダウンロード エクセルで、挿入～図～画像～このデバイスで「図の挿入」画面が開くがダウンロードした写真が見当たらないので挿入できません エクスプローラーで、・・＞ダウンロード＞Photos-1-001 として写真の確認はできます なぜなのでしょうか よろしくお願いします。

    質問日時: 2025/06/20 17:58 質問者: だんちゃん16 カテゴリ: Excel（エクセル）

    ベストアンサー

    3

    0

  • エクセルのライセンスが分かりません

    サブスクリプションの確認ができるように 1～としてサインインしてくださいとありますが 〜部分のアドレスは何ですか？ 2保存されてる資格情報が最新でないとあるのは何ですか？

    質問日時: 2025/06/20 12:23 質問者: たろーだす カテゴリ: Excel（エクセル）

    解決済

    1

    0

  • マイクロソフト オフィスのサポート期限

    マイクロソフト　オフィス　ホーム＆ビジネス　２０２１のサポート期限が、２０２６年１０月１３日までです。今回、延長サポートが提供されませんと案内が出ています。昨年のパソコンまではこれらが使用されていて、今年に入ってから、新モデルから２０２４になってきています。２０２１の人はサポート終了後、このまま使用できますでしょうか？モデルチェンジのやりすぎで、サポート面が手薄の状態になってきています。

    質問日時: 2025/06/11 13:23 質問者: けんた35 カテゴリ: その他（Microsoft Office）

    解決済

    8

    1

  • エクセル 日付順に並べてかえたい。

    添付した画像のように、使ったガソリン代をエクセルで記入しているのですが、これを日付順に並びかえることは出来ますでしょうか？ 日付だけ小さな順から並べることは出来たのですが、行ごと並べかえたいです。やり方をご存知の方教えてください。

    質問日時: 2025/06/10 15:17 質問者: gyrocanopy カテゴリ: その他（Microsoft Office）

    解決済

    5

    0

  • 【関数】３つのセルの中で最新の結果(１番右のセルにデータあり)を表示する関数について

    【やりたい事】 以下が画像をご覧ください ・B2セルに関数を入れたいです ・D1 F1 H1の結果の最新の情報を関数にて返したいです ・パターンは図１から４の４パターンのみです 【具体例】 ⇒図1⇒B2は空白を返しています。図１は、D1 F1 H1に何も入力されていない為 ⇒図2⇒B2は　あいうえお　を返しています。D1に１つだけ結果がある為です ⇒図3⇒B2は　かきくけこ　を返しています。D1とF1に１つだけ結果がある為です。最新結果の順番は、H1、F1、D1　です ⇒図4⇒B2は　さしすせそ　を返しています。D1とF1とH1に１つだけ結果がある為です。最新結果の順番は、H1、F1、D1　です 以上、ご存じの方、関数or関数作成のアドバイスをお願い致します

    質問日時: 2025/06/08 16:06 質問者: aoyama-reiko カテゴリ: Excel（エクセル）

    ベストアンサー

    3

    0

  • LibreOffice Clalc（またはエクセル）において日祝日の場合に1を返すプログラムは？

    お世話になります。 LibreOffice Clalc（またはエクセル）において日祝日の場合に1を返すプログラムを教えてください。 2025年の場合ですと11月2日が日曜日で11月3日が文化の日ですので、その場合に1を返してほしい、という具合です。（つまり、自動的に日祝日であると判断してほしい。） 例えばA4が11月2日でA5が11月3日だとする場合に、D4とD5にそれぞれ「１」と表示する方法を教えていただけますと幸いです。

    質問日時: 2025/06/07 19:05 質問者: 1888kizm カテゴリ: Excel（エクセル）

    解決済

    4

    0

  • 【マクロ】excelファイルを開くたびに、マクロのコードを自動実行する

    【やりたい事】 ファイル名取得.xlsmを開くたタイミングで 自動で、以下マクロが実行する事は出来ますか？ 【補足】 今は、ファイルを開いて以下マクロを実行して、その後 上書きして使っています マクロファイルには沢山のマクロやマクロと連携している 情報が、excel上に記載あり、編集が出来てしまう状態です 間違っていじってしまうリスク排除の為 読取専用にしたいというのが理由です 【マクロが保存されているファイル】 C:\Users\2020\OneDrive\マクロ\フォルダ名取得\フアィル名取得.xlsm 【コード】 Sub ファイル名取得() Dim Path, FileName As String folderpath = "C:\Users\2020\OneDrive\マクロ\フォルダ名取得\" filepath = Dir(folderpath & "*あいうえお*.xlsx") If filepath <> "" Then MsgBox "ファイルは存在します" Range("a1") = filepath Else MsgBox "Sample1.xlsmは存在しません" End If End Sub

    質問日時: 2025/06/07 11:25 質問者: aoyama-reiko カテゴリ: Excel（エクセル）

    ベストアンサー

    4

    0

  • 【関数】=EXACT(a1,b1) a1とb1が空白の場合trueではなく、空白を返すには？

    【やりたい事】 C1に　=EXACT(a1,b1)　の関数があります a1とb1が　空白セルの場合　true　を返しますが A1とB1が空白に限り　trueではなく、空白にする関数を教えて下さい なお、A1とB1が同じデータで　true　を返すのは当然必要です 宜しくお願いします

    質問日時: 2025/06/05 22:24 質問者: aoyama-reiko カテゴリ: Excel（エクセル）

    ベストアンサー

    4

    0

  • wordのみ開かない

    Microsoftをインストールしましたが、wordのみ開かないです。 下記の事項を試してみましたが、いずれも開けませんでした。どうすればwordが立ち上がるでしょうか？ 状態 ・wordファイルをダブルクリックしても開いてこない。タスクバーには表示されるが、押しても反応なし ・最大化、最小化、移動は押せるが反応なし ・セーフモードでは起動できる ・他のexcelやoutlookは起動できる ・Windows,Officeは最新バージョン 試したこと ・Microsoft officeのアンインストール　再インストール ・オンライン修復 ・クイック修復 ・再起動 ・https://office-qa.com/Word/wd114.htm 上記のサイトの初期化設定 メーカー　mouse os Windows 11 Home 64bit

    質問日時: 2025/06/05 11:23 質問者: シュウ11 カテゴリ: その他（Microsoft Office）

    ベストアンサー

    5

    0

  • Microsoft365で作ったword文書をpdfに変換する

    いつも、ありがとうございます。 Microsoft365で作ったword文書をpdfに変換すると、 行間があいた状態で出力されてしまいます。(1ページに収まらない) wordで作ったレイアウトがそのままpdfで出力されてほしいです。方法はありますか？

    質問日時: 2025/06/03 22:17 質問者: mapmap1027 カテゴリ: Word（ワード）

    ベストアンサー

    7

    0

  • 「テキストデータで送ってください」と指示があった場合

    取引先から、書類を「テキストデータで送ってください」と指示があったのですが、Outlookメールをテキスト形式かHTML形式かリッチテキスト形式の中で、テキスト形式で送ってほしいという意味でしょうか？ それとも、文字列だけのメモ(Wordをテキストファイルに変換して)を送ってほしいという意味でしょうか？ もしくは、単にWordデータやExcelデータ、PDFデータのことを指して言っているのでしょうか？ 今更すぎて、初歩的な疑問なのですが、どなたか正解を教えていただけないでしょうか？ この場合、書類を何ファイルで送れば間違いないでしょうか？

    質問日時: 2025/06/03 16:50 質問者: aya。。。。。 カテゴリ: Access（アクセス）

    ベストアンサー

    5

    0

  • 【マクロ】【画像あり】❶ブックから別ブックへデータ貼付❷分岐 シート①にデータありシート②へ貼付の件

    【やりたい事】 ブックAからブックBへデータを貼付したい 貼付先ブックBのシートは４つある(シート①　シート②　シート③　シート④) ⇒シート①にデータがあった場合、シート②へ貼付をしたい 【手順】 1a_20250529123939.xlsx　を開く。下記参考コードあり 2シート①に貼り付けようとする。下記参考コードあり 3シート①の最終行が２行目まである場合⇒次のシート②へ貼付けする ※シート②は最終行が２行目より小さい。貼り付け可能 ※シート①から④は、次のいずれかどっち ⇒パターン１：データが２行目以上ある。パターン２：データが１つもない。空シート 4シート②へ貼り付け 5a_20250529123939.xlsxを閉じる 【ファイルパス】 貼付元エクセル。シート１つだけ。シート名不規則 C:\Users\user\Documents\ツール\ダウンロード場所\ファイル名変更場所\a_20250529123939.xlsx ファイル名⇒a_20250529123939.xlsx 貼付先エクセル C:\Users\user\Documents\ツール\ツール.xlsm 貼付先シート４つ⇒　シート①　シート②　シート③　シート④ ファイル名⇒ツール.xlsm マクロが保存されているファイル C:\Users\user\Documents\ツール\コントロール.xlsm ファイル名⇒コントロール.xlsm 【参考コード】ファイルを開き、シート①へ貼り付けするコード Sub フォルダ内のファイル1つ開く() Dim folder_path As String ' インプットファイルのフォルダパス Dim file_name As String ' 現在処理中のファイル名 Dim file_path As String ' 現在処理中のファイルのフルパス Dim file_count As Long ' フォルダ内のファイル数 Dim src_wb As Workbook ' 処理対象のブックオブジェクト ' フォルダパスの設定 folder_path = "C:\Users\user\Documents\ツール\ダウンロード場所\ファイル名変更場所\" ' フォルダ内のファイル確認 file_count = 0 file_name = Dir(folder_path & "*.csv") ' フォルダ内のExcelファイルを取得 Do While file_name <> "" file_count = file_count + 1 ' ファイル数をカウント file_path = folder_path & file_name ' ファイルパスを生成 file_name = Dir() ' 次のファイルを取得 Loop ' ファイル数が1でない場合は、プロセスを終了 If file_count <> 1 Then MsgBox "CSVファイルが2個以上あります" & vbCrLf & _ "CSVファイル: " & file_count, vbExclamation Exit Sub '条件を満たさない場合、これ以上処理を続けないために終了 End If ' 対象ファイルを開く Set src_wb = Workbooks.Open(file_path) ' 貼り付け先のブックを開く Dim wb1 As Workbook filepath = "C:\Users\user\Documents\ツール\ツール.xlsm" Set wb1 = Workbooks.Open(filepath) Dim allsheet As Variant ' シート４つを配列変数に入れる allsheet = Array("シート①", "シート②", "シート③", "シート④") src_wb.Worksheets(1).Cells(1, 1).CurrentRegion.Copy wb1.Worksheets(allsheet(0)).Cells(1, 1).PasteSpecial Paste:=xlPasteValues End Sub

    質問日時: 2025/06/03 07:14 質問者: aoyama-reiko カテゴリ: Excel（エクセル）

    ベストアンサー

    3

    0

  • 【マクロ画像あり】❶1つの条件一致❷１つの条件に部分一致❸最終行データコピー❶❷❸実現するマクロの件

    【やりたい事】 下記画像をご覧ください 図１のC2セルのデータ【2025/6/3/ 12:00】を図2のB4セルに値貼付けしたい 【手順】 1【条件１】図2のA列と本日(today例：6/3)、事例だと6/3を一致(当日作業という意味)を確認 2【条件２】図１のファイル名の先頭【タスクA】と 　1行目のタスク名【タスクAアウトバウンド】の部分一部一致を確認⇒図2のB1セル 3B1からの最終行(lastrow)を調べる⇒B3セルと確認 4図1のC2セルの値を、B4セル(lastrow+1,"B")に値貼付けする 【ファイルパス】 図1↓ C:\Users\user\Documents\ツール\ダウンロード場所\ファイル名変更場所\タスクA20250529123939.xls 図2↓ C:\Users\user\Documents\ツール\時間管理シート.xlsx 【ファイル名】 図1↓ タスクA20250529123939.xls 図2↓ 時間管理シート.xlsx

    質問日時: 2025/06/03 02:07 質問者: aoyama-reiko カテゴリ: Excel（エクセル）

    解決済

    3

    0

  • 【マクロ】既存ファイルの名前の先頭に、プルダウン(3種類)のいずれか１種類の名前をつけるためには？

    【フォルダの場所】 C:\Users\user\Documents\ツール\ダウンロード場所\ファイル名変更場所 ※ファイルは常に１つしか無い。おかない。 ※既存ファイル　task20250529123939　が置かれる場所 【既存ファイルの名前】 task20250529123939 ※ファイル名は上記形式。数字の日付から秒までは変化します ※数字の意味：2025年05月29日12:39分39秒 【選択肢。プルダウン】 インバウンドあ インバウンドい インバウンドう ※既存ファイルの名前の先頭に付けたい名前をプルダウンから手作業で１つ選び 　マクロを使い、既存ファイルの先頭に、名前をつける ※プルダウンは3-6種類まで増やす予定 【最終的に既存ファイルの先頭にプルダウンより１つ選び、作りたいファイル名】 インバウンドあtask20250529123939 ※上記選択肢より、１番目を選んだ場合

    質問日時: 2025/06/02 23:52 質問者: aoyama-reiko カテゴリ: Excel（エクセル）

    ベストアンサー

    4

    0

  • Word、図を貼付けると表示されない、行間が狭くてつぶれてしまう、初期設定を変更できますか

    詳しい方教えてください。 Word　home and business premium を使っています。 windowsマーク+shift+S マークで画面をコピーし 【ctrl＋　シフト＋ V】 で貼付けます。そうすると画面が貼付けられているのですが、表示されず、 書式の設定→レイアウトで【背面】等にすると表示されるようになります。 貼付けた時点では、レイアウトオプションでは【行内】となっています。 また、文章を書いて改行すると行間が詰まっているようで文字が潰れてしまい、いつも行間を自分で【1.0】や【1.5】にしています。 毎回この作業を行なうのは大変なのですが、デフォルトで画像がちゃんと表示されるように貼付けられ、文章も文字が潰れないような行間の設定二する方法はありますでしょうか。 教えていただければと思います。

    質問日時: 2025/06/02 05:54 質問者: nazo0719 カテゴリ: Word（ワード）

    解決済

    3

    0

  • ワードの句読点が変な位置に出てしまいます。どうしたら直せますか。

    縦書きの文書で、句読点やかぎ括弧が変な位置に出てしまいます。 写真を貼れないので、頑張って説明します。 例えば句読点（、。）は本来縦書きではマスの右上に出ますが私の文書では左下に出ます。 かぎ括弧は始めの鍵がマスの右側に出て、さらにかぎ括弧が一つ目のかぎも閉じるかぎも普通のかぎ括弧を左へ９０度回転させた形になっています。 試しに文章を一部消して書き直しても同じように出てしまいます。また、文書のフォーマットを一度横書きに直すと普通に戻りますが、縦書きに直すとまたおかしな位置に出てしまいます。そして、よく見るとところどころ普通の場所のままになっている個所もあります。 どうしてでしょうか。どうしたら直せますか。

    質問日時: 2025/06/01 21:10 質問者: allotment カテゴリ: Word（ワード）

    解決済

    3

    0

  • Dir関数のDo Whileステートメントにおける１回目と２回目のファイル名の呼出し方法の違い

    【質問したい事】 以下、コードの　fileName = Dir()　の部分 当該コードはファイル名を２回目に呼びだすコードです 以下のとおり１回目と２回目の呼出し方法が違うのはなぜですか？ １回目の方はしっくりきます。 なぜとか、考えずにそいうものと覚えれば良いのでしょうか？ ご存じの方、ご指南宜しくお願いします 【参考ネットにあった解説↓】 Dir関数は1回目の呼び出しで指定されたファイルを取得しますが 2回目以降の呼び出しでは引数なしで実行する必要がある 【１回目】 fileName = Dir(folderPath & "\*.xls", vbDirectory) 【２回目以降】 fileName = Dir() 【コード説明】 ダウンロード場所フォルダにある、エクセルファイルの 名前を書きだす コード実行後、シートに以下のとおり書き出される a_20250529123939.xls a_20250529123940.xls a_20250529123941.xls a_20250529123942.xls ※ダウンロード場所フォルダには上記４つのエクセルファイルがあります 【コード】動きます Sub フォルダのファイル名取得() Dim folderPath As String Dim fileName As String Dim i As Long folderPath = "C:\Users\2020\OneDrive\マクロ\ツール\ダウンロード場所" '1回目の呼び出し fileName = Dir(folderPath & "\*.xls", vbDirectory) i = 1 Do While fileName <> "" Cells(i, 1).Value = fileName '2回目の呼び出し。なぜ、１回目と呼出し方法が違うのは？ fileName = Dir() i = i + 1 Loop End Sub

    質問日時: 2025/06/01 12:18 質問者: aoyama-reiko カテゴリ: Excel（エクセル）

    ベストアンサー

    2

    0

  • 【マクロ】【画像あり】ファイル名を別名にて保存。元ファイルはゴミ箱へ移動⇒する方法について

    【やりたい事】 ４つのファイルを１つ転記するたびに ❶　シート①へ転記した後。ファイル名を変更する a_20250529123939.csv　⇒　転記済a_20250529123939.csv ※現在は、wb.Close　←コードより抜粋　'csvを閉じる　コピー元ファイルを閉じているだけです ❷　元ファイルはゴミ箱へ移動したい a_20250529123939.csv⇒ゴミ箱へ移動。※コピー元ファイル ●●●●４回繰り返す●●●● ※ファイルが４個の場合。ファイルは１から４個まで変わります 【マクロ説明】下記画像をご覧ください 以下画像とコードをご覧ください ４つのCSVデータを、別ブックの４つのシートへ１つづつ、順番にコピーするマクロです ※CSVはexcelブックに置き換えて考えて頂いてもOKです。同じです ※４つのCSVデータは、１から４個まで変わります ※CSVデータはエクセルと置き換えてもOKです 【マクロの保存されているファイル】※マクロにて指示するファイル C:\Users\2020\OneDrive\マクロ\ツール\コントロール.xlsm 【４つのファイル】※コピー元 "C:\Users\user\Documents\web\ダウンロード場所\a_20250529123939.csv" ※シートは１つしかない。名前は不規則 "C:\Users\user\Documents\web\ダウンロード場所\a_20250529123940.csv" ※シートは１つしかない。名前は不規則 "C:\Users\user\Documents\web\ダウンロード場所\a_20250529123941.csv" ※シートは１つしかない。名前は不規則 "C:\Users\user\Documents\web\ダウンロード場所\a_20250529123942.csv" ※シートは１つしかない。名前は不規則 【貼付先】コピー先。下記画像の左上のエクセルファイル C:\Users\2020\OneDrive\マクロ\ツール\ツール.xlsm シート① シート② シート③ シート④ 【ゴミ箱】 C:\Users\2020\OneDrive\マクロ\ツール\ダウンロード場所\ゴミ箱 【コード】本サイト アンサーにてご指南頂きました。動きます Sub 貼付先ツールへ転記｡1から4個まで() Const Folder_path As String = "C:\Users\2020\OneDrive\マクロ\ツール\ダウンロード場所" Dim fname As String 'csv Dim wb As Workbook '１個目の、CSVファイル名を取得 fname = Dir(Folder_path & "\*.csv") '貼付先ツール Dim filepath1 As String '貼付先ツール Dim wb1 As Workbook '貼付先ツール Dim ws1 As Worksheet '貼付先ツール filepath1 = ThisWorkbook.Worksheets("Sheet1").Cells(1, 1) '貼付先ツール。既に開いている。重くならないかチェック Set wb1 = Workbooks.Open(filepath1) '貼付先ツール Dim sno As Long: sno = 0 '貼付先ツール Dim sname As String '貼付先ツール Dim name_tbl As Variant '貼付先ツール name_tbl = Array("シート①", "シート②", "シート③", "シート④") 'csv Do While fname <> "" Set wb = Workbooks.Open(Folder_path & "\" & fname) sname = name_tbl(sno) wb.Worksheets(1).Cells(1, 1).CurrentRegion.Copy wb1.Worksheets(sname).Cells(1, 1).PasteSpecial Paste:=xlPasteValues 'csvを閉じる wb.Close sno = sno + 1 '２個目の、CSVファイル名を取得 fname = Dir() Loop Worksheets(name_tbl(0)).Activate Cells(1, 1).Select End Sub

    質問日時: 2025/06/01 11:09 質問者: aoyama-reiko カテゴリ: Excel（エクセル）

    ベストアンサー

    2

    0

  • 小説を書く際にWordで漢字の横につけるルビって見えにくいけど、一番小さい文字サイズの4の方がいいで

    小説を書く際にWordで漢字の横につけるルビって見えにくいけど、一番小さい文字サイズの4の方がいいですか？ルビでも多少は文書のズレが出てしまうので。

    質問日時: 2025/05/31 20:14 質問者: まいこさん_2975 カテゴリ: Word（ワード）

    解決済

    2

    0

  • Wordでレイアウトから文字数と行数を指定して、小説を書いてるんですが、1番下の文字が一つ空白が空い

    Wordでレイアウトから文字数と行数を指定して、小説を書いてるんですが、1番下の文字が一つ空白が空いてしまうのですが、どうしたら改善できますか？ 例えは分かりにくいですが、 写真で言うとこんな感じです。即興で小説を書きました。下手くそですが。実際の原稿はここではお見せできないので。 ルビを振ると若干の文字ずれは起こりますよね？「ああ、 の丸の部分が空きが出てますが、Wordの設定で詰めることってできますでしょうか？こういうのは別に空いていても賞に差し支えはないのでしょうか？ 原稿用紙のまま送らず、Wordからレイアウトで文字数×行数を指定し、書いて行こうと思いますが、カギカッコやルビを振ると、多少のズレもありますか？

    質問日時: 2025/05/31 20:07 質問者: まいこさん_2975 カテゴリ: Word（ワード）

    解決済

    3

    0

  • 5単位で繰り上げしたい

    セルA1の値を5単位で繰り上げしたい 例； 9→10 　　10→10 　　14→15 　　15→15 　　18→20 よろしくお願いします

    質問日時: 2025/05/31 17:43 質問者: もっくん3 カテゴリ: Excel（エクセル）

    解決済

    1

    0

  • 【マクロ】【画像あり】４つのファイルデータを別ブックの４つのシートへそれぞれコピーしたい

    【やりいた事】下記画像をご覧ください ◆◆◆４つのCSVシートのデータを、別ブックの４つのシートへそれぞれコピーしたいです◆◆◆ ※CSVはexcelブックに置き換えて考えて頂いてもOKです。同じです ４つのCSVシートを別ブックの１つのシートへコピーするコードは出来ました 以下の参考コード❶をご覧ください しかし、やりたい事は、４つのファイルデータを１つのシートではなく、４つのシートへ コピーする方法です コピーの方法は、以下です ws.Range("A1").CurrentRegion.Copy 貼付けは、４つのシートのそれぞれの　A1セル　にてOKです 最後に、参考コード❷は、シートを１番目から４番目まで順番に移動するコードです 移動するたびに、作業のコードを入れる事も出来ます ここに、４つのファイルデータの内の１つをコピペするコードを入れてもうまく いくと思います コードならびにアドバイスのご教授お願いします 【ファイルパス】コピー先 "C:\Users\user\Documents\web\最新配列.xlsm" ※４つのファイルのデータをコピーしたいファイル ※シート名⇒Sheet1、Sheet2、Sheet3、Sheet4、 【ファイルパス】※４つのファイル "C:\Users\user\Documents\web\ダウンロード場所\a_20250529123939.csv" ※シートは１つしかない。名前は不規則 "C:\Users\user\Documents\web\ダウンロード場所\a_20250529123940.csv" ※シートは１つしかない。名前は不規則 "C:\Users\user\Documents\web\ダウンロード場所\a_20250529123941.csv" ※シートは１つしかない。名前は不規則 "C:\Users\user\Documents\web\ダウンロード場所\a_20250529123942.csv" ※シートは１つしかない。名前は不規則 【参考コード❶】4つのファイルデータを1つのファイルへ集約 Sub 順番｡4つのファイルデータを1つのファイルへ集約() Dim folder_path As String Dim fso As FileSystemObject Dim Folder As Folder Dim File As File Dim wb As Workbook ' フォルダのパスを指定 folder_path = "C:\Users\user\Documents\web\ダウンロード場所\" ' FileSystemObjectを作成 Set fso = New FileSystemObject Set Folder = fso.GetFolder(folder_path) ' フォルダ内のファイルを順次処理 For Each File In Folder.Files If File.Name Like "*.csv" Then ' ファイルを開く Set wb = Workbooks.Open(File.Path) Set ws = wb.Worksheets(1) ' 1つのシートに４つのファイルデータをコピー貼り付け lastrow = ThisWorkbook.Worksheets("集約").Cells(Rows.Count, 1).End(xlUp).Row ws.Range("A1").CurrentRegion.Copy ThisWorkbook.Worksheets("集約").Cells(lastrow + 1, 1).PasteSpecial Paste:=xlPasteValues Application.CutCopyMode = False wb.Close SaveChanges:=True End If Next File End Sub 【参考コード❷】 ４つのシートに順番にバトンタッチし、作業をする。作業は、４つのフアィルデータをそれぞれコピペしたい Sub sheetarrayの配列() Dim allsheet(3) As Variant allsheet(0) = "Sheet1" allsheet(1) = "Sheet2" allsheet(2) = "Sheet3" allsheet(3) = "Sheet4" Dim i As Long Dim ws As Worksheet For i = 0 To 3 Set ws = ThisWorkbook.Worksheets(allsheet(i)) MsgBox allsheet(i) ●●●●●●●●●●●●●●●●●●●●●●●●●● ここに４つのファイルのデータをコピーするデータを 開き、コピペするコードを貼り付けるコードを入れたい ●●●●●●●●●●●●●●●●●●●●●●●●●● Next End Sub

    質問日時: 2025/05/31 00:03 質問者: aoyama-reiko カテゴリ: Excel（エクセル）

    ベストアンサー

    2

    0

  • 【マクロ】【画像あり】４つのファイルデータを１つのエクセルブックにある４つのシートへそれぞれコピー

    【やりいた事】⇒コードorアドバイスお願いします 下記画像をご覧ください ❶.１つのエクセルブックがあります。このブックには４つのシートがあります ❷.４つのcsvファイルがあります(CSVはEXCELファイルに置き換えてもok) ⇒この４つのファイルのデータを❶の１つのエクセルにある、４つのシートへ貼付したいです ※４つのデータは１個～４個へ変動します。ファイルが１つの時もあれば４つの時もあるという意味 ※❶のコピー先シート４つは、貼付前は全て、何も何も貼りついていない状態です 【動作手順】※以下４データはWEBサイトよりダウンロードしています ※出来ればDL順に貼付したい。複雑な場合、順番じゃなくてもOK⇒順不同 a_20250529124239.csvを開く ⇒A1セルでCtrl+A全選択しコピー ⇒最新配列.xlsm　Sheet1　のA1セルに値貼付 a_20250529124240.csvを開く ⇒A1セルでCtrl+A全選択しコピー ⇒最新配列.xlsm　Sheet1　のA1セルに値貼付 a_20250529124241.csv⇒最新配列.xlsm　Sheet3　のA1セルに値貼付 ⇒A1セルでCtrl+A全選択しコピー ⇒最新配列.xlsm　Sheet1　のA1セルに値貼付 a_20250529124242.csv⇒最新配列.xlsm　Sheet4　のA1セルに値貼付 ⇒A1セルでCtrl+A全選択しコピー ⇒最新配列.xlsm　Sheet1　のA1セルに値貼付 【ファイルパス】コピーしたい４つのファイル。※コピー元 C:\Users\2020\OneDrive\マクロ\ダウンロード場所\a_20250529123942.csv シート名：20250529123942　⇒シートは１つしか無い C:\Users\2020\OneDrive\マクロ\ダウンロード場所\a_20250529123941.csv シート名：20250529123941　⇒シートは１つしか無い C:\Users\2020\OneDrive\マクロ\ダウンロード場所\a_20250529123940.csv シート名：20250529123940　⇒シートは１つしか無い C:\Users\2020\OneDrive\マクロ\ダウンロード場所\a_20250529123939.csv シート名：20250529123939　⇒シートは１つしか無い 【ファイルパス】コピー先 C:\Users\2020\OneDrive\マクロ\最新配列.xlsm ※４つのファイルのデータをコピーしたいファイル ※シート名⇒Sheet1、Sheet2、Sheet3、Sheet4、 【参考コード】４つのシートにそれぞれ作業をするべく、順番になります Sub sheetarrayの配列() Dim allsheet(3) As Variant allsheet(0) = "Sheet1" allsheet(1) = "Sheet2" allsheet(2) = "Sheet3" allsheet(3) = "Sheet4" Dim i As Long Dim ws As Worksheet For i = 0 To 3 Set ws = ThisWorkbook.Worksheets(allsheet(i)) MsgBox allsheet(i) ●●●●●●●●●●●●●●●●●●●●●●●●●● ここに４つのファイルのデータをコピーするデータを 開き、コピペするコードを貼り付けるコードを入れたい ●●●●●●●●●●●●●●●●●●●●●●●●●● Next End Sub 【参考コード】ファイルを開いてデータをコピペするコードです Dim wb As Workbook Set wb = Workbooks.Open("C:\Users\2020\OneDrive\マクロ\ダウンロード場所\a_20250529124242.csv") Range("a1").CurrentRegion.Copy ws.Range("a1").PasteSpecial Paste:=xlPasteValues Application.CutCopyMode = False wb.Close

    質問日時: 2025/05/30 00:07 質問者: aoyama-reiko カテゴリ: Excel（エクセル）

    ベストアンサー

    1

    1

  • ワードの段落番号と文字の隙間について（Office365） ワードで段落番号を付け、そのあとの文字と

    ワードの段落番号と文字の隙間について（Office365） ワードで段落番号を付け、そのあとの文字との間隔を調整したい時、 右クリック→「リストインデントの調整」から調整できる場合と、「段落」→最初の行→ぶら下げ」から調整できる場合（添付写真）と、2種類あるようですが、どう違うのでしょうか。 いつも分からず、出来る方を模索しながら作業しており時間がかかります。 詳しい方、ご教示お願い致します。

    質問日時: 2025/05/25 11:27 質問者: rinyoshi カテゴリ: Word（ワード）

    解決済

    1

    0

  • セルにぴったし写真を挿入

    エクセルのセルを少し大きくして、（ちょっと太め）の外枠を作成 そこに写真を挿入したい 枠にぴったりはまるようなセットの仕方はありますか？ ユーチューブ動画に上がっていたと思いますが、見当たりません よろしくお願いします。

    質問日時: 2025/05/24 18:57 質問者: 00mitue00 カテゴリ: Excel（エクセル）

    解決済

    2

    0

  • 【マクロ】エラー【#DIV/0!】が発生する場合の回避方法について

    【質問】 以下コードは　１行目から最終行までのE列の値、あ、い、う、その他に よって、各動作をする、マクロです しかし、E列に　エラーが発生した時に　#DIV/0!　以下で止まります 当該事象を、止まらないように、進めたいです なお、#DIV/0!　発生時は、以下の処理でOKです 逆に、なぜ、#DIV/0!発生時に、Case Elseに分類されないのでしょうか？ ご存じの方、宜しくお願いします Case Else Cells(i, "i") = Cells(i, "c") 【エラー】 実行時エラー１３。型が一致しません Case "あ" 【コード】 Sub sample() i = 1 lastrow = Cells(Rows.Count, "a").End(xlUp).Row Do While i <= lastrow Select Case Cells(i, "e") Case "あ" Cells(i, "i") = Cells(i, "c") Case "い" Cells(i, "i") = Cells(i, "c") & "-1" Case "う" Cells(i, "i") = Cells(i, "c") & "-2" Case Else Cells(i, "i") = Cells(i, "c") End Select ' 行番号変数の値に1を加え、次の行に進む i = i + 1 Loop End Sub

    質問日時: 2025/05/24 10:21 質問者: aoyama-reiko カテゴリ: Excel（エクセル）

    ベストアンサー

    3

    0

  • 【画像あり】パワーポイントのスライド４枚をA3の用紙に、印刷したい

    標題の件、以下画像をご覧ください A３の用紙に、PPT４スライド【1-4ページ】を印刷したいです プリンターは業務用で、両面や２UP(１枚に２ページ分印刷)や4UP等できます やり方ご存じの方、教えて下さい PPTバージョン。office365

    質問日時: 2025/05/23 00:14 質問者: aoyama-reiko カテゴリ: PowerPoint（パワーポイント）

    ベストアンサー

    2

    0

  • ワードで，一瞬，英数になってしまう現象について

    ワードで文章を打っている時，一瞬，英数になってしまうことがあります。 つまり「あ」と打つと，「ａ」になってしまいます。 いつもというわけではなく，数分に一度くらいです。 数日前から突然現れた現象です。 英数になったとき，そこでちょっと間を置いて，あらためて打ち直すと，また，かな入力（ローマ字打ち）にもどります。 Microsoft 365を使っていますが，クイック修復やオンライン修復をしてもダメです。 原因は何なのでしょう。 パソコンの不調で，このようなことになりますか？ ご存知の方がいらっしゃいましたら，どうぞ宜しくお願い致します。 当方，パソコンはどちらかというと初心者です。

    質問日時: 2025/05/22 12:58 質問者: ひろjp カテゴリ: Word（ワード）

    ベストアンサー

    2

    0

  • EXCELのVBAで複数のシートを追加したいが１つしかできない

    A列にYesかNo B列に名前 が入力されています。 A列がYesだったら、B列の名前を付けたシートを作成したいです。 下記のコードを実行すると、ひとつ目のYesはシートが作成されるのですが、 ふたつ目以降は追加されずに終わってしまいます。 どうしたら良いのでしょうか。 シート名の重複はチェックしています。 Sub シート追加() Dim i As Long For i=2 to 11 If Cells(i,"a")="Yes" Then Worksheets.Add.Name = Cells(i,"b").Value End if Next End Sub

    質問日時: 2025/05/22 11:58 質問者: みく19 カテゴリ: Excel（エクセル）

    ベストアンサー

    1

    0

  • エクセルで質問です。 ハイパーリンクで同ファイル内のページを指定した場合、他のパソコンに送ってもエラ

    エクセルで質問です。 ハイパーリンクで同ファイル内のページを指定した場合、他のパソコンに送ってもエラーにはなりませんか？

    質問日時: 2025/05/22 11:11 質問者: tan-nu カテゴリ: その他（Microsoft Office）

    ベストアンサー

    2

    0

  • 皆さん、おはようございます♪ パワーウィンドウについてのご質問です。 パワーウィンドウの強みやメリッ

    皆さん、おはようございます♪ パワーウィンドウについてのご質問です。 パワーウィンドウの強みやメリット、デメリットはなんでしょうか？ また、パワーウィンドウとは？ 皆さんの意見とご回答お待ちしています♪ よろしくおねがいします。

    質問日時: 2025/05/22 05:06 質問者: 勉強君。 カテゴリ: PowerPoint（パワーポイント）

    解決済

    2

    0

  • オートフィルターの絞込みをした場合、フィルターを設置していない隣の列も一緒に絞り込みされる？

    【質問】 以下画像をご覧ください フィルターはD列、E列、F列にしか設置されていませが D列の絞り込みをすると、AからI列まで絞り込みがされます Q1.質問したい事は、フィルターが無い列も同じように、絞り込みされますか？ という質問です Q2.A-Iまでの全てデータが、確実に、絞り込みされる 　AーIまで、オートフィルターの範囲を広げる事でしょうか？ 例はデータがすくないですが、実際は、１００~２００列。行は５００~３，０００行まであります ご存じの方、教えて下さい

    質問日時: 2025/05/21 14:10 質問者: aoyama-reiko カテゴリ: Excel（エクセル）

    解決済

    3

    0

  • 【マクロ】【画像あり】関数が入っているセルを空白とみなさないように出来ますか？

    【やりたい事】 以下画像をご覧ください。 G1からG5までに、C1-C5までのデータを入力したいです 以下のコードでは、A列に空白が現れるまでループするようになっています 本当の空白はA6なのです。A3が関数は入っていますが、空白表示の為 ここで、ループが止まってしまいます ですので、A3の関数【=IF((E3)=0,"",(E3))】もデータが入っているとみなす コードはありませんでしょうか？ ご存じの方、教えて下さい 【コード】 Sub sample() ' 変数の宣言 ' 行番号変数に初期値を設定 i = 1 ' A列の値を判定し、G列に対応する値を書き込む Do While Cells(i, "a") <> "" Select Case Cells(i, "a").Value Case "アメリカ" Cells(i, "g") = Cells(i, "c") Case "日本" Cells(i, "g") = Cells(i, "c") & "-1" Case Else Cells(i, "g") = Cells(i, "c") End Select ' 行番号変数の値に1を加え、次の行に進む i = i + 1 Loop End Sub

    質問日時: 2025/05/21 14:10 質問者: aoyama-reiko カテゴリ: Excel（エクセル）

    解決済

    1

    0

  • 【Officer360？Officer365？のデータの入力規則の解除方法を教えてくださ

    【Officer360？Officer365？のデータの入力規則の解除方法を教えてください。】データタブにデータの入力規則のアイコンがありません。 データの入力規則を解除したいです。 問題のセルは半角英数字しか入力出来ないようになっていて、文字列を入力する必要があり、セルの編集で文字列に設定しても、文字列を入力すると半角英数字しか入力出来ないとエラーが出て困っています。 原因と解決方法を教えてください。

    質問日時: 2025/05/19 16:50 質問者: redminote11pro5G カテゴリ: Excel（エクセル）

    ベストアンサー

    3

    0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう！

Q質問する（無料）

【Microsoft Office】に関するコラム/記事

【Microsoft Office】のコラム/記事一覧  もっと見る
コンピューターによる高速度に演算、判別、照合をする情報処理が可能になったことで私たちの便利な暮らしは支えられています。コンピューターを形作るOS、ソフトウェア、運用するためのネットワーク、サーバーなどに関してはこちらを参照してください。
カテゴリ一覧
ページトップ ページトップ

新しく質問する

デイリーランキングこのカテゴリの人気デイリーQ&Aランキング

マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング

おすすめ情報