回答数
気になる
-
【マクロ】for nest について 別のブックを動かす際のコード
【質問したい事】 マクロが保存されているブックとは別のブックに 対して、for next ステートメントを実行したいです 以下コードまで考え、普通に動いています これで良いのでしょうか? For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row の文から、何も、別ブック・別シートについて、指定してないのですが ちゃんと、別ブックに飛んで動いています 理屈等、分かる方いましたら、教えてください 【別のブックに対してのfor nextステートメント】 Sub 抽出() Dim kagamibook As Workbook Dim kagamisheet As Worksheet Dim filePath As String filePath = "C:\Users\2020\OneDrive\マクロ\240820_あいうえお.xlsm" Set kagamibook = Workbooks.Open(filePath) Set kagamisheet = kagamibook.Sheets("ボタン作成先シート") For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row If Cells(i, 3) = "条件1" Or Cells(i, 3) = "条件1" Then Cells(i, 5) = Cells(i, 1) End If Next i End Sub
質問日時: 2024/08/22 12:49 質問者: aoyama-reiko
解決済
2
0
-
Excelで数値を時間数に変換する関数について
office365を使っている者です。 Excelで数値を時間数の表示に関数で変換する方法があればご教示願います。 例えば,あるセルにおいて,=VLOOKUP($B2,出力!$B:$Z,13,0)+VLOOKUP($B2,出力!$B:$Z,14,0)という数式(以下「式A」)で4.17という数値を取得したとします。(vlookupで出力シートから時間の入ったセルを引っ張り,それらを足しています) その同じセルにおいて,4.17を4時間10分又は4:10に関数で変換する方法があれば,それぞれにつきご教示いただけると幸いです。 式Aから「.」より前の部分をLEFT,FIND等で抽出し,「時間」の文字列を足し,「.」より後の部分に60をかけて小数点以下を四捨五入し,それに「分」の文字列を足すというような数式でもできそうですが,なんとも原始的な気がします。 また,セルの書式設定で時刻にしても,適切に表示されません。 よろしくお願いいたします。
質問日時: 2024/08/21 18:37 質問者: qazxcvfr4
ベストアンサー
6
0
-
Excelについて。Excelに縦1列に並んだワードをひたすら検索しているんですが、 コピー貼り付け
Excelについて。Excelに縦1列に並んだワードをひたすら検索しているんですが、 コピー貼り付けが地味に面倒いです。 エクセル関数などを使って、 一気に検索する方法はないでしょうか? やり方は分かりませんが、ハイパーリンクみたいにしてクリックするだけで出るように出来たら便利だと思ってます。 よろしくお願いいたします(>人<;)
質問日時: 2024/08/21 12:08 質問者: 八雲さん
ベストアンサー
7
0
-
エクセルマクロを教えてほしい(月別のシートを一つにまとめたい)
現在の状況:月別に同じ表あり。(例:A列の項目毎に、B列に値あり。A1~B10) ↓ 集計シートを作成したい。 A列=シート名(〇月) B列~K列=各シートの値を、1行にまとめて表示 (集計シート) 1行目:月,A1,A2,・・・A10 2行目:4月,(4月シートの)B1,B2・・・B10 3行目:5月,(5月シートの)B1,B2・・・B10 … 13行目:3月,(3月シートの)B1,B2・・・B10 ネットでみても該当しそうなものが見当たりませんでした。
質問日時: 2024/08/19 15:19 質問者: しらいし302
ベストアンサー
2
0
-
エクセルを使用して、円周率を表示させる方法
円周率=3.141592・・・・・ は、無限に続くと言われていますが、 これをエクセルで表示させる方法を教えて下さい。 難しい事はわからないので、出来れば、簡単な説明で よろしくお願いいたします。
質問日時: 2024/08/19 11:27 質問者: オレンジmm
ベストアンサー
5
0
-
【マクロ】マクロが割当てされたボタンの作成する際に、作成先のモジュールにもマクロを保存できますか?
【やりたい事】 以下のコードを実行すると、実行するファイルではない別ファイルに マクロのボタンが作成されます。同ボタンにはマクロが割当てられており、動きます ですが、2つのファイルが開いていて、実行されます コードが保存されている、いろいろあり転記元.xlsmが開いている必要があります ですので、マクロボタンを作る時に、マクロボタンが作成されるファイル (240820_あいうえお.xlsx)にもマクロのコードが保存されるように出来ませんでしょうか? ⇒マクロボタンが作成されたファイル1つだけ開いている状態で、マクロを実行したいのです ご存じの方、宜しくお願いします 【マクロを実行するファイル】 "C:\Users\2020\OneDrive\マクロ\コントロールファイル\いろいろあり転記元.xlsm" 【マクロボタンが作成されるファイル】 "C:\Users\2020\OneDrive\マクロ\240820_あいうえお.xlsx" 【別のブックにマクロが割当てられたボタンを作成のコード】 Sub Sample1() Workbooks("240820_あいうえお.xlsx").Activate With Workbooks("240820_あいうえお.xlsx").Worksheets("ボタン作成先シート").Buttons.Add(Range("E1").Left, _ Range("E1").Top, _ Range("E1:F1").Width, _ Range("E1:F2").Height) .OnAction = "マクロプログラム" .Characters.Text = "マクロボタン" End With End Sub Sub マクロプログラム() Dim lastrow As Long lastrow = Workbooks("240820_あいうえお.xlsx").Worksheets("ボタン作成先シート").Cells(Rows.Count, 1).End(xlUp).Row MsgBox lastrow Range("A" & ActiveCell.Row & ":C" & ActiveCell.Row).Interior.ColorIndex = 15 Range("C" & ActiveCell.Row) = "削除" Range("A" & ActiveCell.Row & ":C" & ActiveCell.Row).Cut Range("A" & lastrow).Offset(1, 0) ActiveCell.EntireRow.Delete End Sub
質問日時: 2024/08/18 13:23 質問者: aoyama-reiko
ベストアンサー
5
0
-
【マクロ】AブックからBブックへセルの値コピーにおけるブックのアクティブについて
【質問】 以下のコードは、転記元ブックから転記先ブックへセルの値をコピー・貼付します 最初、Workbooks("転記元.xlsm").Activate の記述をしなかった場合エラーとなりました 追加後は動きました ここで質問ですが 以下の記述の前にも Workbooks("転記先.xlsm").Activate を入れなくても 動くのでしょうか?(なぜ動くのでしょうか) Workbooks("転記先.xlsm").Worksheets("Sheet1").Cells(1, 1).PasteSpecial xlPasteValues という質問です 自分のイメージは以下のイメージなためです ●転記元ブック アクティブ ⇒転記元ブックのデータをコピー ●転記先ブック アクティブ・・・・・この記述がないと、マクロが転記先へ移動しないと思います が実際は、移動して、貼付の実行をしてくれます ⇒転記先へデータを貼付 ご存じの方、ご指導お願いします 【コード動きます】 Sub 転記() Dim lastrow As Long lastrow = Workbooks("転記元.xlsm").Worksheets("Sheet1").Cells(Rows.Count, 1).End(xlUp).Row Workbooks("転記元.xlsm").Activate Workbooks("転記元.xlsm").Worksheets("Sheet1").Range(Cells(1, 1), Cells(lastrow, 3)).Copy Workbooks("転記先.xlsm").Worksheets("Sheet1").Cells(1, 1).PasteSpecial xlPasteValues End Sub
質問日時: 2024/08/17 19:29 質問者: aoyama-reiko
ベストアンサー
4
1
-
エクセル、LibreOffice Calcプルダウンリストについて
=INDIRECT("N"&MATCH(B2,I2:I3,0)+1) これでプルダウンリストで選択したマッチする項目の内容を表示させたいのですが 数値は表示されるのですが文字列が別のセルの項目を表示してしまいます A2プルダウンリスト選択 BBB L M N AAA 1000 ZZZ BBB 2000 XXX =INDIRECT("M"&MATCH(A2,L1:L2,0)+1) =INDIRECT("N"&MATCH(A2,L1:L2,0)+1) 表示内容 2000 ZZZ ※プルダウンでBBBを選択しているので 2000 XXX と表示させたい どうすればよいですか?
質問日時: 2024/08/17 13:46 質問者: lasdfasdfas
解決済
2
0
-
エクセルのセルの書式ユーザー定義した単位の抽出。
エクセルで見積書を作成しています。 先人が作成したフォーマットはエクセルのセルの書式設定で、単位を設定するようになっています。 単位の種類がたくさんあり(m、m2、㎡、ヶ所、等)、また数値の桁の位置がそろわないようになっています。 そのため、単位列を新たに作り、フォーマットの書式設定されている単位を単位列に表示させたいと思います。 書式設定されてる単位の文字を別のセルに抽出、表示させる関数等はないのでしょうか?
質問日時: 2024/08/17 09:19 質問者: matsu。。。。
ベストアンサー
2
1
-
index関数の説明をお願いします。
=IF(PRODUCT(INDEX((A1:C3=A7:C9)*1,0)),"OK","NG") 少し前に出ていたスレで見たのですが、 全く分かりません。 細かくどういう内容なのかを教えてください。 質問者は「条件付き書式で」と言っていたのに、 急遽これで満足してしまったみたいで、 何だったのかと思っていますが、 それはさておき。 チャンと説明が在り、全体的には分かったのですが、 INDEX((A1:C3=A7:C9)*1,0) の部分が分かりません。 説明では対応する9つのセルを比較して 合っていれば1、違っていれば0にする、ということだと思うのですが、 なぜ、これでそうなるのか。 自分なりに調べたところでは、 indexは行、列から値を取ると在りました。 色々サンプルもありましたが、 この形式は調べた中には出てきませんでした。 宜しくお願いします。
質問日時: 2024/08/16 07:16 質問者: ahohakirai
ベストアンサー
6
0
-
エクセルで曜日を入れたい
画像の様な表が1月ずつ1年間あります。 日付の横に曜日を入れたいのですが、自動で入れる方法がありますか? 手動なら簡単なんですが、12か月あるので面倒です。 もし自動で入れる方法があればご教授よろしくお願いします。
質問日時: 2024/08/15 10:25 質問者: ピクセル7
ベストアンサー
5
0
-
【マクロ】可視セルのみコピーするには
【やりたい事】 A1からC3の見ているセルのみをコピーしたいです 以下コード実行すると、関数が入っている行の A1からC5までがコピーされてしまいます ご存じの方、ご指摘宜しくお願いします 【条件】 ・C1からC5まで、以下関数が入っています =IF(E1="","","あいうえお") ・本表のAからCまでの列は常に固定 ・行は最終行が、E列のデータ入力によって変動 【コード 動きます】 Sub 可視セルコピー() Range("A1", Cells(Rows.Count, 3).End(xlUp)).Copy End Sub
質問日時: 2024/08/15 09:29 質問者: aoyama-reiko
ベストアンサー
5
0
-
Excelで時間の計算の方法 7時45分から19時45分まで働いた時間を引き算で計算するには
詳しい方教えてください。 Excel onlineを使っています。 Excelの引き算で働いた時間を計算したいです。 例えば ① ② ③ 勤務開始時間 終業時間 勤務時間 7時45分 19時45分 12時間 ②-①=③ という形で日々の勤務時間を出し、日ごとに集計して合計して月の労働時間を計算したいです。 普通に普通に引き算すれば出来るでしょうか。 表示方法は【○時○分】でなくても【19:45】【7:45】でも計算できるようにしたいです。 (19:45と表示しても、19時45分と認識されるのでしょうか) 合計時間が24時間を超えても25時間、26時間と表示されるようにしたいです。 また分単位で出し、60分を超えたら時間の法が1繰り上がるという風にしたいです。 教えていただければ幸いです。
質問日時: 2024/08/14 19:42 質問者: nazo0719
解決済
4
2
-
【Excel】Powerクエリーの取り込み方の変更って出来ますか?
最初に import20240801.csv というCSVを取り込んでから作成したブックだったので、 「import20240801.csv」というファイル名にしておかないと取り込めません でも実際にはシステムから出力されるファイル名は日付部分が変わるので、 特定のフォルダに入っているCSVにしておけば良かったと後悔したのですが、 あとから取り込み方法を変更できないでしょうか?
質問日時: 2024/08/14 18:12 質問者: tanapyondai
解決済
2
0
-
Excelで1週間毎の集計(今週と先週)を日にちが経てば自動で日にちが変わり集計が更新される表を作り
Excelで1週間毎の集計(今週と先週)を日にちが経てば自動で日にちが変わり集計が更新される表を作りたいと思っております 大元の表は 縦に2024/4/1から今日までの日にちと曜日があります 横に時刻(時)が6:00〜22:00まで1時間毎に18列あります 値は何月何日の何時にきた人数が示されております 月曜日から日曜日、今日がもし4/15月曜日だとすると 4/15から4/21までの1週間が今週欄に、4/8から4/14までが先週欄に示されることになります もし時が経ち4/22となると自動的に欄が日にちと値が更新できるような表作成をご教示いただきたいです よろしくお願い申し上げます
質問日時: 2024/08/14 11:47 質問者: ひかりりあ
解決済
1
0
-
Excelの警告について
Excelを開くと「遅いブックですか?ブックの96%にパフォーマンスを向上させるために最適化できる未使用の書式設定とメタデータがあります」というメッセージが表示されるのですが、どのように対処すればいいでしょうか?
質問日時: 2024/08/14 09:20 質問者: オバケイ
解決済
1
0
-
条件付き書式でやりたいのですが
複数のセル範囲(A1:C3)と(A7:C9)が在りまして、 対応するすべてのセルを比較し、 すべて一致の場合だけ『ok』、 一つでも相違が在れば『ng』と表示したいのですが。 excel2003です、宜しくお願いします。
質問日時: 2024/08/13 18:08 質問者: nagahaha
ベストアンサー
5
0
-
Googleスプレッドシートどの関数を使えば?
GoogleスプレッドシートでA列に日付、B列に商品名(猫の種類と犬の種類を別シートC列に登録済でプルダウンで選択)する場合、指定の期間(8月)の犬と猫の頭数をそれぞれ抽出する際の関数と式を教えて頂けませんか?よろしくお願いします。
質問日時: 2024/08/12 17:15 質問者: ハービー977
解決済
1
1
-
【マクロ】色のついている行を数える
【やりたい事】 以下の画像をご覧ください 黄色のセルの数字をマクロ⇒計算・入力したい 本売上の表がもともとあります。同表の行の数を色がついていない部分2行 と灰色の行1行を数えたいです 調べましたが、自分のスキルではわかりませんでした。 特に色がついている行を数えるマクロについて教えて欲しいです ヒントでももちろん良いのでご存じの方、教えて下さい
質問日時: 2024/08/11 00:04 質問者: aoyama-reiko
ベストアンサー
5
0
-
【マクロ】Fon nextステートメントによる変数への数値格納、2回以上について
【知りたい事】 以下コードを事項すると、メッセージBOXに100と表示されます 私は、高橋が全部で2行分あるので、セルD2の1とD3 100を足して 変数Aには、101 が格納されていると思います しかし、答えが100なのが、疑問です ご存じの方、教えて下さい 【表】 A列 B C D 1行 鈴木 1 1 1 2行 高橋 1 1 1 3行 高橋 100 100 100 【コード動きます】 Sub 変数について() Dim i As Long, A As Long For i = 1 To 3 If Cells(i, 1) = "高橋" Then A = Cells(i, 1).Offset(0, 2) End If Next i MsgBox A End Sub
質問日時: 2024/08/10 20:00 質問者: aoyama-reiko
ベストアンサー
3
0
-
重複しない値を取り出したい
(表1)から(表2)に重複してない区名だけを取り出す方法についてお聞きします。 ネットで調べましたが上手くいかないので皆様の力をお借りする次第です。 なお、EXCEL2019のため「UNIQUE」関数は使えません。 ① F7セルに=C7を入れる ② F8のセルに=IFNA(INDEX($C$7:$C$16,MATCH(0,COUNTIF($F$7:F7,$C$7:$C$16),0)),"") ③ ②の式をF16までコピー 以上のように①~③を試しましたが希望するような表示ができませんでした。 間違いを指摘いただければ幸いです。 よろしくお願いいたします。
質問日時: 2024/08/09 19:19 質問者: ymhirokazuym
ベストアンサー
5
0
-
教えていただければと思います エクセルVBAでファイルを作っています。 テキストボックスのサイズ以下
教えていただければと思います エクセルVBAでファイルを作っています。 テキストボックスのサイズ以下です。 縦横は50ピクセル。 枠線は2ピクセル。 これを理由があって上から隙間なく並べたいと思ってます。セルの高さも50ピクセルにしています。 本来ならセルの行の高さとテキストボックスの高さは重なると思うのですが、だんだんずれてきます。 同じ50ピクセルでも、セルの高さとテキストボックスの高さは違うものなのでしょうか。あるいは枠線の分も考慮する必要があるのでしょうか? もしおわかりになる方がいらっしゃいましたら、おしえて頂ければ有り難いです。 宜しくお願い申し上げます。
質問日時: 2024/08/09 16:47 質問者: nnnkukuku
解決済
1
0
-
EXCELのような表を使っていますが、 行の挿入後、枠線もそのままコピーされるのですが、消しゴム機能
EXCELのような表を使っていますが、 行の挿入後、枠線もそのままコピーされるのですが、消しゴム機能って、どこにありますでしょうか? EXCELが使えず、このソフトを使っています。 宜しくお願い致します。
質問日時: 2024/08/08 16:50 質問者: miN-Bum.
解決済
7
0
-
複数列にわたる延べ活動日の算出
A列 A1セルからA10セル B列 B1セルからB8セル C列 C1セルからC5セル 各々のセルに某作業の活動日が入っています(作業日の重複、空欄の場合もあり)。延べ作業日(重複日を1日とカウントする)を出したいのですが、関数で可能でしょうか
質問日時: 2024/08/08 02:25 質問者: ラップ6614
解決済
2
0
-
Excelの数式の効率化について
office365を使用しています。 以下の数式についてですが,もっと短くできないでしょうか。 以下は条件にヒットした文字列をつなげるための数式です。 最初の「&」以降の部分ですが,「LEFT(VLOOKUP($C14,台帳!E:BR,42,0),(LEN(VLOOKUP(C14,台帳!E:BR,42,0))*IF(VLOOKUP(C14,台帳!E:BR,43,0)="",0,1)))」が2回出てくるため,非効率な感じがします。 =+LEFT(VLOOKUP($C14,台帳!E:BR,35,0),(LEN(VLOOKUP(C14,台帳!E:BR,35,0))*IF(VLOOKUP(C14,台帳!E:BR,36,0)="",0,1)))&IF(LEFT(VLOOKUP($C14,台帳!E:BR,42,0),(LEN(VLOOKUP(C14,台帳!E:BR,42,0))*IF(VLOOKUP(C14,台帳!E:BR,43,0)="",0,1)))="","",","&LEFT(VLOOKUP($C14,台帳!E:BR,42,0),(LEN(VLOOKUP(C14,台帳!E:BR,42,0))*IF(VLOOKUP(C14,台帳!E:BR,43,0)="",0,1)))) 良い方法があれば,ご教示いただけますようお願いいたします。
質問日時: 2024/08/06 17:18 質問者: qazxcvfr4
ベストアンサー
1
0
-
【ExcelVBA】UTF-8(BOM無)でCSV保存するには?
下記の書式で、CSV出力させています。 途中割愛の部分は変数をカンマ区切りで1行ずつ積み重ねている過程なので 影響ないと思って省略しました。 Open filePath For Output As #1 ' 作成するファイルを開く ・・・途中割愛・・・ Close #1 '作成するファイルを閉じる このまま出力すると秀丸だと日本語(Shift-JIS) Windowsメモ帳だとANSIとなったのですが、 UTF-8(BOM無)で欲しいという指定があったので、どんな記述を加えたら実現できますか?
質問日時: 2024/08/06 16:18 質問者: tanapyondai
解決済
3
1
-
エクセル365 IF??計算式を教えてください
お世話になります。 エクセル365を使用しています。 <sheet1> Aセル Bセル Cセル Dセル Eセル 商品 入荷日 配送日 経由地1 経由地2 いちご 2024/1/1 2024/1/10 千葉県 東京都 ばなな 2024/1/1 2024/1/10 長野県 秋田県 りんご 2024/1/3 2024/1/20 青森県 東京都 ばなな 2024/3/3 2024/3/24 福島県 山梨県 いちご 2024/6/5 2024/6/15 福島県 東京都 いちご 2024/7/12 2024/7/31 千葉県 長野県 ・ ・ ・ ・ (続く) 上記のような一覧があります。 sheet2で別のsheetより、商品・販売日・重さ・箱の大きさなどの管理台帳が表示されるようにしています。 ・sheet2で表示されている「商品」の「販売日」が、shee1のB・Cセルの入荷日~配送日のどこの期間に該当するか ・該当した「商品」の、sheet1のD・Eセルを、sheet2に表示するようにしたい 例) <sheet2> Aセル Bセル Cセル Dセル 商品 販売日 経由地1 経由地2 いちご 2024/6/8 福島県 東京都 ・「商品」いちご 「販売日」2024/6/8 = sheet1のBセル2024/6/5~Cセル2024/6/15の期間に該当する ・該当した、sheet1のDセル「福島県」を、sheet2のCセルに表示/sheet1のEセル「東京都」をsheet2のDセルに表示 といったことがやりたいのですが、それが可能な計算式を教えてほしいです。 よろしくお願いします。
質問日時: 2024/08/06 16:11 質問者: べるベル
解決済
3
0
-
任意の値が存在する行に名前を付ける!!!???
いつもお世話になっております。 名前の定義で、任意の値が存在する行に名前を付ける方法をご教示ください。 例えば、MAX(F6:F10)の行に'top'と名前を付けるにはどうすれば良いですか。 つまり、6:6、7:7、8:8、9:9、10:10のいずれかの行の名前が'top'となるようにしたいです。 AIによると、INDIRECT()を使って名前の範囲を定義すれば出来るようですが、うまくいきません。 ちなみにExcel2003です^^;
質問日時: 2024/08/06 05:43 質問者: zyousuke
ベストアンサー
6
0
-
surface laptopについてくるofficeって、何年間しか使えないってありますか?
surface laptopについてくるofficeって、何年間しか使えないってありますか?
質問日時: 2024/08/05 23:10 質問者: だるだるだる
解決済
7
0
-
Excelで特定の文字列が含まれているか確認したい
タイトルの通り、Excelで特定の文字列が含まれているか確認したいです。 特定の文字列は、定まっているのではなく、隣のセルの文字を指定したいです。 例えば A1に『東京都新宿区』 B1に『東京都』とあり A1に『東京都』という文字があるかどうかを確認したいです。 確認したい文字列が固定であればCOUNTIF関数で 例えばA1のセルにAという文字があるかは =COUNTIF(A1,"*A*") としていたのですが、セルで指定したい時はどのようにしたらいいのかがわかりません。 ご存知の方がいらっしゃいましたら、ご教示の程よろしくお願いします。
質問日時: 2024/08/05 11:25 質問者: love2beer
ベストアンサー
3
0
-
エクセルで数字の組み合わせを列記したい
お世話になっております。 例えばA1セルの4桁の数字で出来る組み合わせの4桁の数字をB列~列記するようにしたいのですが。 A2,A3と下のセルにも4桁の数字が入っているので、式のコピーでB列~に表記されるようにしたのですが関数が思いつきませんので宜しくお願いします。
質問日時: 2024/08/05 07:43 質問者: 教えてOK知恵袋
ベストアンサー
5
0
-
【マクロ】Ifとwith ステートメントにて分からない部分があります
以下の2行の コードが分かりません 特にNが、特に定義されていないので、突然でてきた感じで 分かりません。iは1から2までと定義しています 本コードは、Sheet2で実行すると、下記の表の2行目の A~d列までコピーされ、Sheet2のA1セルに貼付されます 答えは良いのですが、なぜ、そのような結果になるのかが分かりません ご存じの方、教えて下さい 【分からないコード】 N = N + 1 .Range(.Cells(i, 1), .Cells(i, 4)).Copy Cells(N, 1) 【表】Sheet1 A B C D 1行 佐藤 一郎 1 1 1 2行 エクセル太郎 101 1 1 3行 鈴木 次郎 1 1 1 【コード】動きます Sub Sample() Dim i As Long Dim N As Long With Sheets("Sheet1") For i = 1 To 3 If .Cells(i, 2) > 100 Then N = N + 1 .Range(.Cells(i, 1), .Cells(i, 4)).Copy Cells(N, 1) End If Next i End With End Sub
質問日時: 2024/08/04 13:15 質問者: aoyama-reiko
ベストアンサー
2
0
-
Excelでの印刷について
4つのシートがあります。 ブック全体の印刷を選ぶと2ページと3ページが両面になってしまいます。 プリンターの設定はもちろん片面印刷になっています。 どうすればブック全体の印刷で片面印刷ができるでしょうか? もちろん、シートごとの印刷ならちゃんと1ページずつ印刷できます。
質問日時: 2024/08/04 12:39 質問者: ピクセル7
ベストアンサー
1
0
-
【エクセル】ある列の文字と画像を関連付けて動かしたいです。
エクセルについてです。 文字を打つと画像を参照して特定のセルに表示するようにしたいです。 あ→aの画像 い→iの画像 う→uの画像 印刷する部分にローマ字の表記をさせたいです。 たとえば A4設定で印刷したら、印刷範囲の枠外(右側)にひらがなを打ち込む欄を作り、そこに、「う」「ま」と打つと、指定されたセルに「u」と「ma」の画像が表示するようにしたいです。 A.別シート あ→aの画像 い→iの画像 う→uの画像 … ん→nの画像 B.使いたいシート u ma ↑印刷されるところに表示される画像 やり方としては、上のようにA.別シートにあ~んなどの文字一覧とその横にローマ字の画像一覧を並べておいてそこからVLOOKUP関数でB.使いたいシートのほうへ引っ張ってくるのが良いかと思います。 ただし、パソコンが古いのでエクセルの画像の挿入の「セルの上に配置」「セルの中に配置」の機能は使えません。 どうか教えてください。
質問日時: 2024/08/04 08:46 質問者: sp2020
解決済
2
0
-
Excel VBAでフィルタしたものに色付けしたい
Excel VBAでご教示ください。 オートフィルタの条件が2つあります。 1.セルG1に入っている基準日より、以前のもの(基準日は含めない) 2.ステータスが「完了」以外のもの つまり、基準日がきているのに書類が完了していないものを抽出したい。 そして、抽出されたものにだけ黄色い色にしたい。 以下のVBAを作りましたが、該当する値がないとき(0件の時)全部に色が塗られてしまいました。 該当があるときはセルを塗る、該当なし0件の時には色は塗らない。 このようにするには、IF文などを使うしか方法がないのでしょうか。 Sub TEST9_2() Dim kijyun As Long kijyun = Range("E1").Value Range("B2:E7").AutoFilter Field:=4, Criteria1:="<" & Cells(1, 7) Range("B2:E7").AutoFilter Field:=3, Criteria1:="<>完了" Range("B3:E7").Interior.ColorIndex = 6 End Sub
質問日時: 2024/08/03 22:45 質問者: にこにこじぇい
ベストアンサー
3
0
-
Excel 対象のセルに入力が無いとセルに入力できないようにしたい
タイトルのままの質問です。 Excelで対象のセルに入力が無いと、セルに入力できないようにしたいです。 例えばA1に入力がないとB1・C1・D1には入力できない。 同じくA2に入力がないとB2・C2・D2には入力できない。 下の行も同じように、、、としたいです。 「データの入力規則でいけるのでは」と思い B〜D列を選択して データの入力規則→入力値の種類をユーザー設定→数式に =$A1〈〉"" としてみたのですが、A列に入力があろうが無かろうが B〜D列の入力は可能です。 このやり方ではダメなようです。 (ちなみに式を =$A1="" に変更すると A列に入力があるとB〜D列の入力ができなくなるので、なぜできないのかが、私の拙い知識ではわからなく。。。) どの様に設定をしたら、入力できないようになるのか ご教示の程、よろしくお願いします。
質問日時: 2024/08/02 13:24 質問者: love2beer
ベストアンサー
2
0
-
wordオートシェイプ内の検索
フォルダ内に複数wordファイルがあり、全Wordファイルから文字列を検索し書き出しするExcelVBAをこちらで確認しました。 https://qiita.com/Uni0930/items/4fe798640e986f9a2872 ただ、オートシェイプ内の文字は拾ってくれず、困っています。 word本文とオートシェイプ内両方検索、書き出ししてくれるよう何処を変更すべきでしょうか? ワードのバージョンはよくわかっていません。。
質問日時: 2024/08/01 23:29 質問者: xxxkouxxx
解決済
2
0
-
表中の指定した条件の文字列を結合する方法について
office365を使用しています。 添付ファイルのような表中,B列に1が入っている行のC列の値を結合させる方法があればご教示願います。 =if(B2=1,C2,"")&if(B3=1,C3,"")・・・ と地道にif関数でつなげていく方法もありますが,行数が膨大な場合には対応が難しいため,他に良い方法があればお願いします。
質問日時: 2024/08/01 14:32 質問者: qazxcvfr4
ベストアンサー
4
1
-
Excelの数値の小数点表示について質問です
現在使用しているシステムから金額データを抽出すると小数点1桁の金額まで表示されるのですが、なぜか少数点が表示されず困ってます。 例えば本来なら1000.5円のものが10005円と表示されます。 これを1000.5円の表示に直す方法はありますか?すべて手入力で入力していくしかないのでしょうか? システムを修正するように依頼しましたがExcelデータに変換する際に小数点が表示できない仕様だから無理と言われました。それならいっそ四捨五入して表示はできないかと相談していますが、そもそもそのデータをシステムで利用する際にその数値が必要で云々といわれて変更はしてもらえそうもありません。 データの数も膨大なので一つ一つ変更するのは時間がかかりすぎてストレスです。 何か方法があればご教授下さい。
質問日時: 2024/07/31 10:18 質問者: アタック55
解決済
3
0
-
【マクロ】A列最終行までを、カウンタ関数にて集計するには?=COUNTA(A2:A列最終行)
【やりたい事】 毎回、最終行が変わる、表のA2からA列最終行のデータが入っている所までの件数を数えたいです カウンタ関数にて数えたいです。他、関数でもOK 最終行は、毎回、変わります(毎回、新しい表を作るコードの一部です) 例=COUNTA(A2:A10) この場合は、A10行が最終行です 最終行は、定義しています Range(Cells(2, 1), Cells(LASTROW, 1)) 名前は、LASTROWです。動きます。 以下のとおり、考えましたが、数字の2をかえしてしまいます 【考えたコード:常に2を返します】 Range(Cells(2, 13), Cells(LASTROW, 13)).Formula2 = "=trim(h2)" ご存じの方、教えて下さい
質問日時: 2024/07/31 08:05 質問者: aoyama-reiko
ベストアンサー
5
0
-
Excel 数式バーの情報を、別シートにセル上で表記する方法を教えてください
事例を書いてお伺いします。 シート1にメンバーの生年月日を一覧にしました。セル上には和暦が載っています。(平成14年5月10日なら140510) 数式バーでは西暦で表記されます。(ユーザー定義で[$-ja-JP]eemmdd;@となっていました) これを、シート2でyyyy/mm/ddの西暦でセルに表示されるようにしたいです。 シート1は外部で作成したデータなので、操作はできない状況です。 シート2上で関数を使って、表記を調整したいと思っています。 関数初心者です。ご教示をどうぞよろしくお願いいたします。
質問日時: 2024/07/30 10:45 質問者: negitara
解決済
3
0
-
Excelで、時間の引き算でマイナス表示したものを計算に使うには
詳しい方教えてください。 Exceloffice365です。 時間の引き算をしたマイナスの結果を他の計算で使用する際に、上手くいきません。 具体的には画像のような形なのですが、見にくいかもしれないので、こちらにも示します。 下記は例ですが ①7:00 ③5:00 ②3:00 ④7:00 ⑤4:00 ⑥-2:00 ⑤=①ー② ⑥=③ー④ です。Excelだと⑥は「****」みたいな感じになるのですが、 =text(ABS(③-④),if(④>③,"-hh:mm:ss","hh:mm:ss")) としてマイナス表示しました。(これはネットで調べました) ここで、⑤+⑥=2:00 としたいのですが、画像のようにエラー値になってしまいます。(#value) これをきちんと数値として足し算、引き算し、「2:00」となるように計算できるようにしたらどうしたらいいのでしょうか。 そもそも、⑥のマイナス表示の仕方が間違っているのでしょうか。 教えていただければと思います。
質問日時: 2024/07/29 23:25 質問者: nazo0719
解決済
3
1
-
Excelで数式を用いて番号を順にするには?
A列でC列の値にある数値を上から順番に表したいのですが途中空白があるとエラーに7なってしまいます。ちなみに数式はA3に=IF(C3="","",1) A4からは=IF(C4="","",A3+1) これで空白部分があるとエラー7表示に7なり番号順になりません。空白部分は無視して番号順にしたいのですがどうしたらよいでしょうか?B列は下から順に番号をつけていきたいです。希望表現を参考に答えがだせたらと思っています。どなたかアドバイスをお願いします。
質問日時: 2024/07/29 21:09 質問者: ブラックムーミン
ベストアンサー
2
0
-
Excelのセル値に基づいて図形の色を変更するにはどうすればよいですか?
A1に日付が入ってるとする A1の日付が変わると、同一シートにある図形(正方形/長方形)の背景の色を曜日ごとに変更する方法があれば教えて下さい (VANコードを使用するなど) 月曜日は、色なし 火曜日は、ピンク 水曜日は、青 木曜日は、緑 金曜日は、茶
質問日時: 2024/07/29 20:13 質問者: ガンバルじいさん
ベストアンサー
3
0
-
Excel 最小二乗法 二次関数
Excelで最小二乗法を用いて近似式を出したいです。 ・二次関数 ・一次の係数は0 ・(0,0)を通る ことが条件になっています。 いくつかデータがあり、そこからy=ax^2の指揮を導きたいです。
質問日時: 2024/07/29 13:57 質問者: y_von
解決済
2
0
-
Excel関数の式の作り方を教えてください
過去の質問履歴を検索したのですが、上手く行かないので教えて下さい・・・。 エクセルの表で「500401」というような日付があるとします。 このようなデータを西暦で「1975/04/01」と別セルに表示させたいのですが、どのようにすれば良いのか分かりません・・・。 また、平成などで「60629」という5桁の日付の場合にも、西暦で「1994/06/29」と別セルに表示させたいです。 マニュアルなどを見て関数を作っても上手く行きません。 分かる方がいらっしゃったらよろしくお願いします!
質問日時: 2024/07/29 12:34 質問者: negitara
解決済
5
0
-
【ExcelVBA】最終行の取得で困ってます
最終行を下記の方法で取得して、CSV出力するマクロを作ってます。 lastRow = shtData.Cells(shtData.Rows.Count, 1).End(xlUp).Row ↑この処理で、A列の最終行を取得してるのですが、 A列には、「=IF(C2="","",・・・・」が入っており、集計表自体は100行まであっても、 画面上に見えてるレコードが7行だったら7レコード分だけ出力したいのですが、 100行まるまる出力されてしまいます。(セルに関数が入っているだけでカウントされてしまう) 画面に数値が表示されている最終行を取得するにはどうしたら良いでしょうか?
質問日時: 2024/07/29 11:53 質問者: tanapyondai
解決済
4
0
-
EXCELのページを、枠線を維持したまま印刷する方法をありませんか?
EXCELのページを、枠線を維持したまま印刷する方法をありませんか?
質問日時: 2024/07/29 00:00 質問者: ウピョー
ベストアンサー
2
0
-
Excel 1の位の数字で処理を分岐させたい
2桁~3桁の数字が入った列があります。 1の位の数字が0~4だった時 → 5を足す 1の位の数字が5~9だった時 → 1の位を切り上げ、さらに5を足す(例:17→25) という処理をするにはどうすればいいでしょうか。
質問日時: 2024/07/26 15:11 質問者: bari_saku
解決済
6
0
-
とびとびの大量セルを選択したいのですが・・・
オフィス365を使用してます。 添付ファイルのようにエクセルですでに作成した空の表があります。データ量は20000程あります。 「商品番号」のC3/C9/C15・・・に入力すると「部品名」のC4/6/C10/C16・・・に別シートからデータが入ってくるように設定されていますが、「部品名」のC4/6/C10/C16・・・を誤って消す等がないように選択→セルの書式設定→保護→シートの保護をかけたいのですが、C4/C10/C16・・・20000程のデータを一気に選択する方法を教えてください。 よろしくお願いします
質問日時: 2024/07/26 13:33 質問者: mihomiho34
ベストアンサー
3
1
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
【Excel(エクセル)】に関するコラム/記事
-
弁護士が解説!あなたの声を行政に届ける「パブリックコメント」制度のすべて
社会に対する意見や不満、疑問。それを発信する場所は、SNSやブログ、そしてニュースサイトのコメント欄など多岐にわたる。教えて!gooでも「ヤフコメ民について」というタイトルのトピックがあり、この投稿の通り、...
-
弁護士が語る「合法と違法を分けるオンラインカジノのシンプルな線引き」
「お金を賭けたら違法です」ーーこう答えたのは富士見坂法律事務所の井上義之弁護士。オンラインカジノが違法となるかどうかの基準は、このように非常にシンプルである。しかし2025年にはいって、違法賭博事件が相次...
-
釣りと密漁の違いは?知らなかったでは済まされない?事前にできることは?
知らなかったでは済まされないのが法律の世界であるが、全てを知ってから何かをするには少々手間がかかるし、最悪始めることすらできずに終わってしまうこともあり得る。教えてgooでも「釣りと密漁の境目はどこです...
-
カスハラとクレームの違いは?カスハラの法的責任は?企業がとるべき対応は?
東京都が、客からの迷惑行為などを称した「カスタマーハラスメント」、いわゆる「カスハラ」の防止を目的とした条例を、全国で初めて成立させた。条例に罰則はなく、2025年4月1日から施行される。 この動きは自治体...
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
【マクロ】実行時エラー '424': オ...
-
エクセルのVBAで集計をしたい
-
【マクロ】数式を入力したい。カウ...
-
【マクロ】【配列】3つのシートに...
-
【マクロ】元データと同じお客様番...
-
【マクロ】【相談】Excelブックとマ...
-
他のシートの検索
-
【画像あり】オートフィルターにつ...
-
Office2021のエクセルで米国株価を...
-
vba テキストボックスとリフトボッ...
-
【マクロ】左のブックと右のブック...
-
エクセルシートの見出しの文字を大...
-
【関数】3つのセルの中で最新の結...
-
【マクロ】excelファイルを開くたび...
-
LibreOffice Clalc(またはエクセル...
-
エクセルの複雑なシフト表から当日...
-
空白のはずがSUBTOTAL関数でカウン...
-
【関数】=EXACT(a1,b1) a1とb1が空...
-
【マクロ】【画像あり】❶ブックから...
-
5単位で繰り上げしたい
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
【マクロ】元データと同じお客様番...
-
エクセルの関数について
-
【画像あり】オートフィルターにつ...
-
エクセルのVBAで集計をしたい
-
エクセルのリストについて
-
【マクロ】数式を入力したい。カウ...
-
【マクロ】【相談】Excelブックとマ...
-
Office2021のエクセルで米国株価を...
-
【マクロ】実行時エラー '424': オ...
-
他のシートの検索
-
エクセルの複雑なシフト表から当日...
-
【マクロ】【配列】3つのシートに...
-
vba テキストボックスとリフトボッ...
-
【マクロ】左のブックと右のブック...
-
【マクロ】変数に入れるコードを少...
-
エクセルシートの見出しの文字を大...
-
【マクロ】別ファイルへマクロを登...
-
【関数】同じ関数なのに、エラーが...
-
Amazonでマイクロソフトオフィス201...
-
ページが変なふうに切れる
おすすめ情報