Microsoft Office(4ページ目)

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

回答数

気になる

Accessのクエリの印刷設定

Accessでクエリの実行結果を印刷する際、用紙の向きを「横」にしたいのですが、プレビューでみると縦になっており、毎回「横」に設定し直してから印刷しています。毎回自動で「横」になるよう設定する方法は、ありますでしょうか。

質問日時: 2025/03/28 16:57 質問者: アルムの森の木カテゴリ: Access（アクセス）

ベストアンサー

1

0
エクセルで印刷するとき

エクセルで表を作成し、４枚印刷したいのですが、２枚目だ上が余白出来て表がかけて分かれて印刷になってしまいます。余白設定はどのようにすればいいでしょうか？

質問日時: 2025/03/28 14:58 質問者: あ777 カテゴリ: Excel（エクセル）

ベストアンサー

2

0
wordの表で「℃」と入力すると強制的にCambria Mathになってしまう

wordの表であらかじめフォントをcentryにしておいてセルの中に「℃」と入力、その左に後から数字を入力したいのですが、「℃」と入力した時点でフォントが強制的にCambria Mathになってしまうのですがどうすればよいですか。

質問日時: 2025/03/26 20:28 質問者: yamadasiraisi1996 カテゴリ: Word（ワード）

解決済

1

0
office365 回復できない。

office365を使用していました。情報不足で回復できません。どうすれば回復できますか？教えて下さい。

質問日時: 2025/03/26 08:03 質問者: miracara2 カテゴリ: その他（Microsoft Office）

ベストアンサー

3

1
Microsoft Office Homeインストールについて

Office Home2024（Windows、Mac対応/オンラインコード版）を購入し、メールに届いた方法でインストールをしようとしたのですが、サブスクリプションの有効期限と再サブスクリプションと書かれた画面が出てきました。再サブスクリプション（青字になっている）をクリックすると、Microsoft 365を再度利用するという画面が表示されてしまいます（新たに課金）。以前WindowsPCでMicrosoft365を利用したことがあるのですが、期限が切れた後に、買い切り版を購入したという経緯があります（現在はWindowsPCは、買い切り版で使用可能です）。今回はMacで永続版を使用したいのですが、どうすればいいのでしょうか。Microsoftアカウントを別に作らなければいけないのでしょうか。よろしくお願いします。

質問日時: 2025/03/25 23:20 質問者: ドノバンカテゴリ: その他（Microsoft Office）

解決済

2

0
表の作成について

WordとExcelだと表を作るのにどっちが便利ですか？ちなみに、計算式などは入ってないただの表ですが、列や行がいろいろ入り乱れています。

質問日時: 2025/03/25 16:00 質問者: ピクセル7 カテゴリ: その他（Microsoft Office）

ベストアンサー

4

0
Windows10です。 Wordで画像のようにページ番号を付けた後に、行数を40、字数を30で設

Windows10です。 Wordで画像のようにページ番号を付けた後に、行数を40、字数を30で設定したにも関わらず行数が25、字数が31になります。この設定をページ番号を消さずに変えることは出来ますか? 詳しい人がいたら教えてください。（画像のシナリオを気にしないで教えてください）

質問日時: 2025/03/24 17:15 質問者: yasunchi1988 カテゴリ: Word（ワード）

解決済

1

0
エクセルについて教えてください

商品の管理をしています。 Aは仕入数 Bは支出数 Cは残数今現在Cの列には IF(AND(A2=“”,B2=“”),””,C1+A2-B2) と入れてあります。ただこうすると，在庫に動きがなかった時は当たり前ですが残数のところは空白になってしまう状態なのでそれは残数を表示して欲しいそうなんです。では，上の式の IF関数の真の時。ここを””→C1に変えればと思ったのですが、そうするとまだこの先動きがあれば入力する予定の下の方の行のセルにも残数が表示されてしまうため嫌だとのことでした。説明が下手ですが，私が上司に言われた条件に一致しており、触り慣れてない人でも仕入れた数と使った数だけ入力すれば勝手に計算されるようにあらかじめ表内に仕込んでおける関数を教えてください。

質問日時: 2025/03/24 16:53 質問者: ooosie カテゴリ: Excel（エクセル）

解決済

6

0
エクセルでコーピして貼り付けるがバラバラになり行の高さも、列の幅も合いません。どうしたらいいので

エクセルでコーピして貼り付けるがバラバラになり行の高さも、列の幅も合いません。どうしたらいいのでしょうか？

質問日時: 2025/03/23 13:17 質問者: キヌチヤンカテゴリ: Excel（エクセル）

ベストアンサー

2

0
Accessデータベースに含まれる文字列の変換について

Accessデータベースに含まれる文字列の中の、特定の文字だけを変換したいです。具体的には、電話番号や郵便番号に含まれる「（アンダーバーなど）半角ハイフンに似た文字」を「半角ハイフン」に統一したいのです。「検索と置換」を使えば出来ますが、変換クエリを使うことで、一発で出来たらいいなと思っています。どのように設定すれば良いか、お分かりの方がいらっしゃいましたら、教えて下さるとうれしいです。

