回答数
気になる
-
【関数】=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のシートは4つある(シート① シート② シート③ シート④) ⇒シート①にデータがあった場合、シート②へ貼付をしたい 【手順】 1a_20250529123939.xlsx を開く。下記参考コードあり 2シート①に貼り付けようとする。下記参考コードあり 3シート①の最終行が2行目まである場合⇒次のシート②へ貼付けする ※シート②は最終行が2行目より小さい。貼り付け可能 ※シート①から④は、次のいずれかどっち ⇒パターン1:データが2行目以上ある。パターン2:データが1つもない。空シート 4シート②へ貼り付け 5a_20250529123939.xlsxを閉じる 【ファイルパス】 貼付元エクセル。シート1つだけ。シート名不規則 C:\Users\user\Documents\ツール\ダウンロード場所\ファイル名変更場所\a_20250529123939.xlsx ファイル名⇒a_20250529123939.xlsx 貼付先エクセル C:\Users\user\Documents\ツール\ツール.xlsm 貼付先シート4つ⇒ シート① シート② シート③ シート④ ファイル名⇒ツール.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 ' シート4つを配列変数に入れる 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つの条件一致❷1つの条件に部分一致❸最終行データコピー❶❷❸実現するマクロの件
【やりたい事】 下記画像をご覧ください 図1のC2セルのデータ【2025/6/3/ 12:00】を図2のB4セルに値貼付けしたい 【手順】 1【条件1】図2のA列と本日(today例:6/3)、事例だと6/3を一致(当日作業という意味)を確認 2【条件2】図1のファイル名の先頭【タスク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(エクセル)
回答受付中
2
0
-
【マクロ】既存ファイルの名前の先頭に、プルダウン(3種類)のいずれか1種類の名前をつけるためには?
【フォルダの場所】 C:\Users\user\Documents\ツール\ダウンロード場所\ファイル名変更場所 ※ファイルは常に1つしか無い。おかない。 ※既存ファイル task20250529123939 が置かれる場所 【既存ファイルの名前】 task20250529123939 ※ファイル名は上記形式。数字の日付から秒までは変化します ※数字の意味:2025年05月29日12:39分39秒 【選択肢。プルダウン】 インバウンドあ インバウンドい インバウンドう ※既存ファイルの名前の先頭に付けたい名前をプルダウンから手作業で1つ選び マクロを使い、既存ファイルの先頭に、名前をつける ※プルダウンは3-6種類まで増やす予定 【最終的に既存ファイルの先頭にプルダウンより1つ選び、作りたいファイル名】 インバウンドあtask20250529123939 ※上記選択肢より、1番目を選んだ場合
質問日時: 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】にしています。 毎回この作業を行なうのは大変なのですが、デフォルトで画像がちゃんと表示されるように貼付けられ、文章も文字が潰れないような行間の設定二する方法はありますでしょうか。 教えていただければと思います。
回答受付中
3
0
-
ワードの句読点が変な位置に出てしまいます。どうしたら直せますか。
縦書きの文書で、句読点やかぎ括弧が変な位置に出てしまいます。 写真を貼れないので、頑張って説明します。 例えば句読点(、。)は本来縦書きではマスの右上に出ますが私の文書では左下に出ます。 かぎ括弧は始めの鍵がマスの右側に出て、さらにかぎ括弧が一つ目のかぎも閉じるかぎも普通のかぎ括弧を左へ90度回転させた形になっています。 試しに文章を一部消して書き直しても同じように出てしまいます。また、文書のフォーマットを一度横書きに直すと普通に戻りますが、縦書きに直すとまたおかしな位置に出てしまいます。そして、よく見るとところどころ普通の場所のままになっている個所もあります。 どうしてでしょうか。どうしたら直せますか。
回答受付中
3
0
-
Dir関数のDo Whileステートメントにおける1回目と2回目のファイル名の呼出し方法の違い
【質問したい事】 以下、コードの fileName = Dir() の部分 当該コードはファイル名を2回目に呼びだすコードです 以下のとおり1回目と2回目の呼出し方法が違うのはなぜですか? 1回目の方はしっくりきます。 なぜとか、考えずにそいうものと覚えれば良いのでしょうか? ご存じの方、ご指南宜しくお願いします 【参考ネットにあった解説↓】 Dir関数は1回目の呼び出しで指定されたファイルを取得しますが 2回目以降の呼び出しでは引数なしで実行する必要がある 【1回目】 fileName = Dir(folderPath & "\*.xls", vbDirectory) 【2回目以降】 fileName = Dir() 【コード説明】 ダウンロード場所フォルダにある、エクセルファイルの 名前を書きだす コード実行後、シートに以下のとおり書き出される a_20250529123939.xls a_20250529123940.xls a_20250529123941.xls a_20250529123942.xls ※ダウンロード場所フォルダには上記4つのエクセルファイルがあります 【コード】動きます 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回目の呼び出し。なぜ、1回目と呼出し方法が違うのは? fileName = Dir() i = i + 1 Loop End Sub
質問日時: 2025/06/01 12:18 質問者: aoyama-reiko カテゴリ: Excel(エクセル)
ベストアンサー
2
0
-
【マクロ】【画像あり】ファイル名を別名にて保存。元ファイルはゴミ箱へ移動⇒する方法について
【やりたい事】 4つのファイルを1つ転記するたびに ❶ シート①へ転記した後。ファイル名を変更する a_20250529123939.csv ⇒ 転記済a_20250529123939.csv ※現在は、wb.Close ←コードより抜粋 'csvを閉じる コピー元ファイルを閉じているだけです ❷ 元ファイルはゴミ箱へ移動したい a_20250529123939.csv⇒ゴミ箱へ移動。※コピー元ファイル ●●●●4回繰り返す●●●● ※ファイルが4個の場合。ファイルは1から4個まで変わります 【マクロ説明】下記画像をご覧ください 以下画像とコードをご覧ください 4つのCSVデータを、別ブックの4つのシートへ1つづつ、順番にコピーするマクロです ※CSVはexcelブックに置き換えて考えて頂いてもOKです。同じです ※4つのCSVデータは、1から4個まで変わります ※CSVデータはエクセルと置き換えてもOKです 【マクロの保存されているファイル】※マクロにて指示するファイル C:\Users\2020\OneDrive\マクロ\ツール\コントロール.xlsm 【4つのファイル】※コピー元 "C:\Users\user\Documents\web\ダウンロード場所\a_20250529123939.csv" ※シートは1つしかない。名前は不規則 "C:\Users\user\Documents\web\ダウンロード場所\a_20250529123940.csv" ※シートは1つしかない。名前は不規則 "C:\Users\user\Documents\web\ダウンロード場所\a_20250529123941.csv" ※シートは1つしかない。名前は不規則 "C:\Users\user\Documents\web\ダウンロード場所\a_20250529123942.csv" ※シートは1つしかない。名前は不規則 【貼付先】コピー先。下記画像の左上のエクセルファイル 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 '1個目の、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 '2個目の、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
-
ms teamsの日々のスケジュールを取得してその日の要約をパワーアウトメイトでどうやって作成するん
ms teamsの日々のスケジュールを取得してその日の要約をパワーアウトメイトでどうやって作成するんですか?
質問日時: 2025/06/01 10:25 質問者: あっきー126 カテゴリ: その他(Microsoft Office)
回答受付中
0
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
-
【マクロ】【画像あり】4つのファイルデータを別ブックの4つのシートへそれぞれコピーしたい
【やりいた事】下記画像をご覧ください ◆◆◆4つのCSVシートのデータを、別ブックの4つのシートへそれぞれコピーしたいです◆◆◆ ※CSVはexcelブックに置き換えて考えて頂いてもOKです。同じです 4つのCSVシートを別ブックの1つのシートへコピーするコードは出来ました 以下の参考コード❶をご覧ください しかし、やりたい事は、4つのファイルデータを1つのシートではなく、4つのシートへ コピーする方法です コピーの方法は、以下です ws.Range("A1").CurrentRegion.Copy 貼付けは、4つのシートのそれぞれの A1セル にてOKです 最後に、参考コード❷は、シートを1番目から4番目まで順番に移動するコードです 移動するたびに、作業のコードを入れる事も出来ます ここに、4つのファイルデータの内の1つをコピペするコードを入れてもうまく いくと思います コードならびにアドバイスのご教授お願いします 【ファイルパス】コピー先 "C:\Users\user\Documents\web\最新配列.xlsm" ※4つのファイルのデータをコピーしたいファイル ※シート名⇒Sheet1、Sheet2、Sheet3、Sheet4、 【ファイルパス】※4つのファイル "C:\Users\user\Documents\web\ダウンロード場所\a_20250529123939.csv" ※シートは1つしかない。名前は不規則 "C:\Users\user\Documents\web\ダウンロード場所\a_20250529123940.csv" ※シートは1つしかない。名前は不規則 "C:\Users\user\Documents\web\ダウンロード場所\a_20250529123941.csv" ※シートは1つしかない。名前は不規則 "C:\Users\user\Documents\web\ダウンロード場所\a_20250529123942.csv" ※シートは1つしかない。名前は不規則 【参考コード❶】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つのシートに4つのファイルデータをコピー貼り付け 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 【参考コード❷】 4つのシートに順番にバトンタッチし、作業をする。作業は、4つのフアィルデータをそれぞれコピペしたい 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) ●●●●●●●●●●●●●●●●●●●●●●●●●● ここに4つのファイルのデータをコピーするデータを 開き、コピペするコードを貼り付けるコードを入れたい ●●●●●●●●●●●●●●●●●●●●●●●●●● Next End Sub
質問日時: 2025/05/31 00:03 質問者: aoyama-reiko カテゴリ: Excel(エクセル)
ベストアンサー
2
0
-
【マクロ】【画像あり】4つのファイルデータを1つのエクセルブックにある4つのシートへそれぞれコピー
【やりいた事】⇒コードorアドバイスお願いします 下記画像をご覧ください ❶.1つのエクセルブックがあります。このブックには4つのシートがあります ❷.4つのcsvファイルがあります(CSVはEXCELファイルに置き換えてもok) ⇒この4つのファイルのデータを❶の1つのエクセルにある、4つのシートへ貼付したいです ※4つのデータは1個~4個へ変動します。ファイルが1つの時もあれば4つの時もあるという意味 ※❶のコピー先シート4つは、貼付前は全て、何も何も貼りついていない状態です 【動作手順】※以下4データは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セルに値貼付 【ファイルパス】コピーしたい4つのファイル。※コピー元 C:\Users\2020\OneDrive\マクロ\ダウンロード場所\a_20250529123942.csv シート名:20250529123942 ⇒シートは1つしか無い C:\Users\2020\OneDrive\マクロ\ダウンロード場所\a_20250529123941.csv シート名:20250529123941 ⇒シートは1つしか無い C:\Users\2020\OneDrive\マクロ\ダウンロード場所\a_20250529123940.csv シート名:20250529123940 ⇒シートは1つしか無い C:\Users\2020\OneDrive\マクロ\ダウンロード場所\a_20250529123939.csv シート名:20250529123939 ⇒シートは1つしか無い 【ファイルパス】コピー先 C:\Users\2020\OneDrive\マクロ\最新配列.xlsm ※4つのファイルのデータをコピーしたいファイル ※シート名⇒Sheet1、Sheet2、Sheet3、Sheet4、 【参考コード】4つのシートにそれぞれ作業をするべく、順番になります 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) ●●●●●●●●●●●●●●●●●●●●●●●●●● ここに4つのファイルのデータをコピーするデータを 開き、コピペするコードを貼り付けるコードを入れたい ●●●●●●●●●●●●●●●●●●●●●●●●●● 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種類あるようですが、どう違うのでしょうか。 いつも分からず、出来る方を模索しながら作業しており時間がかかります。 詳しい方、ご教示お願い致します。
解決済
1
0
-
セルにぴったし写真を挿入
エクセルのセルを少し大きくして、(ちょっと太め)の外枠を作成 そこに写真を挿入したい 枠にぴったりはまるようなセットの仕方はありますか? ユーチューブ動画に上がっていたと思いますが、見当たりません よろしくお願いします。
質問日時: 2025/05/24 18:57 質問者: 00mitue00 カテゴリ: Excel(エクセル)
解決済
2
0
-
【マクロ】エラー【#DIV/0!】が発生する場合の回避方法について
【質問】 以下コードは 1行目から最終行までのE列の値、あ、い、う、その他に よって、各動作をする、マクロです しかし、E列に エラーが発生した時に #DIV/0! 以下で止まります 当該事象を、止まらないように、進めたいです なお、#DIV/0! 発生時は、以下の処理でOKです 逆に、なぜ、#DIV/0!発生時に、Case Elseに分類されないのでしょうか? ご存じの方、宜しくお願いします Case Else Cells(i, "i") = Cells(i, "c") 【エラー】 実行時エラー13。型が一致しません 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
-
【画像あり】パワーポイントのスライド4枚をA3の用紙に、印刷したい
標題の件、以下画像をご覧ください A3の用紙に、PPT4スライド【1-4ページ】を印刷したいです プリンターは業務用で、両面や2UP(1枚に2ページ分印刷)や4UP等できます やり方ご存じの方、教えて下さい PPTバージョン。office365
質問日時: 2025/05/23 00:14 質問者: aoyama-reiko カテゴリ: PowerPoint(パワーポイント)
ベストアンサー
2
0
-
ワードで,一瞬,英数になってしまう現象について
ワードで文章を打っている時,一瞬,英数になってしまうことがあります。 つまり「あ」と打つと,「a」になってしまいます。 いつもというわけではなく,数分に一度くらいです。 数日前から突然現れた現象です。 英数になったとき,そこでちょっと間を置いて,あらためて打ち直すと,また,かな入力(ローマ字打ち)にもどります。 Microsoft 365を使っていますが,クイック修復やオンライン修復をしてもダメです。 原因は何なのでしょう。 パソコンの不調で,このようなことになりますか? ご存知の方がいらっしゃいましたら,どうぞ宜しくお願い致します。 当方,パソコンはどちらかというと初心者です。
ベストアンサー
2
0
-
EXCELのVBAで複数のシートを追加したいが1つしかできない
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まで、オートフィルターの範囲を広げる事でしょうか? 例はデータがすくないですが、実際は、100~200列。行は500~3,000行まであります ご存じの方、教えて下さい
質問日時: 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
-
【WordでもExcelでも良いですが】A4サイズの用紙に1文字を印刷する方を教えてく
【WordでもExcelでも良いですが】A4サイズの用紙に1文字を印刷する方を教えてください。綺麗に分割されて貼り合わすだけで大きな1文字にしたいです。
質問日時: 2025/05/19 15:02 質問者: redminote11pro5G カテゴリ: Excel(エクセル)
ベストアンサー
6
0
-
勤怠表について ABS、TEXT関数の使い方について教えて下さい
初めまして。2つ質問です。 ①会社で勤怠表を作るに当たり、 始業時間 G5 就業時間 H5 休憩時間 I5 とし、法定外時間 K5 に =TEXT(ABS(($H5-$G5-$I5)-TIME(8,0,0)),IF(($H5-$G5-$I5)-TIME(8,0,0)<0,"-h:mm","h:mm")) を入力すると、残業時間(プラス表示)、早退時間(マイナス表示)が表示されるのですが、定時で残業時間ゼロの時に「-0:00」と表示されてしまいます。この-0:00を非表示にする方法が解る方がいればご教授お願い致します。 ※会社は週40時間勤務内での変則時間の為、マイナス表示が必要になります。 ②①のやり方だと法定外時間K列の合計はプラスの残業時間分だけなので、M列に =TEXT(ABS("8:00"-$J5),"h:mm") を入力し、早退時間をプラス表示しK列(プラス分)-M列(マイナス分)を差し引いて総残業時間を出そうと考えましたが、土日などG~I列が空欄だと「-8:00」表示、残業無しでも「0:00」が出る為非表示にしたいです。 更にM列の合計やK列との引き算も上手くいかず自力では無理かと思い質問しております。 ※週40時間を超えた分が残業代になります。 ※これ以外に別に良いやり方があれば併せてご教授下さい。よろしくお願い致します。
質問日時: 2025/05/18 16:07 質問者: より26 カテゴリ: Excel(エクセル)
解決済
2
1
-
ワードで図の変更をすると図の縦横比が変わる。
ワード2007です。 図の変更をすると新しい写真の縦横バランスになってしまいます。 今のレイアウトの写真の縦横比のまま新しい写真を入れる方法はありますか?
解決済
1
0
-
ワードで「 」(カギかっこ)の幅が大きい
文章を書いていて「 」(かぎかっこ)の部分がなんか横幅大きいです。 あと、数字も数字の左右に空間があります。 どう処理すれば文字が詰まりますか?
ベストアンサー
3
0
-
ワードで4段組みで文章を書いてると4段目だけ少し位置が下に下がってる。
ワード2007です。 4段組みのレイアウトで、タイトル、その下に写真、その下に2行の説明文。これを各段に2つずつレイアウトされています。 一列目で作った2つの項目を2段目、3段目、4段目に完全コピーしたところ、一番最後の行の文字が1段目から3段目まではピッタリ横並びになっているのですが4段目だけ気づく気づかないレベルの差ではありますがほんの少しだけ下に下がっています。 なぜ4段目だけ同じ項目を貼り付けたのにほんのほんの少しだけ下にずれるのですか? なんどやっても同じなんです・・・・。
ベストアンサー
1
1
-
エクセルについて
教えてください。 ブック1のシートAセルC1にシートBセルD1の値を参照しています。 =TEXT(シートB!セルD1,"0.0") ブックごとコピーして ブック2のシートAセルC1に、 ブック1のシートBセルD1の値をテキストで残したまま =INDIRECT("ブック1!シートB!セルD1,"0.0") ブック2のシートAセルC2にシートBセルD2の値を参照したいです。 =TEXT(シートB!セルD2,"0.0") INDIRECTを使ったら#REFが出てしまいました。 良い案はないでしょうか?
質問日時: 2025/05/15 17:36 質問者: hb03 カテゴリ: Excel(エクセル)
解決済
1
1
-
グループごとの人数のカウント
質問が削除されてしまったので再度アップしています。 表にあるグループごとの人数をカウントしたいです。 現在、すべてのGroupが4つずつそろっているかどうかを確認するためにはどのような関数を使えばいいでしょうか? 現在はGroup1が5つ、Group2が3つなので、Group1の誰かがGroup2に移動すればOKとなるのですが、グループごとに集計して、各グループの合計が4、かつ、すべての合計が20のときにOKとなるような式を組むことは可能でしょうか? エクセルのファイルは以下にあります。 https://30.gigafile.nu/0520-b940995526173c57c4ed05f52b0e43a9c
質問日時: 2025/05/15 12:13 質問者: CaveatEmptor カテゴリ: Excel(エクセル)
ベストアンサー
5
0
-
エクセル
A1セル 1日0:45 A2セル 23日 A3セル 24日0:45 と表示させたいです
質問日時: 2025/05/15 10:44 質問者: 赤ら顔ちゃん カテゴリ: Excel(エクセル)
解決済
2
0
-
グループごとの人数のカウント
表にあるグループごとの人数をカウントしたいです。 現在、すべてのGroupが4つずつそろっているかどうかを確認するためにはどのような関数を使えばいいでしょうか? 現在はGroup1が5つ、Group2が3つなので、Group1の誰かがGroup2に移動すればOKとなるのですが、グループごとに集計して、各グループの合計が4、かつ、すべての合計が20のときにOKとなるような式を組むことは可能でしょうか?
質問日時: 2025/05/15 09:52 質問者: CaveatEmptor カテゴリ: Excel(エクセル)
ベストアンサー
3
1
-
グループごとの個数をカウントしたい。
表にあるような分類名をカウントしたいです。 現在、分類A~Dが3個、分類Eが2、分類Fが1つある状態ですが、すべての分類A~Fが4つずつそろったら終了となります。すべての分類A~Fが4つずつそろっているかどうかを確認するためにはどのような関数を使えばいいでしょうか? ※分類Aが5つ、分類Bが3つになった場合は、分類Aを1つ削除し、分類Bが1つ追加されたら終了となります。
質問日時: 2025/05/15 09:52 質問者: cul-de-sac カテゴリ: Excel(エクセル)
解決済
3
1
-
27歳の彼氏と電化製品を見に行った時に彼氏がサンプルで操作できるパソコンでExcelやパワーポイント
27歳の彼氏と電化製品を見に行った時に彼氏がサンプルで操作できるパソコンでExcelやパワーポイントを開けて何らかリストを作成したり関数を使ってグラフの作成や座席表等を作成してみるのを見たら引きますか? 彼氏は前職物流会社の採用担当で現職医療道具商社です。
質問日時: 2025/05/14 20:46 質問者: ピン-ピンた カテゴリ: PowerPoint(パワーポイント)
解決済
3
0
-
Excelで4択問題を作成したい
Excelでクイズを作ります。 選択肢は4つで、正解数は1~4つです。 画像のように、問題文、選択肢、正解欄、判定欄を作成して置き、「解答欄」に「〇」などと入力すると、「正解欄」の「〇」の位置を確認し、判定欄に「正解!」などと表示したいと思います。 「正解欄」と「解答欄」の「〇」の位置を確認し「判定欄」に結果をする構文を教えてくださいますか。
質問日時: 2025/05/14 09:10 質問者: tebentou カテゴリ: Excel(エクセル)
解決済
2
0
-
エクセル GROUPBY関数について教えてください。
いつもお世話になり感謝しています。 エクセル GROUPBY関数について教えてください。例えば、 =GROUPBY(D346:D394,I346:I394,SUM,3,0)では、条件範囲で合計しますが、 小数点以下を切り上げで表示するにはどうすればいいですか?
質問日時: 2025/05/13 18:29 質問者: banzaiA カテゴリ: Excel(エクセル)
解決済
1
0
-
エクセル 同じ数字を他の列に自動記入させたい
エクセル初心者です。 例えばA列に123と入力すると同じ行のD列にも123と自動で記入させたいです。 D列をA列と同じものにする方法を教えてください。。 よろしくお願いします。
質問日時: 2025/05/13 00:06 質問者: snug カテゴリ: その他(Microsoft Office)
ベストアンサー
1
0
-
Amazonでマイクロソフトオフィス2019 MicrosoftOffice2019が10000円弱
Amazonでマイクロソフトオフィス2019 MicrosoftOffice2019が10000円弱で売っているのですが怪しいですか? 10月にサポート終了するからですかね?
質問日時: 2025/05/12 21:52 質問者: NAGISA0006 カテゴリ: Excel(エクセル)
解決済
2
0
-
パソコンWindows11 Office2021のエクセルやワードで作ったものをUSBを使って移して
パソコンWindows11 Office2021のエクセルやワードで作ったものをUSBを使って移して パソコンWindows11 Office2019のエクセルやワードで問題なく使用できるのでしょうか? 新しいバージョンから古いバージョンなので不具合が生じますかね? わかる範囲でいいので教えてください。
質問日時: 2025/05/11 23:01 質問者: NAGISA0006 カテゴリ: その他(Microsoft Office)
解決済
4
0
-
Arduinoで温湿度と時刻を1分ごとにSDカードに記録する方法について
ArduinoProMini で室内の温湿度と時刻を、1分ごとにSDカードに記録する方法について、スケッチを書いたのですが、うまく動作しません。 ログが下記のように、1分ごとに記録はするのですが、時間の記録が変化しません。 おそらくRTCのアラーム関連がおかしいとは思うんですけど、自分の知識、技術力では解決できませんでしたので、どうか皆様のお知恵をお貸しいただけないでしょうか? 1月23日 17:05:11 21 59 1月23日 17:05:11 21 59 1月23日 17:05:11 21 59 1月23日 17:05:11 21 59 1月23日 17:05:11 21 59 1月23日 17:05:11 21 59
質問日時: 2025/05/11 21:07 質問者: タケシマン カテゴリ: Access(アクセス)
解決済
1
0
-
Microsoft Outlook本文に、パワーポイントアニメーションを入れ、動かす事はできますか?
標題の件、普通にパワーポイント1ページのアニメーション付きを アウトルックのメール本文に貼付。パワーポイントのスライドの時と 同じように、アニメーションを動かす事は出来ますか?
質問日時: 2025/05/11 09:20 質問者: aoyama-reiko カテゴリ: PowerPoint(パワーポイント)
解決済
5
0
-
エクセルシートの見出しの文字を大きくしたい
よろしくお願いします。 エクセル2024,Windows11です。 シートの見出しの文字が小さくて見ずらいです。 ネット検索しましたが適切な策は見つかりません。 方法があるのでしょうか
質問日時: 2025/05/10 20:37 質問者: yt16 カテゴリ: Excel(エクセル)
ベストアンサー
3
2
-
エクセルの複雑なシフト表から当日の出勤者と勤務時間帯を抜き出したい
エクセルの複雑なシフト表から当日の出勤者と勤務時間帯を抜き出し、一目でわかるようにしたいです。 写真の左側のシフト表から、右側に当日の出勤者の名前を一目でわかるように出せませんか? 右側でなくても、下でも別ブックでも大丈夫です。 色々調べて試行錯誤したのですが、お手上げでして... どうかよろしくお願いいたします。
質問日時: 2025/05/10 18:32 質問者: yuukun308 カテゴリ: Excel(エクセル)
ベストアンサー
11
3
-
【マクロ】別ファイルへマクロを登録するコードを短くできる所があれば教えて下さい
以下は別のエクセルブックへ画像を作成。マクロを登録するコードです もう少し、コードを短くできる所があれば教えて下さい 宜しくお願いします ・四角形の画像を作成 ・同画像のサイズ、色、名前を設定 ・画像にマクロを登録 【コード】 'マクロを登録する図形や色を設定 With ws1.Shapes.AddShape(msoShapeRectangle, 0, 0, 120, 60) .Fill.ForeColor.RGB = RGB(220, 220, 220) .Line.ForeColor.RGB = RGB(220, 220, 220) '図形の名前を登録 .Name = "あいう" '図形ボタンに、マクロの名前を記入 With .TextFrame.Characters .Text = "不要行削除" .Font.Size = 16 End With '図形をブックのどこに設置するか明記 .Top = Range("f1").Top .Left = Range("f1").Left End With 'プローシージャ(マクロ)を図形あいうに登録 ws1.Shapes("あいう").OnAction = "delete1" 'プローシージャ名を記述
質問日時: 2025/05/10 15:19 質問者: aoyama-reiko カテゴリ: Excel(エクセル)
解決済
1
1
-
【マクロ】変数に入れるコードを少しでも短くする為には?
以下のコードを、もう少し短くする事はできますか? 別ファイルのファイルパスを変数に入れるコード 正常動作を確認 【条件】 マクロは、x.xlsmのに記載しています 転記元.xlsmのA10セルにある ファイルパス を変数に入れています 【コード】 Dim filepath3 As String Dim wb3 As Workbook Dim ws3 As Worksheet filepath3 = "C:\Users\2020\OneDrive\マクロ\住所転記\コントロール.xlsm" Set wb3 = Workbooks.Open(filepath3) Set ws3 = wb3.Worksheets("転記元") Dim filepath4 As String Dim wb4 As Workbook Dim ws4 As Worksheet filepath4 = ws3.Cells(10, 1) Set wb4 = Workbooks.Open(filepath4) Set ws4 = wb4.Worksheets("サーベイデータ")
質問日時: 2025/05/10 07:47 質問者: aoyama-reiko カテゴリ: Excel(エクセル)
解決済
2
0
【Microsoft Office】 に関する回答募集中の質問
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
最新のコラム/記事
-
弁護士が解説!あなたの声を行政に届ける「パブリックコメント」制度のすべて
社会に対する意見や不満、疑問。それを発信する場所は、SNSやブログ、そしてニュースサイトのコメント欄など多岐にわたる。教えて!gooでも「ヤフコメ民について」というタイトルのトピックがあり、この投稿の通り、...
-
弁護士が語る「合法と違法を分けるオンラインカジノのシンプルな線引き」
「お金を賭けたら違法です」ーーこう答えたのは富士見坂法律事務所の井上義之弁護士。オンラインカジノが違法となるかどうかの基準は、このように非常にシンプルである。しかし2025年にはいって、違法賭博事件が相次...
-
釣りと密漁の違いは?知らなかったでは済まされない?事前にできることは?
知らなかったでは済まされないのが法律の世界であるが、全てを知ってから何かをするには少々手間がかかるし、最悪始めることすらできずに終わってしまうこともあり得る。教えてgooでも「釣りと密漁の境目はどこです...
-
カスハラとクレームの違いは?カスハラの法的責任は?企業がとるべき対応は?
東京都が、客からの迷惑行為などを称した「カスタマーハラスメント」、いわゆる「カスハラ」の防止を目的とした条例を、全国で初めて成立させた。条例に罰則はなく、2025年4月1日から施行される。 この動きは自治体...
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Microsoft Officeを2台目のPCにイン...
-
エクセルの関数について
-
【画像あり】オートフィルターにつ...
-
PowerPointのスライドの途中で、タ...
-
【マクロ】変数に入れるコードを少...
-
【マクロ】元データと同じお客様番...
-
【マクロ】【相談】Excelブックとマ...
-
【マクロ】左のブックと右のブック...
-
エクセルのリストについて
-
【マクロ】数式を入力したい。カウ...
-
【マクロ】実行時エラー '424': オ...
-
Office2021のエクセルで米国株価を...
-
他のシートの検索
-
エクセルのVBAで集計をしたい
-
【マクロ】【配列】3つのシートに...
-
vba テキストボックスとリフトボッ...
-
「テキストデータで送ってください...
-
パワーポイント「スライドショーの...
-
ワードの句読点が変な位置に出てし...
-
パワーポイントの表
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
【マクロ】元データと同じお客様番...
-
エクセルの関数について
-
【画像あり】オートフィルターにつ...
-
エクセルのVBAで集計をしたい
-
エクセルのリストについて
-
【マクロ】数式を入力したい。カウ...
-
【マクロ】【相談】Excelブックとマ...
-
Office2021のエクセルで米国株価を...
-
【マクロ】実行時エラー '424': オ...
-
他のシートの検索
-
エクセルの複雑なシフト表から当日...
-
【マクロ】【配列】3つのシートに...
-
vba テキストボックスとリフトボッ...
-
【マクロ】左のブックと右のブック...
-
【マクロ】変数に入れるコードを少...
-
エクセルシートの見出しの文字を大...
-
【マクロ】別ファイルへマクロを登...
-
【関数】同じ関数なのに、エラーが...
-
Amazonでマイクロソフトオフィス201...
-
ページが変なふうに切れる
おすすめ情報