質問日時: 2025/03/23 09:57 質問者: アルムの森の木カテゴリ: Access（アクセス）

解決済

1

0
群像新人賞って、400字詰め換算なので文字数にすれば28000文字以上10000文字以下なのですが、

群像新人賞って、400字詰め換算なので文字数にすれば28000文字以上10000文字以下なのですが、（400字詰め換算なので文字数にして見てもいいですよね？）文字数カウント機能で見たら、スペースを含める、含めない、単語のどこを見れば良いですか？

質問日時: 2025/03/23 01:22 質問者: まいこさん_2975 カテゴリ: Word（ワード）

解決済

3

0
群像新人賞についてですが、Wordの原稿用紙設定のまま出しても良いでしょうか？あと、写真の改行時の

群像新人賞についてですが、Wordの原稿用紙設定のまま出しても良いでしょうか？あと、写真の改行時の処理は二つともチェック入れた方がいいですか？あと群像新人賞は400字詰め換算なので400×70の28000以上400×250の100000以下ってことであってますか？文字数で言えばです。

質問日時: 2025/03/23 01:22 質問者: まいこさん_2975 カテゴリ: Word（ワード）

解決済

2

0
Wordの文字数カウント機能についてです。文字数を見たい時はどれですか？小説の文学賞に出します。4

Wordの文字数カウント機能についてです。文字数を見たい時はどれですか？小説の文学賞に出します。400字詰め換算で計算するので 400字×枚数＝文字数だと思いますが、どれを見たら良いかわかりません。スペースを含める含めないで差が出るのはなぜですか？スペースとはなんですか？単語と文字数は別ですか？

質問日時: 2025/03/23 01:22 質問者: まいこさん_2975 カテゴリ: Word（ワード）

解決済

4

0
マクロ・VBAで、当該ファイルのショートカットからなら正常に動作する疑問につきまして

よろしくお願いします。マクロを実行時、下記のエラーがでます。ちなみにデバッグモードでは、「→」矢印のついた行が黄色くハイライトされます。「実行時エラー91　オブジェクト変数またはwithブロック変数が設定されていません」　　Set wb1 = Workbooks.Open("\\HOGE-01\hoge_joint\商品リスト\在庫表.xlsm") →　Set ws1 = wb1.Sheets("総合") ' SheetをSheetsに修正ただ、当該エクセルファイルのショートカットを作成し、そのショートカットアイコンのプロパティにて以下を登録し、そのショートカットから実行すると正常に実行されます。（作業フォルダは空白でも正常に動きます）リンク先：\\HOGE-01\hoge_joint\商品リスト\在庫表.xlsm 作業フォルダ：\\HOGE-01\hoge_joint\商品リストこのファイルをショートカットからではなく、本体から実行し、エラーがでなくなる方法をご教授いただけますと幸いです。 ※\HOGE-01\hoge_joint\　とそのサブフォルダは信頼できる場所に設定してあります。 ※信頼済みドキュメントの設定では、ネットワーク上のドキュメントは信頼するにチェックしています ※マクロの設定は、警告してVBAマクロを無効にするにチェックしています。 ※マクロの設定ですべてのマクロを有効にして試しましたがショートカットからしか動作しませんでした。 ※インターネットオプション、セキュリティで、ローカルインターネットに当該のIPを登録しましたが、これもショートカットからしか実行できませんでした。 ※共有設定はEveryoneでフルアクセスです。以上、何卒よろしくお願い申し上げます。

質問日時: 2025/03/21 15:30 質問者: maru11586 カテゴリ: Excel（エクセル）

ベストアンサー

3

1
エクセルで二つのブックの違いを知りたいのですが。

いつもお世話になっております。365のエクセルブックが二つ。例えば、A.xlsmとそれのバックアップB.xlsmがあります。 Aファイルの重要な変更がある前にバックアップをとり、B.xlsmに名付けます。そのAとBの差分を知りたいのですが、どうすればいいですか？

質問日時: 2025/03/21 11:35 質問者: banzaiA カテゴリ: Excel（エクセル）

ベストアンサー

2

1
エクセルについてどう関数を使えばいいか教えてください。

A1・B1・C1この3のセルを使うとします。(以下A1をAとB1をBとC1をCとそれぞれ省略させてください) AとBこの２つのセルの状況に応じてCに結果を表示したいのです。条件は以下になります。各セルに入るのは数字になります。・AとBが両方空欄であれば空欄のまま何も表示しない・AもしくはB片方だけに数字が入ってる場合は数字が入っているセルの数字をそのまま表示する・AとB両方に数字が入っている場合はそれを足した合計を表示する。この3つの条件を叶うようにしたいのですが、どう入力すればいいのでしょうか？IF関数にさらにIFですか？？関数式も教えていただけると嬉しいです。

質問日時: 2025/03/20 11:42 質問者: ooosie カテゴリ: Excel（エクセル）

ベストアンサー

9

0
エクセルでカウントする

エクセルで、例えば　A1に1 A2に2 A3に3 という数字なり文字なりが書いてあったとして、 A4 のセルに、「３」すなわち文字入力があればカウントしてその合計を表示するというようなことはできますか？よろしくお願いします。

質問日時: 2025/03/19 19:44 質問者: だんちゃん16 カテゴリ: Excel（エクセル）

解決済

5

0
エクセルのファイルのコピーをとりたい

エクセルのファイルのコピーはどうやるのですか？エクセルを開いてそこで操作するのか、エクスプローラーでできるのかよろしくお願いします。

質問日時: 2025/03/19 19:24 質問者: だんちゃん16 カテゴリ: Excel（エクセル）

解決済

3

0
アクセスで、実行時エラー2465 指定した式で参照されている注文番号フィールドが見つかりません

質問タイトルのエラーでデバッグすると、 Private Sub Form_BeforeInsert(Cancel As Integer) If DCount("注文番号", "納品明細テーブル", "伝票番号=" & Forms!納品書フォーム!伝票番号 > 0) Then Me!注文番号 = DMax("注文番号", "納品明細テーブル", "伝票番号=" & Forms!納品書フォーム!伝票番号) + 1 Else Me!注文番号 = 1 End If End Sub 上記のVBAの、 Me!注文番号 = 1 のところで黄色反転して進みません。ご助言よろしくお願いいたします。

質問日時: 2025/03/19 09:07 質問者: tatsu-miyuma カテゴリ: Access（アクセス）

ベストアンサー

1

0
アクセスで、実行時エラー3075 クエリー式伝票番号＝の構文エラー：演算子がありません

基本的な質問で申し訳ございません。質問タイトルのエラーでデバッグすると、 Private Sub Form_BeforeInsert(Cancel As Integer) If DCount("注文番号", "納品明細テーブル", "伝票番号=" & Forms!納品書フォーム!伝票番号) > 0 Then Me!注文番号 = DMax("注文番号", "納品明細テーブル", "伝票番号=" & Forms!納品書フォーム!伝票番号) + 1 Else Me!注文番号 = 1 End If End Sub 上記のVBAの If DCount("注文番号", "納品明細テーブル", "伝票番号=" & Forms!納品書フォーム!伝票番号) > 0 Then のところが黄色に反転して進みません。どのように訂正すれば、ご助言頂けないでしょうか？よろしくお願いいたします。

質問日時: 2025/03/18 13:57 質問者: tatsu-miyuma カテゴリ: Access（アクセス）

ベストアンサー

3

1
エクセル関数の数値の入れ方をおしえてください

下記の表を参考に関数を作成してもらい、他のデータにも水平展開できるように数値を変更したいのですが、どこにどの数字をいれていいかわからず困っています。 ①　肉厚の許容差：0.30以上0.40以下、外径の区分：5以上15以下 → ±0.06 ②　肉厚の許容差：0.30以上0.40以下、外径の区分：15を越え25以下 → ±0.07 ③　肉厚の許容差：0.40を越え0.60以下、外径の区分：5以上15以下 → ±0.07 ④　肉厚の許容差：0.40を越え0.60以下、外径の区分：15を越え25以下 → ±0.08 =IF(OR(A1<0.3,A1>0.6,B1<5,B1>25),"範囲外",IF(A1<=0.4,IF(B1<=15,"±0.06","±0.07"),IF(B1<=15,"±0.07","±0.08"))) わかる方がいらしたら、よろしくお願い致します。

質問日時: 2025/03/18 11:55 質問者: matuisstoto カテゴリ: その他（Microsoft Office）

ベストアンサー

1

0
【マクロ、画像あり】A表かB表かどちらか判断をして、処理をする

【作りたいマクロ】アクティブセルが、A表orB表のどちらかにあるかを判断して A表にアクティブセルがある場合⇒A表の最終行に行を移動 B表にアクティブセルがある場合⇒B表の最終行に行を移動したいですもし、以下条件の他に、目印になるのを表の行や列に付けて上記、マクロが達成するなら、付ける事も可能ですアドバイスやコード作れる方、教えて下さい【作成済みマクロ】 A表にアクティブセルがある時、行をA表の最終行へ移動するマクロ B表にアクティブセルがある時、行をB表の最終行へ移動するマクロ【条件】 A表は上、B表は下です A表とB表の間は常に８セルあいています A3セル⇒A表 B表は、日付項目の2つ上のセルにB表と表記。事例は、B15 A表やB表のデータ数は変動する【A表にアクティブセルがある場合のコード】 Sub A表() LastRow1 = Cells(5, "A").End(xlDown).Row ActiveRow = ActiveCell.Row Cells(ActiveRow, 1).Resize(1, 3).Interior.ColorIndex = 15 Cells(ActiveRow, 3) = "削除" Cells(ActiveRow, 1).Resize(1, 3).Cut Cells(LastRow1 + 1, 1) ActiveCell.EntireRow.Delete Rows(LastRow1 + 2).Insert End Sub 【B表にアクティブセルがある場合のコード】 Sub B表() LastRow1 = Cells(Rows.Count, "A").End(xlUp).Row ActiveRow = ActiveCell.Row Cells(ActiveRow, 1).Resize(1, 3).Interior.ColorIndex = 15 Cells(ActiveRow, 3) = "削除" Cells(ActiveRow, 1).Resize(1, 3).Cut Cells(LastRow1 + 1, 1) ActiveCell.EntireRow.Delete End Sub

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

解決済

4

0
【マクロ】コードを少しでも、減らする為には

【質問】以下のコードより、行数や文字数を少ないマクロにする事はできますか？マクロを少しでも簡単にしたいですご存じの方、コードやアドバイスをお願いします【マクロの説明】アクティブセルになっている行を上の表の最終行の１つ下に移動するマクロです。移動する表の３列目には削除と文字が入力されます以下コードは動きます【条件】上と下の表は常に8セルあいています【コード】 Sub 不要行削除() Dim filePath As String Dim wb As Workbook Dim LastRow1 As Long filePath = "C:\Users\2020\OneDrive\マクロ\不要行削除\鏡.xlsm" Set wb = Workbooks.Open(filePath) Set ws = wb.Worksheets("RC00810") LastRow1 = Cells(5, "A").End(xlDown).Row ActiveRow = ActiveCell.Row ws.Range(Cells(ActiveRow, 1), Cells(ActiveRow, 3)).Interior.ColorIndex = 15 ws.Cells(ActiveRow, 3) = "削除" ws.Range(Cells(ActiveRow, 1), Cells(ActiveRow, 3)).Cut ws.Range(Cells(LastRow1 + 1, 1), Cells(LastRow1 + 1, 3)) ActiveCell.EntireRow.Delete Rows(LastRow1 + 2).Insert End Sub

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

解決済

4

1
列挿入をVBAで

新規作成ボタンを押すと新しく入力できる欄が挿入されるようにVBAで作りたいのですが、全くのド素人なので、貼り付けたらいいだけのVBAを教えていただけないでしょうか？開発タブを押してVisual Basicを開いてどこに貼り付けるのかも教えていただきたいです。（できれば画像付きで）この添付図でいうと新規作成ボタンを押すと、EF列がコピーされてE列の前にそのコピーが挿入されるようにお願いします。ご教示のほどよろしくお願いいたします。

質問日時: 2025/03/17 17:16 質問者: hibibenkyo カテゴリ: Excel（エクセル）

解決済

3

0
エクセル ○○以上○○以下で、条件が重なったところを表示させたい

外径と肉厚の条件が重なったところの公差を表示させたいのですが。下記の表があるとして例題としては、A1(外径)に7、B1(肉厚)に0.35と入力すると → C1(公差)±0.06 と表示させたいです。外径　　　　　　　　肉厚　　　　　　　　　公差 5以上15以下　　　 0.30以上0.40以下　　　±0.06 15越え25以下　　　 0.30以上0.40以下　　　±0.07 25越え50以下　　　 0.30以上0.40以下　　　－ 50越え100以下　　　0.30以上0.40以下　　　－ 5以上15以下　　　 0.40越え0.60以下　　　±0.07 15越え25以下　　　 0.40越え0.60以下 ±0.08 25越え50以下　　　 0.40越え0.60以下 ±0.09 50越え100以下　　 0.40越え0.60以下　　　－ 5以上15以下　　　 0.60越え0.80以下 ±0.10 15越え25以下　　　 0.60越え0.80以下 ±0.10 25越え50以下　　　 0.60越え0.80以下 ±0.11 50越え100以下　　 0.60越え0.80以下 ±0.15 5以上15以下　　　 0.80越え1.4以下 ±0.13 15越え25以下　　　 0.80越え1.4以下 ±0.15 25越え50以下　　　 0.80越え1.4以下 ±0.15 50越え100以下　　 0.80越え1.4以下 ±0.18 5以上15以下　　　 1.4越え2.0以下 ±0.15 15越え25以下　　　 1.4越え2.0以下 ±0.18 25越え50以下　　　 1.4越え2.0以下 ±0.18 50越え100以下　　 1.4越え2.0以下 ±0.22 5以上15以下　　　 2.0越え3.0以下 ±0.18 15越え25以下　　　 2.0越え3.0以下 ±0.20 25越え50以下　　　 2.0越え3.0以下　　 ±0.20 50越え100以下　　 2.0越え3.0以下　　 ±0.25 5以上15以下　　　 3.0越え4.0以下　　　　－ 15越え25以下　　　 3.0越え4.0以下 ±0.30 25越え50以下　　　 3.0越え4.0以下 ±0.30 50越え100以下　　 3.0越え4.0以下 ±0.30 5以上15以下　　　 4.0越え5.5以下　　　　－ 15越え25以下　　　 4.0越え5.5以下 ±0.40 25越え50以下　　　 4.0越え5.5以下 ±0.40 50越え100以下　　 4.0越え5.5以下 ±0.40 5以上15以下　　　 5.5越え7以下　　　　　－ 15越え25以下　　　 5.5越え7以下 ±0.45 25越え50以下　　　 5.5越え7以下 ±0.45 50越え100以下　　 5.5越え7以下 ±0.45 5以上15以下　　　 7越え10以下　　　　　－ 15越え25以下　　　 7越え10以下　　　　　－ 25越え50以下　　　 7越え10以下　　　　　 ±8% 50越え100以下　　 7越え10以下　　　　　 ±8% また、以前同じような質問をして下記の関数ををおしえて頂いたのですが、 =IF(OR(A1<0.3,A1>0.6,B1<5,B1>25),"範囲外",IF(A1<=0.4,IF(B1<=15,"±0.06","±0.07"),IF(B1<=15,"±0.07","±0.08"))) このような感じの関数を使いたいのですが、どこを直せば良いのかわからず困ってます。（この関数でなくてはダメというわけではないのですが、参考になればと･･･）よろしくお願い致します。

質問日時: 2025/03/17 16:32 質問者: matuisstoto カテゴリ: その他（Microsoft Office）

解決済

1

1
空白処理を空白に

=VLOOKUP(A1,データ!B3:H100,2,FALSE) 現在上記の式が入っていますが元のデータが空白の場合今はゼロになりますがこれを空白の場合空白にする式を教えて下さい。

質問日時: 2025/03/17 09:54 質問者: tokoro42811 カテゴリ: Excel（エクセル）

解決済

2

0
エクセルの循環参照を削除したい！

高血圧のため、医師から毎日血圧の計測を指示されており、それをExcelに記録しています。ところが、ある時からファイルを開こうとすると、添付ファイルのようなメッセージが出るようになり、OKボタンを押せばファイルは開くのですが、毎回煩わしいのでどうにかしたくて困っています。 “循環参照”を削除する方法、或いは他の手段で解決する策を何方かご教示ください。

質問日時: 2025/03/17 09:17 質問者: hirogood カテゴリ: Excel（エクセル）

ベストアンサー

3

0
エクセルでラベルシールを印刷したい

ラベルシール　インクジェット（染料／顔料）・レーザープリンタ・コピー機対応２４面　２０枚入り　４８０片サイズがＡ４で、横70mm,縦33.9mm のラベルが横３，縦８，全部で２４ケできます行の高さ、列の幅をそれぞれ33.9と70 に指定するのではだめなんですか？単位がmmでないようなのですが、どう設定すればいいのでしょうかよろしくお願いします。

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

ベストアンサー

1

0
名前の間のスペースをそろえる関数はありますか？佐藤太郎佐藤太郎

標題の件、以下を大文字スペース１つ、関数にてそろえる事はできますか？ご存じの方、関数、アドバイスの程、宜しくお願いします A1　佐藤　太郎　　　※名前と名前の間スペース全角スペース１つ B1　佐藤　　太郎　　※名前と名前の間スペース全角スペース２つ

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

ベストアンサー

3

0
重複しない値を抽出したい

エクセル2018で表から重複しない項目を抽出する方法について unique関数が対応していないので何かいい方法がないかお力をお借りしたいです。シート1に下記のような横長の表（空白セルあり） aさん　1 2 2 3 bさん 2 2 2 cさん 3 4 5 シート2にも下記のようにシート1と同じような表があります。 aさん　3 3 bさん 6 2 2 cさん 3 4 6 したいことはシート1とシート2の表から別シートに項目を下記のように抽出したいです。 1 2 3 4 5 6 よろしくお願いいたします。

質問日時: 2025/03/15 21:07 質問者: 895 カテゴリ: Excel（エクセル）

解決済

1

0
PPT 印刷時の設定

PowerPointから写真を印刷したいのですが、印刷プレビューと実際に印刷される写真が違い困っています。設定でぴったりになるようにできるでしょうか。現在下記のような方法でうまくいっていません。 ①PowerPointでスライドのサイズをL版のサイズにする（12.7×8.9cm） ②スライドに画像の挿入から写真を貼り付ける。 ③フチなしでL版の用紙に印刷。　→印刷プレビューではぴったりサイズになっているのですが、実際に印刷するとやや拡大されて出てきます。用紙のサイズに合わせて拡大・縮小はオンにしてもオフにしても変わりませんでした。詳しい方ご教示願います。よろしくお願いします。ソフト：PowerPoint（Windows2016）プリンター：EPSON EP-715A

質問日時: 2025/03/15 19:22 質問者: hynu カテゴリ: PowerPoint（パワーポイント）

解決済

2

0
【マクロ画像あり】Exact関数の結果【FALSE】という文字に条件付書式設定にて赤字にする為には

【やりたい事】 D1-D3、H1-H3の空白にも、赤色の塗りつぶしがされなようにしたいです以下コードを実行すると、空白セルにも赤色になってしまいます Exactの結果の、FALSEだけを赤色にしたいですご存じの方、コードやアドバイスのご教授お願いします【条件】 Exact関数は、C1-C3、G1-G3、K1-K3に既に設定済み FALSE【間違っている】という文字列に対して赤色に塗りつぶしされる、コードを記述【コード】 Sub sample() Dim lastrow As Long lastrow = Cells(Rows.Count, "a").End(xlUp).Row Dim fc As Object '既存の条件付き書式があれば削除 Range("C1:k" & lastrow).FormatConditions.Delete '条件を設定して、オブジェクトに格納 Set fc = Range("C1:k" & lastrow).FormatConditions.Add(Type:=xlExpression, Formula1:="=c1=FALSE") '条件成立で、背景色を「赤色」 fc.Interior.Color = vbRed End Sub

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

解決済

3

0
【マクロ画像あり】セル範囲の移動について、簡潔で短いマクロがあれば教えて下さい

【やりたい事】以下画像にて、A列のかきくけこ３行を、C列のあいうえおの最終行の次に切取りをして、貼付したいです貼付方法や手順は、指定はありません。以下コードは自分が思いついただけのものです【条件】・xの数は、常に変動・水色は、デフォルトである、データとします ⇒ただし、常にあいうえおやかきくけこの数へ変更します・A列、上と下のセルの間は常に８セルより簡潔なコードがあれば教えて下さい宜しくお願いします【コード】 Sub かきくけこ移動() Dim lastrow1 As Long lastrow1 = Cells(1, 1).End(xlDown).Row Dim lastrow2 As Long lastrow2 = Cells(Rows.Count, "c").End(xlUp).Row Dim lastrow3 As Long lastrow3 = Cells(Rows.Count, "a").End(xlUp).Row For i = (lastrow1 + 9) To lastrow3 If Cells(i, 1) <> "x" Then Cells(i, 3) = Cells(i, 1) End If Next i Cells(lastrow1 + 9, "c").CurrentRegion.Cut Cells(lastrow2 + 1, "c").Select ActiveSheet.Paste End Sub

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

ベストアンサー

1

1
エクセルの難問。「コピペすると勝手に日付型に換算されてしまうデータ」どうやってコピペする？

質問概要タイトルの通りです。ちなみにエクセルバージョンは2002です。 OSはWin10です。質問詳細テキストデータや、WEBブラウザ上の文字列データを、右クリックでコピー　→　エクセルシート上でコピペという作業を良くやると思います。大抵のデータは、元の文字列のまま、コピペされますが、一つ、厄介なものがあります。エクセル上では 1-2-3 という文字列を、勝手に「日付型である」と解釈して 2001/2/3 というように日付としてコピーしてしまい、セルの書式設定も日付型に勝手に設定されてしまいます。これ、どうにかならないでしょうか？このままだと、「宿題丸投げだ！　通報！　通報！」「入試問題のリアルタイム漏洩だ！　通報！通報！」と通報警察が湧いて出てくるので、じぶんでいろいろ考えてみました。まず、今回の場合、元データはWEBブラウザ上の文字列なのでその属性をいじることはできません。そこで、一旦、メモ帳にテキストデータとして貼り付けた後、それをもう一回コピペしてエクセルに貼り付けてみました。ダメでした。やっぱり1-2-3、といった文字列は「日付データである」と勝手に解釈されるようです。次に、「コピペ段階においては、勝手に日付型に解釈されることは対処を後回しにしよう。　まずは勝手に日付型にされてしまったデータを、　1-2-3 　という文字列に変換してみよう」と思いました。そこで、こんな式を考えてみました。セルD8に日付データが入っています。それを計算式で加工します。 =CONCATENATE(YEAR(D8),"-",MONTH(D8),"-",DAY(D8)) 表記結果はいかのようになりました。 2001-2-3 となります。残った問題点としては、1が2001になってしまうことです。これ、どうにかならないでしょうか？下記の計算式を作ってみました =YEAR(D8)-DATEVALUE("2000/1/1") 表記結果は＃＃＃＃＃＃＃＃＃＃＃＃となりました。ただしもし2001年が1という計算ができるようになったとしても、もともとの「コピペ段階で、勝手に日付型に解釈されてしまう」問題は解決していません。なにかいい方法はないでしょうか？よろしくお願いします。

質問日時: 2025/03/15 09:53 質問者: s_end カテゴリ: Excel（エクセル）

ベストアンサー

5

0
Excelの数式？について質問です。入力した数値の上げ幅を出す数式について教えてください。具体的

Excelの数式？について質問です。入力した数値の上げ幅を出す数式について教えてください。具体的には、あるセルに数値(整数)を手動入力した際に、その数値の基準値(今回は1)からの上げ幅を別セルに出力する数式になります。例を挙げますと、あるセルに100→1からの上げ幅99→別セルに99出力あるセルに1→１からの上げ幅0→別セルに0出力 ※数値の仕様は、少数やマイナスは対象外で、1からせいぜい1000程度で大丈夫です。よろしくお願いします！

質問日時: 2025/03/14 19:06 質問者: yasuhico カテゴリ: Excel（エクセル）

ベストアンサー

2

0
エクセル ○○以上○○以下の関数をおしえてください

エクセルで肉厚の許容差の数値を出したいのですがよくわからなくて。 ①～④の内容の関数をおしえて頂きたいです。〈例〉 ① 0.30以上0.40以下の5以上15以下 ② 0.30以上0.40以下の15を越え25以下 ③ 0.40を越え0.60以下の5以上15以下 ④ 0.40を越え0.60以下の15を越え25以下よろしくお願い致します。

質問日時: 2025/03/14 10:28 質問者: matuisstoto カテゴリ: その他（Microsoft Office）

ベストアンサー

6

0
至急お願いします！エクセルのフィルターについて

エクセルのフィルターで「20 30 40 50」など複数の数値を瞬時に抽出検索する事は可能でしょうか？オートフィルターオプションの抽出条件の指定は時間がかかりそうで…

質問日時: 2025/03/13 23:13 質問者: wgapt カテゴリ: Excel（エクセル）

解決済

3

0
空白のはずがSUBTOTAL関数でカウントされる

関数の処理分岐の結果で「""（空白）」となったセルを別シートに値貼付けすると、SUBTOTAL関数でカウント（集計方法は3、個数カウント）されてしまうのはなぜですか。何らかの情報が入っているセル扱いされてしまっているのかなと思ったのですが、オートフィルターで確認すると「空白セル」になっています。オートフィルターで「空白セルのみ表示」にし、該当セルを選択してdeleteキーを押すとSUBTOTAL関数が正常な結果を返すので、やはり何らかの情報が入っていたと思うのですが、オートフィルターだと空白扱いなのに…とモヤモヤしています。詳しい方、お願い致します。

質問日時: 2025/03/13 15:23 質問者: bari_saku カテゴリ: Excel（エクセル）

解決済

3

0
【マクロ】条件付き書式設定をマクロ化するには？

Exact関数がC1-C3まで入っています判定が、TRUEかFALSEの場合で FALSEの場合、条件付き書式の　赤色になる前述の挙動を、マクロにしたいですご存じの方、アドバイスorコードを教えて下さい【条件】 =EXACT(A1,B1) 【数式】=C1=FALSE 【色】Color = 255 【範囲】C1:C3

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

ベストアンサー

3

0
お助けください

エクセルの、WorksheetChangeで、下記のコードを、使ってコマンドボタンの制御を、する場合に、関数で求められた結果値によって同じように、制御することは、できないでしょうか Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" And Target.Value = "あああ" Then CommandButton1.Enabled = True ElseIf Target.Address = "$A$1" And Target.Value = "いいい" Then CommandButton1.Enabled = False End If End Sub

質問日時: 2025/03/12 19:47 質問者: naokifull カテゴリ: Access（アクセス）

ベストアンサー

3

0
VBA_日時のソート

急いでいます… B列に日付と時間を含む文字列があります。日時は2025/02/02 12:12:12,231です。これをソートしたいのですが、うまくいきません。 A列に日時を貼り付けてソートしようとしました。どうか教えていただきたいです。

質問日時: 2025/03/12 10:28 質問者: めい. カテゴリ: Excel（エクセル）

解決済

4

0
エクセルの数式について教えてください。

セルH3とセルM3にはそれぞれ日付が表示されます。日付の大小を比較してコメントを表示する方法を教えてください。 H3＜M3の場合にコメント「ご希望にお応え出来ない可能があります。希望日の再考をお願いいたします。」 H3≦M3の場合にコメント「特にありません」と表示セルH3及びM3どちらか一方又は、両方に日付が何も表示されない場合には、コメントも無しでお願いいたします。よろしくお願いします。

質問日時: 2025/03/12 09:43 質問者: エクセル小僧カテゴリ: Excel（エクセル）

ベストアンサー

4

0
テーブルの合計、エラーをはぶくには？

標題の件、合計のセルの中に、エラー表示があり、合計が出せませんエラー表示をプルダウンにてのぞけば、合計は出せますプルダウンは、しぼりをかけずに、合計を出す、関数等はありますか？ご存じのかた、教えて下さい

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

ベストアンサー

1

0
ミリ秒を時間へ変更するには？ 3,600,000ミリ秒⇒１時間00分へ変更したい

標題の件、ご存じの方、教えて下さい例：セルに3,600,000が、入力されていて、それを⇒１時間００分に変換したいです

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

ベストアンサー

1

0
エクセルで教えてください。例えばSUM関数でA1＋B1の値をC1に出すとします。 C1数式で=SU

エクセルで教えてください。例えばSUM関数でA1＋B1の値をC1に出すとします。 C1数式で=SUM（A1:B1）を入力。そうすると、 A1が5でB1が2の場合、C1には7とでますよね？ここからは質問です。この7を8に変える時、=SUM（A1:B1）の数式を消さず、数字を8に変える方法はありますか？今順位をつけており、10人中3人合計点が7で同順位になります。それを手打ちで7、8、9と変えたいんです。でもそれを手打ちでやると数式が消えてしまう。これを避けたいんです。教えてください。

質問日時: 2025/03/11 17:51 質問者: ちまにゃカテゴリ: Excel（エクセル）

ベストアンサー

9

0
【オートフィルター】３つのシートの同じ形のオートフィルターを同じ条件のしぼりを１回で実施できる？

標題の件、以下３つのシートに同じ項目の、オートフィルターがあります以下のしぼりを、３つのシートに対して１回だけ実施する方法はありますか？ ※１つ１つのシートを開いて、１回ごとにやればできます ※シートは１２シートあるので実際。１回で、しぼりをする方法は探していますご存じの方、教えて下さい【しぼり】エラーのチェックのみ外す【Sheet1】お客様【項目】佐藤エラー田中加藤【Sheet２】お客様【項目】ボブトムエラー【Sheet3】【項目】セリーヌエラージャンヌ

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

ベストアンサー

1

0
【マクロ】上のデータに下のデータを、結合する

【やりたい事】以下画像の、赤枠部分を切取し、上のデータの最終行の下（A6）に貼付したいです以下のコードは、やりたい事を実現するコードです ●他の方法で、簡単に、分かりやすいコードをご存じの方アドバイス等含めご指南をお願いします【条件】・上データの最終行の次の行から、下データの開始行の間は　常に【9セル】空いています・上のデータと下のデータの数は、増えたり減ったりします【コード】 Sub データをつなげる() Dim lastrow As Long lastrow = Cells(1, 1).End(xlDown).Row Cells(lastrow + 9, "A").CurrentRegion.Cut Cells(lastrow + 1, "A").Select ActiveSheet.Paste End Sub

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

ベストアンサー

3

0
パソコンのWordの中に職務経歴書のテンプレートはありますか？

パソコンのWordの中に職務経歴書のテンプレートはありますか？

質問日時: 2025/03/10 22:04 質問者: ポニョポニョABC カテゴリ: Word（ワード）

ベストアンサー

4

0
Excelのチェックボックスについて教えてください。

Excelのチェックボックス機能を使用して ☑を入れていますが、このチェックボックスの「✔」の部分の色が今は黒ですが、（赤い✔）に出来る方法があれば教えてください。よろしくお願いします。 ExcelのVersionはoffice365になります。

質問日時: 2025/03/10 08:49 質問者: エクセル小僧カテゴリ: Excel（エクセル）

ベストアンサー

2

0
縦使い・横書きは画像のようなフォーマット（書き方）でしょうか?

縦使い・横書きは画像のようなフォーマット（書き方）でしょうか?

質問日時: 2025/03/09 23:10 質問者: yasunchi1988 カテゴリ: Word（ワード）

解決済

2

2

←前の結果
1
2
3
4
5
6
7
8
9
10
11
...
20
次の結果→

【Microsoft Office】に関する回答募集中の質問

エクセルで、Scroll Lockと同じことを、何かのキーを押しながらできませんか？
- 質問日時： 2025/07/02 10:15
- 質問者： workpad30j

Microsoft Officeの回答募集中の質問一覧

【Microsoft Office】に関するカテゴリ

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

質問する（無料）

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

弁護士が解説！あなたの声を行政に届ける「パブリックコメント」制度のすべて

社会に対する意見や不満、疑問。それを発信する場所は、SNSやブログ、そしてニュースサイトのコメント欄など多岐にわたる。教えて!gooでも「ヤフコメ民について」というタイトルのトピックがあり、この投稿の通り、...
弁護士が語る「合法と違法を分けるオンラインカジノのシンプルな線引き」

「お金を賭けたら違法です」ーーこう答えたのは富士見坂法律事務所の井上義之弁護士。オンラインカジノが違法となるかどうかの基準は、このように非常にシンプルである。しかし2025年にはいって、違法賭博事件が相次...
釣りと密漁の違いは？知らなかったでは済まされない？事前にできることは？

知らなかったでは済まされないのが法律の世界であるが、全てを知ってから何かをするには少々手間がかかるし、最悪始めることすらできずに終わってしまうこともあり得る。教えてgooでも「釣りと密漁の境目はどこです...
カスハラとクレームの違いは？カスハラの法的責任は？企業がとるべき対応は？

東京都が、客からの迷惑行為などを称した「カスタマーハラスメント」、いわゆる「カスハラ」の防止を目的とした条例を、全国で初めて成立させた。条例に罰則はなく、2025年4月1日から施行される。この動きは自治体...