Excel総合相談所 148
レス数が1000を超えています。これ以上書き込みはできません。
【1 OSの種類 .】 Windows**
【2 Excelのバージョン 】 Excel**
【3 VBAが使えるか .】 はい･いいえ
【4 VBAでの回答の可否】 可･否
注意事項
・情報を隠すために別の問題を設定するのはやめましょう。たいていの場合その問題は的外れな設定で、期待していたものからずれた回答が返ってきます。
※前スレ
Excel総合相談所 147
https://mevius.5ch.net/test/read.cgi/bsoft/1638603306/ どちらも良いし、どちらも欠点がある。
2021は買い切りタイプで機能拡張は無し、365は月に１～２回？程機能拡張の更新がある等。
こんな感じ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
【9 VBAの方が簡単で早くできる場合はVBAで回答】 可
行数760くらいの表があります。
a列は1行おきにデータが入っていて、その行は他の列にもデータが必ず入っています。
a列にデータが入っていない行は、他列にデータが入っている行もあれば無い行もあります。
a列のデータなし行だけ1行ずつグループ化したいのですが、マクロはどう書けば良いでしょうか？
a列データなし行は、他列にデータを入れる行だけ展開して、データなし行は畳んでおきたいのです。 >>7
相対記録にして
A1選択
マクロ記録開始
グループ化
A2選択
マクロ記録終了
出来たら何かキーに割り当てて使いましょう VBAで質問です。
何十列もある表で不要な列を大量に削除したいと思っています。
Range("A1,N1:U1.....").entirecolumn.deleteといった感じで手作業、つまり目で列を確認してコードを書くしかないのでしょうか？？
分かる方お願いします。 不要な列とやらに法則性があるなら条件処理が可能
不要な列の判定行を無理やりつけてやるか。
残したい列が少ないならそれだけ処理するか。 それだと目チェックした方が早いので意味ナッシングです マクロ板で相談すれば良いよ
向こうはマクロ専門家がたくさん つか多分マクロの利用の仕方を勘違いしてる
列が大量にあるならパワークエリーで列選択して抽出する機能があるからそれ使えば良い それでどうやって条件処理すんだよ
質問理解出来ないなら黙ってろ フリーフォームの頂点をマクロで編集（動かす）しようとしたところ
誤ってテキストボックスに実行してしまったら、テキストボックスが
矩形でなくなったのですが、どうすれば元に戻せますか?? >>17
は？どこに条件処理したいなんて質問が書いてあるんだよ
字が読めないなら黙ってろ >>21
何度もイチャモン挑発レスしているが相手にされないのがそんなに悔しいのか？w
自分は妄想クズにどう思われようと全く気にならないんだがw
妄想クズは自己中だから都合の良い解釈(願望)をしてそれを信じ込めば
自分が卑屈にならずに安心できるとでも思っているのか？w 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2019
【3 VBAが使えるか .】はい
【4 VBAでの回答の可否】 必要なら
配送の仕事で
一件配達して基本料金300円
荷物が増えると100円増し
というものがあります
配達先1件なで10個持ち出すなら
1300円になります
請求書は
内容 単価 金額
となりますが、単価の書きようがなくてこまっています
日付 内容 単価 金額
20/05/18 配送（ 10件100個） 13000
となります
どのように単価を書いたらいいでしょうか？
このような場合は単価は空欄ですか？
毎日たくさんあるので基本料金と追加料金をわけてかくと3 枚とかの請求書になってしまいます >>25
日付からしてコピペなの初見でも分かるね
まーた回答者をバカにするレス入れようとウズウズしてんだろうな コピペに反応する奴が居るから、面白がって過去スレから探してきて貼る奴も増える コピペに対する反応
正解1
検索して回答する
自分のスキルがあがる
回答者のスキルもあがる
正解2
検索してその正しい対処法を知る。リンクだけ張る
自分のスキルがあがる
回答者のスキルもあがる
誤答
リンクをはらず、「過去に回答済み」とがけ回答
誰のスキルも上がらない。 コピペ張る行為は、どうすれば嫌がらせになるか？
・基本、嫌がらせにはならない
・・非常に難しい難問
回答者同士で本気で考えるため、めちゃくちゃスキルアップする。
・・絶対に回答がない問題
すぐに回答不能と判断できる
・・既に回答済み
過去問でしかない。一瞬で解ける 逆に、いかに嫌がらせになるかを考えてみたほうがいいかもしれない コピペ突っ込みたいやつが喜んでるだけ
しかも自分でコピペしてる可能性大って
前のスレで判定されてた ネタが無いからって自作自演だろ
何故このスレはIDが非表示？ 何も知らずに正解とか書いてんじゃねーよ
コピペ質問は条件不足で回答不能なんだよ
掲示板荒らしの正解は無視なんたけど、毎回誰かがひっかかって、足りない条件を逆質問するのが延々と繰り返されてる >>37
コピペ質問の出題傾向に気づかないのは白々しいわ
いつからこのスレにいるの？ 誰か教えて下さい
フォルダから同じ体裁のデータを複数取得し、
クエリで一行目を削除して二行目をヘッダーに昇格させてるのですが、
どうしても2つ目以降のデータの先頭2行がレコードとして残ってしまいます
フィルタリングすれば消せるっちゃ消せるのですが、、、
これは仕様なのでしょうか？
内部的に先にデータを合体させてるからこんなことに？ VBA板のバカ住人達はID表示されるにも関わらず自作自演やってるみたいだがね id見るさ
自作自演とか腹立つし
何が楽しいんだろうか 自分の自演がバレてないかどうか見てるだけだろ
IDとか見てる奴って 目的と手段の違いがわからないんだよ
IDガー爺さんは =LET(...,IFERROR(a+b,IFERROR(a,b))) 質問があると
過去ログ検索する
IDがついてないかチェックする >>53
>>51はネタだぞ。>>49とは別人
これを自演と思うようだったら重症 マクロで自演て解析できなかったっけ？
過去スレで可能とかいう書き込み見たする 後付けの言い訳はもういいから早く次のネタ探してこいよ
>>55 ソース見れば分かるけど、複数の書き込みが同一人物と特定できる情報は無いよ
ﾜｯﾁｮｲかID・ipがあれば別だけど、このスレは無理 >>61
信じられないよな
自演して何が楽しいのやら 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2013
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 素人でもググって出来る範囲なら
エクセルでの検索で、該当するセル内で「検索した文字のみ」を強調表示することってできますか？
エクセルで自分用の用語集を作っており、Ａ列に単語＆Ｂ列にその説明を記載しています。
だんだんＢ列の１セル内の文字数が増えてきて、通常の検索機能ではセル内のどこに調べたい単語が記載されているか判りづらくなってきました。。。 >>65
「ab」を強調表示
Sub Macro1()
検索語句 = "ab"
検索語句_文字列長 = Len(検索語句)
最終行 = Cells(Rows.Count, 2).End(xlUp).Row
For i = 1 To 最終行
検索結果 = InStr(Cells(i, 2).Value, 検索語句)
Do While 検索結果 > 0
Cells(i, 2).Characters(Start:=検索結果, Length:=検索語句_文字列長).Font.Size = 20
Cells(i, 2).Characters(Start:=検索結果, Length:=検索語句_文字列長).Font.Color = 255
検索結果 = InStr(検索結果 + 1, Cells(i, 2).Value, 検索語句)
Loop
Next
End Sub こんなふうに飛び飛びにデータが入ってる場合、最初に現れる数字を取得する関数ってないのかな
A
1
2
3
4 20
5
6
7 30
関数（Ａ） = 20 みたいなかんじ ゼロなら何もしない、ゼロ以外ならセルの値表示じゃね >>69
=INDEX(FILTER(A:A,A:A<>""),1) 初心者で申し訳ないですがご質問させていただきたいです。
1/1 \100
1/2 \120
1/5 \50
1/7 \300
上記のデータの下記のように簡単に補完する方法はありますでしょうか？
1/1 \100
1/2 \120
1/3 \0
1/4 \0
1/5 \50
1/6 \0
1/7 \300 2560px*1440px = 3.69MegaPixel や 3840px*2160px = 8.29Mpx などのスクリーンショット画像を
3Mpx や 2Mpx、1.6Mpx に収まるよう長辺比率指定での縮小をしたいと考えています。
GCD関数で比率が16:9、最大公約数が160や240であるところまでは考えられたのですが、
おそらくこの公約数をxにして比率から関数を使い、長辺・短辺の長さを割り出す計算式があると思うのですが
考えられないのでご教示いただけないでしょうか。
よろしくお願いいたします。 >>73
画像の比率が16:9だから、16x*9x=3Mという方程式を解く
式を変形するとx=SQRT(3000000/16/9)
これを解くとx=144.3376
xを代入すると16x=2309、9x=1299
よって3Mの画像は2309*1299ピクセル 16:9で面積3×10^6以下の最大の長辺は
=16*INT(SQRT(3**6/(16*9)))
で2304x1296px 面積をX倍したかったら各辺を√X倍するだけ
中学数学の範囲 質問です
2022/2/7形式で入力した値をA列に打ち込みその値を元に、B列には7th Feb. 2022、C列には2022年2月7日と、Text関数やDay関数で変換して表示しています 続けて同じ年が続く場合は省略するようにしています(2022年2月7日ときたら、次の行は2月8日. )
それらの値をマクロボタンでvalueのみD列にコピーしたいのですが、B列形式はそのままコピーできるものの、C列形式は上手くコピーできず、2022/2/7形式になってしまう状態でどうしたらいいでしょうか
.valueでコピーしたいのにコピーしてくれない感じです >>79
https://i.imgur.com/DZSbCX2.jpg
画像の方がわかりやすいと思うのでこちらでお願いします
この画像でいうF列をH列にコピーすると認識してくれないのか求める表記になってくれません
.formula形式でコピーすればなんとかなるんですが なにか良い方法ないでしょうか >>65 です。ご回答いただいた方ありがとうございます。
>>68 さんのマクロ？をとりあえずコピペして実行してみました。
ん～ちょっとこれは違う感じです。
これだと、このマクロを実行させた後、改めてCtrl+Fで「検索と置換」ウインドウを出して文字列「ab」で検索する必要があります。
実現させたいのは、
入力した文字列部分のみ強調表示もしてくれる「検索と置換」ウインドウ
的なやつです。強調表示を同時にやってほしいです。 index関数にmatch関数を取り込むことについて教えてください
index関数の行にのみだけmatch関数を入れるか
index関数の列にのみだけmatch関数を入れるのか
index関数の行と列両方にmatch関数を入れるか >>84
状況による
詳しくはindex matchで検索 >>76-78
ありがとうございます！
原理は理解できないけれどどの面積値でも長辺と短辺を割り出せるようになりました！ >>76
スゲー！なにその関数見たことない！式カッケー >>87
いやいやいや、原理分かっていないのに納得しちゃアカンやろ >>83
C1セルに強調表示したい語句を入れる
空白だと強調をなくす
Private Sub Worksheet_Change(ByVal Target As Range)
Set trigger = Cells(1, 3) 'C1セル変更で発火
If Intersect(Target, trigger) Is Nothing Then 'トリガーを変更した時に開始
Exit Sub
End If
If trigger.Value = "" Then 'トリガーが空ならB列を黒文字とサイズ11
With Columns("B:B").Font
.ColorIndex = xlAutomatic
.Size = 11
End With
Exit Sub
End If
検索語句 = trigger.Value
検索語句_文字列長 = Len(検索語句)
最終行 = Cells(Rows.Count, 2).End(xlUp).Row
For i = 1 To 最終行
検索結果 = InStr(Cells(i, 2).Value, 検索語句)
Do While 検索結果 > 0
Cells(i, 2).Characters(Start:=検索結果, Length:=検索語句_文字列長).Font.Size = 20
Cells(i, 2).Characters(Start:=検索結果, Length:=検索語句_文字列長).Font.Color = 255
検索結果 = InStr(検索結果 + 1, Cells(i, 2).Value, 検索語句)
Loop
Next
End Sub >>84
vlookupのように縦長データなら行だけ
横長データなら列にmatch。多分めったに使わない
項目も検索したいなら列検索と行検索を組み合わせるけど、あんまり使わない >>79>>81
日付の書式設定は変な挙動をするので、セルごとコピーして値を上書きするのが手っ取り早い
下記のどちらか
Cells(2, 6).Copy
Cells(2, 8).PasteSpecial
Cells(2, 8).Value = Cells(2, 6).Value
Cells(2, 8).NumberFormatLocal = Cells(2, 6).NumberFormatLocal
Cells(2, 8).Value = Cells(2, 6).Value Dim abc As Variant, maxVal Variant
abc = Range("A1:A100)
・
・
・
maxVal = WorksheetFunction.Max(abc(50 To 80, 1))
これはabc(50 To 80, 1)の部分でコンパイルエラーになりますが、
このように一発で配列内の特定の範囲の値を取得することはできますか？
やはりFor～Nextで回してやらないと駄目でしょうか？ >>77
INTは最後にしないと誤差が大きくなるぞ
=INT(16*SQRT(3**6/(16*9))) >>92
ありがとうございます
そういう仕様なんですね… >>95
質問者が16:9.00129926375でいいならそれでいいよ
でも2309x1299=2999391より3Mに近いのは
16:8.97189796801でいいなら2313x1297=2999961
16:9.04166666667でいいなら2304x1302=2999808
その点で77は誤差なく16:9だ ぴったりにはできないから誤差をどこまで認めるか、比率を重視するかピクセル数を重視するか
質問者はどっちとも書いてないので部外者の勝手な議論は無駄でしかない >>70
いやそういうことじゃなく
>>71
すげえ
こんな方法があったとは MS公式声明でマクロ(VBA)初期無効化は使用を非推奨なのか？ 例えば、毎日、体重や血圧といったデータを記録するとして、
列に「日付」「体重」「血圧」「体温」といった項目を設定、そして記録する度に行が増えるじゃん？
記録する対象の人が何人かいれば、シートに「A氏」「B氏」「C氏」という感じにするのかなと思ったんだけど、
数千人といった膨大な数になる場合はどうやって作れば良い？
項目に「氏名」を追加して、処理するときにフィルタするの？ >>105
横に増えるより、縦(日付をベースに下へ)に増える方が
処理が速いんでね？
元帳はマトリクス(クロス)集計よりリスト集計にしたいところ。
「日付」「名前」「測定項目」「測定値」
か
「日付」「名前」「体重」「血圧」「体温」
か。
あとは
・クエリーでクロス集計してグラフ化
または
・ピボットテーブルで集計してグラフ化 なんで日付を横に伸ばしていくような表を作りたがるんだろう つーか105は日付を横に伸びるようなこと言ってなくね 正規化って何？
チョット検索してみたけどとてもじゃないけど上のしつもんと関係ないっぽいが？ >>114
アホで無知なのになんで関係ないとか言うんだよ
＞項目に「氏名」を追加
これが正規化 数千人のデータを毎日記録ってことは、1日数千行ずつデータが増えるってこと
仮に5000人とすると、1年で180万件のデータになる
これはExcelでは扱いきれないのでデータベースソフトを使うべき 質問に答えるより自分の知ってること書くのが目的なんだよね？ >>117
違う
>106は回答。
回答がわからんかったら再度質問し直せばいいだけの話 >>LAMBDA関数
あーなるほどね
VBA非推奨とする代わりに随時新しい関数を追加する方針なんだな >>118
＞>>117
＞違う
＞>106は回答。
＞回答がわからんかったら再度質問し直せばいいだけの話
回答の意味をわかってないようだ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2019
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 可
https://xtech.nikkei.com/it/pc/article/NPC/20060217/229644/03.gif
こちらの画像のように、
A6-9を縦方向にセルを結合させた状態で、B9内ポケットの下にセル行を新たに追加したいとき、
A6-9の結合状態がA6-10まで自動で延長され、B10に新規セル行が追加されるといったことをしたのですが、
どうすれば良いでしょうか？
挿入>行全体 というメニューがありますが、
これをやったときに下方向ではなく上方向に行がシフトしてくれると助かるのですが・・・ >>116
今回月初の月次作業で行数90万超え
もう元帳だけはACCESSにしなきゃ・・・
とシコシコ作業中の俺が通りますよっ、と。 ACCESSはいまだに2GB制限てカスみたいなもんがあるね。これはひどい
ただ、この次だとSQLサーバーなどになってしんどい lambda一般公開って聞いて試してみたけど、やっぱりダメぽ。
バージョン 2201 ビルド 16.0.14827.20186
Insiderではなくて使えるようになった人いる? >>123
予めA6-A10まで結合した状態にしたらダメなの？ >>135
バージョンの数字的には、俺のローカルの方が新しいんだよなぁ。
もうちょっと様子みるか。 ttps://docs.microsoft.com/ja-jp/officeupdates/update-history-microsoft365-apps-by-date
を見ると、
16.0.14729.20260
は1/12リリースだな。これに対して今日解禁とか、どういう意味なんだろう。
解禁情報の原文ソース読んでも、意味が分からん。 >>106
0～1の値にする正規化、ではなく、こんな感じの事？
https://ssaits.jp/promapedia/technology/normalization.html
>>107
「測定項目」「測定値」にした場合のメリット・デメリットってどんな感じでしょうか？
後者の様に、項目がそれぞれ有った方が良いと思っちゃうのですが。
元帳（？）のデザイン、結構大変なイメージがある…。 >>141
> 「測定項目」「測定値」にした場合のメリット・デメリット
デメリット：
・入力するとき、いちいち測定項目も入れなきゃならなくなるので面倒
→人ごとに「日付」「体重」「血圧」「体温」が列として並んだ
入力用のテーブルを別に作って、クエリーで読んで
ピボット列解除した上で、リスト型元帳に追加することで回避するとか。
メリット：
・日付が増えても検査項目が増減しても、元帳のレイアウトを変更する必要がない。
・ピボットテーブルでの設定が楽で、計算が速い。
・INDEX(MATCH)かSUMIFSで集計して人ごと・測定項目ごとに時系列表とグラフにするにしても、
計算が速い。
もっとも、計算の速さは10人×4項目程度だと
1年間毎日入力して、ようやく感じるくらいかも知れないけど。 すまんが整理してから書いてくれや
デメリットの中身矛盾してはるが気づいてる？？ 多分気づいてないから直接指摘してあげたほうがいいぞ 単位の異なる項目を同じフィールドに格納するなんて
エクセラーのやりそうな事だ エクセラーってフレーズ、今ちょくちょく聞くが流行りなのか？ どうでもいいだろ。知ったところで何かするのかお前？ 人の揚げ足ばかり取って生産性無いなおまいらは
職場でもそうなんか？ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2019
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
Excel VBAでOutlook（こちらも2019）のメールを作成→送信すること自体はできています
ただ、本文にリンクを貼るコードが上手くできません
Webリンクと社内ネットワークのフォルダやファイルリンクいずれも本文に入れることがあります
どのようにコードを組めば良いでしょうか 恐縮ながら公開されているサイトの転用なんだけど
https://fastclassinfo.com/entry/vba_outlook_sendmail/
このサイトの
'プログラム6｜メール本文をHTML形式にして、フォント変更やリンクをセット
Dim mailbody As String, credit As String, link As String, strstyle As String, url As String
mailbody = ws.Range("B6").Value
credit = ws.Range("B7").Value
link = ws.Range("B8").Value
url = "<a href=""" & link & """>" & link & "</a>"
strstyle = "<font=""ＭＳ Ｐ明朝"" color=""#FFFFFF"">" & mailbody & "</font>" & url
mymail.HTMLBody = strstyle & "<br>" & "<br>" & credit & "<br>"
ここのmailbody～urlの「ws.Range("B6").Value」とかの値を参照ではなく直接入力にしても上手くいかないのよね >>158
うまくいかないとは、普通の文字列になるってこと？ >>161
urlの項目がメールに反映されないんよ
mailbodyとcreditの項目はひょうじされるんだけど >>162
多分だけど、リンクに「<」か、「>」の文字が入ってる気がする
リンクを「aaa」などにして試してみて >>164は韓国人かベトナム人辺のようです
質問者の方は、あまり気にしないでください 生まれて来なかった方がよかっただろ
まだ間に合うぞ エクセルで体温計れる?
体温計で計ってエクセルに書き込むのが面倒になってきた >>171
> 測定データは、健康管理アプリ「OMRON connect」で簡単に記録し、毎日の体温をグラフで確認することができます。
> 測定データは、CSVファイルに出力してメールで送付することもできるので、職場等への体温報告にご利用いただけます。
https://www.healthcare.omron.co.jp/product/mc/mc-6800b.html オムロンの体組成計持ってるけどそれもアプリに送信してスマホから見れて便利よ まぁそのうちスマホを脇に挟んだりおでこに当てたりして体温図るアプリが出て来るだろ
アプリ「計測した体温はエクセルやスプレッドシートで管理できます」 >>177
このスレは君のために立ててはいないんだよ >>181
料理・・・ホットクックでも、食材を入れる手間がある
掃除・・・ルンバがあるが、そもそもvba不要で完全自動
難しいね
>>182
嫌なら見なければいいのでは？
なんで自分から苦しんでるの？ 流行りのパワポVBAは難しいのかな？？
Wordはいろいろ難しいと聞いた >>184
一回触ったけど簡単だよ
ただ、vbaとはそもそも相性がかなり悪い。コード書いてる間に手作業で終わることの方が多いだろう 例えばA2～A30に入っている値に1を加えた値の積
出したい
(数学でいうと総乗Π[k=2→30](1+A[k])をやりたい)
のですが、
その場合はB2～B30に(A2～A30)+1を入れて、PRODUCT(B2:B30)するしかないですか？
具体的に何をやりたいかというと、元の値からの増加割合(1%とか2%とか)の数値がA2～A30に入っていて、
元の値A1に対して増加分を全て加えた合計値を出したいのですが、
そのためには1%を101%として掛け算しないといけないので、1を加えた値を掛け合わせたいのです =PRODUCT(A2:A30+1)
元の値からの増加割合なら元の値の(1+SUM(A2:A30))倍じゃねーの 仮にちょうど良い内蔵関数(今回の場合はPRODUCT)が無かった場合も、出来るようになったのだ。
=REDUCE(1,A2:A30,LAMBDA(a,b,a*(b+1))) マクロ書くより手作業や関数使った方がはるかに速いことがたくさんあると思ったが。。。
何故か職場にはなんでもマクロ馬鹿が最低ひとりはいるのはなぜ？ >>193
マクロが早い→手作業やりたく無くなる
そうなると全部マクロにしちゃう
そこからもう一歩成長すれば、マクロも数式もうまく使いこなす事ができるようになる 自分の名前を入れるだけなのにマクロはねーわと思ったから
わざわざエディター開いてRange(A4)＝○○
思い出し笑いが止まらん それ今後のための自動化だろう
笑ってるだけの君とコードを書いてる社員
どちらが上かは明らかだねぇ 上とか下とかいきなり何言ってんの
狭い世界で生きてるんだね 前にも書かれてあったが、MSそう遠くない将来VBAは終わらせるつもりなんだろうな >>181
出来そうな気がするが、どうやって家電を制御するか。 APIなり外部DLLなり呼び出せばUSBでもLANでもデータは送れるから、そういうのに対応してる家電なら制御できるけどな
それVBAじゃなくても可能だし >>196
上だの下だの言って何が自動化だよ
偉そうに語るな >>200
スイッチボットってのがある。wifi経由でアナログスイッチをオンにできる
信号を送ればほぼ全ての家電を動かせる。
それ自体はvbaで出来るが・・・
vbaにする理由が何一つないんだよな できるかどうか試してから書けよ
わからないだけなら黙ってろ
底辺社員か？ >>191-192
ありがとうございます！できました！
加算じゃなくて乗算での増加割合なので、2%が2つは2+2=4%ではなくて、1.02x1.02=1.0404の4.04%になるので、
ご指摘の計算式が必要でした マクロ書かせるより安い派遣にやらせて方がコスパいいわ >>209
不正解
長期か短期かによる
永遠に続く仕事ならマクロの方が良い
短期なら派遣にやらせたほうが良い 気づけよ。こいつ関わっちゃダメ。
長期＝永遠とか言ってる時点で。 典型的な批評家だね。
自分はスキルないから何も出来なことに気付いてない。 マジで底辺馬鹿はExcelをやらないでほしい。
理系出身のエリート向けのアプリだし は？馬鹿だからエクセル使うんだろ？w
逆だアホ
理系こそエクセルでチマチマなんかやらんわ すみません、スレみて質問していいのかと思いましたが、相談に乗ってください。
予定の10日前になったらセルの色変え、
(予定日前まで色変えで)予定日、予定日以降は色無しとしたいのですが
どうすればいいでしょうか？
よろしくお願いします Excelバリバリできる派遣なんかなかなかいないだろ >>226
わざわざ画像までありがとうございます。
勉強になりました。 で、その数式の意味は理解できた？
そこなんだよ大切なのは 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2019
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
データを貼り付けたあとセル範囲を選択することができません
①の固定範囲指定はOK
②もOK
③だとどこも選択してくれない
最終的には40も79も可変させたいのでlastrowやlastcolumnを入れたいのだが
それ以前にCells指定が上手くいかない
① ThisWorkbook.Worksheets(1).Range("B10:CA40").Select.Copy
② Dim lastrow As Long
lastrow = ThisWorkbook.Worksheets(1).Cells(Rows.Count, 2).End(xlUp).Row
ThisWorkbook.Worksheets(1).Range("B10: CA" & lastrow).Select.Copy
③ ThisWorkbook.Worksheets(1).Range(Cells(10, 2), Cells(40, 79)).Select.Copy >>232
.select.copy
↓
.copy 一度クリアにしないと再選択されないよ！
人間がやってもそうだろ！ >>232
コードはcopyだけど、貼り付けしたいのか、範囲選択したいのかよく分からん
コピー・ペーストに範囲選択は必要ないけど、
あえて確認のために範囲選択したいってこと？ ThisWorkbook.Worksheets(1).Range("B10:CA40").Select.Copy
この部分でエラー出る
vbaでこの書き方って正しくないはず。selectの返り値はboolean
二行にすればok
ThisWorkbook.Worksheets(1).Range("B10:CA40").Select
selection.Copy >>237
コピーまではマクロで
貼り付けは別のファイルに手動（範囲確認したい） >239
一応Activateも試してみたけど、やはりこれもbooleanしか返ってこないな
>>238さんのように二行に分けるしかない >>238
①②は範囲選択だけでコピーできてなかったのができるようになりました
ただ
③ ThisWorkbook.Worksheets(1).Range(Cells(10, 2), Cells(40, 79)).Select
Selection.Copy
は1行目の段階で選択してくれません >>242
アクティブになっていないシートのセルを選択はできないので、
まずはアクティブにする
また、標準モジュールに記述する
Sub foo()
ThisWorkbook.Worksheets(1).Activate
ThisWorkbook.Worksheets(1).Range(Cells(10, 2), Cells(40, 79)).Select
Selection.Copy
End Sub >>243
①ではコード追加してアクティブにしなくても選択できるんですよ
③とはなにが違うのか
① ThisWorkbook.Worksheets(1).Range("B10:CA40").Select
Selection.Copy
③ ThisWorkbook.Worksheets(1).Range(Cells(10, 2), Cells(40, 79)).Select
Selection.Copy VBAで動作させる場合（視認性は別として）
IFネストで
条件1-条件2=処理1
条件1-条件3=処理2
とするのと
IF 条件1&条件2=処理1
IF 条件1&条件3=処理2
とするの
どちらが軽量で処理が早いですか？ しつこいw
やりたいことできるようなったんだから後はいいだろ
何で回答者にイチャモンつけんの？
>>245
＞>>243
＞①ではコード追加してアクティブにしなくても選択できるんですよ
＞③とはなにが違うのか
＞
＞① ThisWorkbook.Worksheets(1).Range("B10:CA40").Select
＞ Selection.Copy
＞
＞③ ThisWorkbook.Worksheets(1).Range(Cells(10, 2), Cells(40, 79)).Select
＞ Selection.Copy >>245
こう
ThisWorkbook.Worksheets(1).Range(ThisWorkbook.Worksheets(1).Cells(10, 2), ThisWorkbook.Worksheets(1).Cells(40, 79)).Select
普通に読みにくいので、こう
set ws = ThisWorkbook.Worksheets(1)
ws.Range(ws..Cells(10, 2), ws..Cells(40, 79)).Select 【1 OSの種類 .】 Windows 10
【2 Excelのバージョン 】 Excel 2019
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
マウスのカーソルの色はWindowsの設定で変更(白黒反転)していますが、
Excelの画面上での位置を示す「太い＋」は白いままです。
これを黒色などに変えられないでしょうか。
また選択したセルを示すセル周囲の黒い枠線が
Excel2007より細いですが太くできますか。 >>246
vbaはどっちも一緒
ってかifの分岐で速さ求めてもた仕方ないだろう
みやすさを心がけたほうが良い
>>248
全部100%分かるまで聞けばいいじゃん
答えたくなければ答えなくていいし
俺は自分のために回答するけど 横の78列はまず変わることがないし
縦の行数も28～31の日数変化だけで
空白行をコピーしても特に問題ないから
①の("B10:CA40")固定で実務上問題ないんだけど
ここまで苦労しても解決できないとはな
③はあきらめて②のRange("B10: CA" & lastrow) で妥協するか >>249
ピリオド残ってたわ
こう
Set ws = ThisWorkbook.Worksheets(1)
ws.Range(ws.Cells(10, 2), ws.Cells(40, 79)).Select 解決しました
ベストアンサー
>>238
>>249
Dim lastrow As Long
Dim lastColumn As Long
lastrow = ThisWorkbook.Worksheets(1).Cells(Rows.Count, 2).End(xlUp).Row
lastColumn = ThisWorkbook.Worksheets(1).Cells(10, Columns.Count).End(xlToLeft).Column
ThisWorkbook.Worksheets(1).Range(ThisWorkbook.Worksheets(1).Cells(10, 2), ThisWorkbook.Worksheets(1).Cells(lastrow, lastColumn)).Select
Selection.Copy
MsgBox "連結して全範囲をコピーました。目的のシートに貼り付けてください" ワークシートオブジェクトも1回しか使わん行番号も変数に入れんでええやろ
いちいち代入しないだけでこんだけ短くなるんやで
Sub Macro1()
With ThisWorkbook.Worksheets(1)
.Range(.Cells(10, 2), .Cells(.Cells(Rows.Count, 2).End(xlUp).Row, .Cells(10, Columns.Count).End(xlToLeft).Column)).Select
Selection.Copy
MsgBox "連結して全範囲をコピーました。目的のシートに貼り付けてください"
End With
End Sub 感謝しない質問者はどうして生きているの？
ベストアンサーって、、、、 承認欲求満たしたくてここに集ってる奴らに餌を与えてる質問者の方にこそむしろ感謝すべき 本当だわな
わざと難しい方のやり方で回答してどや顔さている質問者 「は」を使うべき部分に「わ」って使う人間て頭悪いよね絶対 どの分野にもある初心者のための質問スレは質問者を小馬鹿にするために存在する
また質問者の多くは実際はベテランマニアで回答者を小馬鹿にするために質問している スレチだが念のため。
「～～だわな」の語尾の「わ」は終助詞で
女性口調の「～～だわ」と同じ、「わ」の表記で良い。
「本当だはな」とは表記しない。
「こんにちは」の語尾の「は」は係助詞とか副助詞で、
日本語誤変換からら起因すると思われる「こんにちわ」が
誤記であることはご案内のとおり。
「今日は良いお天気ですね」とか「今日はご機嫌いかがですか」が縮まった？
「私が○○です」の「が」と同様に、主語を指し示したりする。
「が」の方がその主語を特定し、他を排除する意味が強い等の違いがある。
誰が頭悪いかは、知らん。
なお、「偏見や決めつけが酷いのは『知性の欠如』」
という説は同意する。 その書き込み必要？もう一度考えよう (自由律俳句) 金子
メンタ
ドカタ
タナカ
どれが一番役に立つ？ >>273
自分が見やすいと思ったものでいいんじゃない >>218
極座標変換とグラフ化はエクセルの独壇場なんだが >>276
それってどういう風に使うの？
普通に知らないから気になる 232は自分が書きましたが実は別スレからの転載です
回答が得られて良かったですがコスパは悪いと感じましたね >>279
vbaスレだろ
実は、アホが勝手に移動しろって言っただけだから向こうで聞き続けて良かった >>278
直接測定出来ない回路素子の周波数特性を調べるのに、既知の回路素子と組み合わせて得られたベクトル合成特性から引き算する測定手法で使う >>284
うん？
なんか向こうのスレでもそんな書き込みあった気がするぞw
「Excel板なんて馬鹿だもん」みたいな
別物なんだなw お前らはそんなにvba板の住人と関係を悪化させようとしてるのか？
何が面白いんだ？ 派遣にVBA教えたらそいつ職場で神扱いになってんのw
たった一ヶ月で神になれる日本まじ雑魚すぎ
そりゃ衰退するわ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2019
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 否
5ｃｈのスレッドキーからレス数を取り出す関数
開始日 スレタイ レス数 終了日 こうしたい
1617118210.dat<>〇〇〇〇〇〇〇〇〇〇〇〇 <> 9 <> 1606201102<> → 9
1617118210.dat<>〇〇〇〇〇〇〇〇〇〇〇〇 <> 89 <> 1606201102<> → 89
1617118210.dat<>〇〇〇〇〇〇〇〇〇〇〇〇 <> 789 <> 1606201102<> → 789
1617118210.dat<>〇〇〇〇〇〇〇〇〇〇〇〇 <> 1002 <> 1606201102<> → 1002
※レスアンカーがおかしいといわれて書き込めないのでスペース入れてますが<>と数字は連続しています
=LOOKUP(2000,RIGHT(LEFT(RIGHT(A2,18),4),COLUMN(A2:D2))*1)
この関数だと一桁の場合エラーになります
〇 <> 9 <> 1606201102<> （右18文字）
↓
〇 <> 9 （左4文字）
↓
〇 <> 9 → 数値にならない （右4文字）
=LOOKUP(2000,RIGHT(LEFT(RIGHT(A2,18),4),COLUMN(A2:C2))*1)
この関数だと1002の場合「2」になってしまします
1002 <> 1606201102 <> （右18文字）
↓
1002 （左4文字）
↓
002 → 2 （右3文字） >>290
https://i.imgur.com/izufhcu.png
c2==FIND("<",$A2,SUM(B2)+4)
f2=+MID($A2,SUM(B2,4),C2-B2-4) あ～ごめん
＞<>と数字は連続しています
見落としてた >>290
こう
https://i.imgur.com/avmil2z.png
c2=FIND("<",$A2,SUM(B2)+3)
f2=+MID($A2,SUM(B2,2),C2-B2-2) >>293
ありがとうございました。
やっぱ作業列がいるようですね >>294
無くても行けるけど、しんどすぎるからやめたほうがいい
ある程度見通しよく、変更しやすいようにしておくと、間違っててもすぐに修正できる
まさに>>291>>293みたいな感じで なら具体的に書いてくれる？
理想論テキトーに言って自己満足してないのなら つかなんでこんな事やってんの？
仕事ではないよなそんな5ちゃんのデータ分析とか 多分仕事。ステマや悪口の調査。
俺も15年ぐらい前に同じ事やってた 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 365 バージョン2201
ROUNDUP関数で得た値をXLOOKUPで探索するとエラーがでることがあるのですが、原因が分からないのでご教授お願いします
1行目ではエラーが出ないのですが2行目でエラーが出ます
B列は数字を手入力し、E列はそれを使った場合でエラーは出ません
https://i.imgur.com/EQY6w6c.png
https://i.imgur.com/UfkdDfs.png
https://i.imgur.com/6TbIBfM.png
https://i.imgur.com/VuW2iQs.png >>301
その1.8と3.8は手で入力してる？それとも計算結果？ >>301
なにこれわからん
挙動的にはほぼ間違いなく小数誤差
https://i.imgur.com/HnLbPT3.png
・D2の数式内「A2」を「3.8」に置き換えると正しくなる
・A2=A7はTRUE
・A5A6A8を消しても結果は変わらない
これ解決できたら凄いかも >>301
浮動点小数かな
そもそもA1=A6がTRUEになるかだ >>310
問題はA2とA7だぞ
ちなみにTRUEになるから、マジで理由が分からん >>311
そうなのか
じゃあ関数内で浮動点小数の誤差が出てるのかな？
一番は小数を使わなければいいんだが ROUNDUPの方が2^-51だけ大きいみたい
=ROUNDUP(3.75,1)-2^-51 なんでTRUEなんだ・・・
もしかして新しいパンドラの箱を開けてしまったのか
・比較はtrue扱い
・xlookupではfalse扱い
・・・ =ROUNDUP(3.75,1)=3.8 →TRUE
=ROUNDUP(3.75,1)-3.8=0 →FALSE つまり
=1+1e-15=1 →TRUE
=1+1e-14=1 →FALSE
=(1+1e-15)-1=0 →FALSE
=(1+1e-14)-1=0 →FALSE なるほど
小数点15桁以降で差がある場合は、単純な比較では同じとみなされる
差を0と比較すると、それは違うとみなされる
そっか～ >>313
これ確認したんですが、2^-51≒4.4E-16なので >>306 で違いが見えないのも変ですよね 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2019
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 否
1行毎に以下の項目が列に分かれてたくさん存在します
・クラス：「勇者」「戦士」「武闘家」「魔法使い」「僧侶」「賢者」「踊り子」「商人」「遊び人」の9種
・レベル：1～48の数字
・戦闘力
クラスが同じでもレベルが違ったら別枠で扱う
（例えば「勇者レベル1」と「勇者レベル2」は別項目として扱う）
クラスとレベルの値が同じ行が複数あります
この条件でクラスとレベルが同じ行の戦闘力を集計したいのですが
どういうやり方が一番効率が良いでしょうか
（クラスとレベルが同じ組み合わせの戦闘力を個別に抽出した上で合計を出したい） >>321
試してみたのですが
ピボットだと存在しない組み合わせ（例えば全てのクラスのレベル2が存在しない場合）が
結果としてレベル2の項目そのものが表示されないので採用できませんでした
後出しで恐縮ですが
最終的に全組み合わせを一覧にしてそれぞれの項目の戦闘力の合計を集計したいのです
ピボットの設定でできたりするのでしょうか
例えば以下のような感じ
（こうなってしまう）
勇者 戦士 武闘家
レベル1 574 476 526
レベル3 779 784 757
（こうしたい）
勇者 戦士 武闘家
レベル1 574 476 526
レベル2
レベル3 779 784 757
・
・
・
レベル48 >>322
設定では無理
手っ取り早いのは
クラス 空白
レベル 1～48のレン版
戦闘力 0
のダミーデータを追加すること >>325
超絶重くなりました
>>326
よく分からんので解説お願いいます >>328
初心者なら仕方ない
君にもそういう時期があったはずだ 質問です。
ファイル内のすべてのプルダウンリストの 「▼」←これが表示されなくなってしまいました。
https://answers.microsoft.com/ja-jp/msoffice/forum/all/excel2016%E3%81%AE%E5%85%A5%E5%8A%9B%E8%A6%8F/9eb9ae76-2c6d-4464-a398-7a8b8ebfad08
このサイトと同じ症状です。
ただカメラ機能は使っていないので、原因は別にあると思うのですがどうすれば治りますか
数式に名前をつけて関数で画像を表示、非表示 をファイル内でしているのですがこれが原因でしょうか >>331
エクセルは描画周りに妙な挙動がある
恐らくブックがおかしくなっている
・一度、新規ブックで試してみる
・問題なければ、そこにプルダウンと関数の画像部分をコピーして確認
・それで問題なければ、全部コピー 愿意？你的愿意说是什么！ 下記のようにA列には通し番号、B列には得点が入力されています
また、C1セルには合格点が入力されています
A B
1 88
2 83
3 79
4 40
5 99
C1=80
得点が初めて合格点に達しなかった時の通し番号を関数で出したいのですが良いやり方はありますか？
上記例の場合は3回目で初めて80点を下回ったので3と出力してほしいです
可能であれば作業列なしでお願いします
バージョンはexcel2013です >>335
A列使ってないけど
=MATCH(TRUE,B1:B5<C1,0)
A列使うなら
=INDEX(A1:A5,MATCH(TRUE,B1:B5<C1,0),0)
https://i.imgur.com/bfsH8Tl.png
sumproduct使わずにできちゃった >>336
早速の回答ありがとうございます
match関数にこんな用法あったんですね
ただexcel2013には対応していないっぽいので他の方法でお願いします... 配列数式かもしれない
=MIN(IF(B1:B5<C1,A1:A5)) >>332
コピーせずにもとに戻すのはできないですか?
それで戻せないならいつか繰り返すだろうし…って思ってしまって >>329
画像でたいへんよく理解できました
目から鱗です >>330
は？最初からバリバリできましたけど？
Excelごときで分からないとかプログラミングの世界ではやっていけねーし >>343
＞最初からバリバリできた
どうしておまいらはそうやって自分を大きく見せようとするんだ？？
小学生かつーのw Excel内のスクショ録るときにピクチャ形式にするとなんでビットマップ形式より画質良くなるの？ >>345
＞ビットマップ形式より画質良くなる
ありえない
単にサイズでかいものが縮小表示されてるだけでは >>343
誰もがプログラミングの世界にいたわけではない。 >>345
Excelのピクチャ形式は、一般的にはベクトル形式と呼ばれるデータになっていて、線の向きや太さを1本ずつ記録してるから拡大縮小しても文字や図形が崩れない
ビットマップ方式はドットの並びを記録してるから、大きさを変えた時にギザギザがそのままになって汚く見えてしまう 345は低脳のふりした釣り質問だな。
コピペだし。 自分を常に大きく見せようとしているから食いついて来たんだろ？ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel office365
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
エクセルで1月から12月まで、各月の複数のシートを作成して作業をしているのですが、12月のシートに入力したことがそのほかの月のシートに反映されてしまい困っています。
たとえば、12月の20行に入力したことが、1月から11月まですべてのシートの同じ行に反映されてしまうのです。
反映されるのは、12月のシートに入力した時だけで、11月のシートに入力したときは異常は現れません。
どういった原因が考えられるでしょうか？
解決方法を教えていただけると助かります。
よろしくお願いします。 >>360
1-12全てののシート見出しを選択している 多分シート見出しが1-11が見えていて、12が半分しか見えていない状態
シフトか何か押しながらクリックしてるんじゃないかと思う >>360
もしかして、
串刺し計算かなにかやった後、
それぞれのシートの選択範囲が
そのままになってるとか？ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2019
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
指定した範囲内に、指定した文字列が存在したら1、しなかったら0、というような判定をしたい場合、どういう関数を使うのでしょうか。
A1:A3に、aが1個または2個、または3個あれば1とカウントし、aが存在しなければ0としたいです。
宜しくお願いします。 >>364
=IF(OR(A1="a",B1="a",C1="a",),1,0) >>361 362 363
おっしゃる通り、すべてのシートの見出しを選択していました。
問題解決しました。
ありがとうございます。 >>364
=IF(COUNTIF(A1:A3,"a")>0,1,0)
または
=IF(COUNTIF(A1:A3,"a"),1,0) >>365
優勝
>>367
ありがとう、あなたにも優勝あげたい 数式的には367の一番目がなにをしてるか分かりやすいけどな >>365
こーゆーのでいいんだよねこーゆーので
超分かりやすい Excel2021で追加されたスピル関数について質問
例えばUNIQUE関数で
A1 UNIQUE(C1:C100)
B1 SUMIF($C$1:$C$100,A1,$D$1:$D$100)
このようにA列でC列にある重複データを1つにまとめ
B列でD列の数値を合計したいとします
この場合UNIQUE関数はA1に記入するだけかと思いますが
SUMIF関数はB1に記入するだけでUNIQUE関数と連動して下に伸びますでしょうか
それとも手作業で下に必要なだけコピペしなければならないでしょうか
試してみれば分かると思うのですが現在Office2016を利用中で
Office2021を購入するか検討中なので教えていただけませんでしょうか >>373
スピルの関数を参照しても参照先は連動しないんですね
それだと結局手作業が必要になり自動化できそうもないので2021は見送ることにします
検証ありがとうございました >>372
B1に記入するだけで(#を「スピル範囲演算子」)
B1 =SUMIF($C$1:$C$100,A1#,$D$1:$D$100) >>376
スピル関数参照先セル末尾に#付けるとスピルと連動して伸びるのでしょうか
そうだとしたら新たな質問があるのですが、
1.スピルを参照してるセルを参照したセルでもスピル範囲演算子#を使えますでしょうか
2.スピルを参照したセルの下にSUM等を記入するとどうなるでしょうか
例えば
A1 =UNIQUE(D1:D100)
B1 =SUMIF($D$1:$D$100,A1#,$E$1:$E$100)
C1 =B1#/2とか
B2 =SUM(B1#)
C2 =SUM(C1#)
このようにすると
C1はB1と連動して下に伸びるでしょうか
B2とC2はB1とC1が下に伸びただだけ下に下がりB列とC列合計できるでしょうか Web版Excelの存在を知って>>377は自決した
https://i.imgur.com/dE6qwLz.jpg
1.スピルを参照してるセルでもスピル範囲演算子#使えた
2.スピルする範囲のセルが入力されてるとエラーになるので予想される行間を空けとかなければならなかった
ここで質問だが4行目A1～C1になぜか0と表示されてる
これはデスクトップ版でも表示されてるだろうか
Web版のバグだろうか ↑間違えた
誤)ここで質問だが4行目A1～C1になぜか0と表示されてる
正)ここで質問だが4行目A4～C4になぜか0と表示されてる 「都道府県列」「X値列」「Y値列」のテーブルがあって、
相関関係を見るために散布図を作る場合、
プロットだけだと、データ範囲はX値列、Y値列だけを選択するけど、
近似曲線引いた後、特異点を説明するために
特定の都道府県名をデータラベルとして表示さたるには、
どうやったらスムーズに出来るのだろう？
相関が強いほど、プロット数が多いほど、密集しがちで、
プロット1つだけの選択では、ラベル オプションの「セルの値」の設定自体が出て来ない。
一度、全部のデータラベルを追加して、ワチャーっと表示させた後、
ラベル オプションの「セルの値」で都道府県列を指定して、
後はワチャーの中から要らないラベルを1つずつ消すしかないのかしら？
これだと重なっていて、うっかり「全国」とかの必要なラベルまで消してしまう。
後からXY値で該当プロットをテーブルから探して、もう一度個別にラベル表示させるのも大変。 >>378
空白を拾ってるから
filter関数で消せる >>382
その後、気付いたのだが最初にD1～E8までのデータを入力してから
A1にUNIQUE関数を入力すると4行目の0は表示されない
しかしA1にUNIQUE関数を入力してからD1～E8までのデータを一部消すと0が表示されるようになるのはなぜか？
FILTER関数を使ってどうするのか教えてほしい エクセルでゼビウスやりたい
あぷ出来ませんか？
マメとか使わずにＤＬして直ぐに遊びたいんですが・・ そんなことばかり言ってると、
前からはエクセル、後ろからはおおなめくじが襲ってきて、ヒャーってなる夢を見るぞ。 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2019
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
Excel2019のオプション画面で使われているフォントが奇麗で読みやすいのでフォント名教えてください。
よろしくお願いします。 >>390
A1=UNIQUE(FILTER(C1:C100,C1:C100<>"")) >>391
フォントスレに行ったほうが良いと思う
検索で 5ch フォントスレ
とかで見つかる ごめん、無くなってた
>>391
どの部分のフォント？ システムフォントじゃないの？
どれのこと言ってるかわからんからスクショ貼って
もしかしてコピペ質問？ ワークシートはMeiryo UIにしているけど(テキストの行間がちょうど良い)、
システムフォントにすると、途切れたり2行になったり
サイズ小さくすると読みにくくなったり。
後、数式バーで式修正するとき、狙った場所を一発で選択出来なかったり・・・ だからシステムフォントは何だよって話
わかってる？ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel365
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
掛け算九九表のようなマトリックス表を作りたいです
とにかく速く正確な表の作り方を教えて下さい
http://imgur.com/pNOx75w.jpg ホームからその他、オプションと行った部分です
拾い物で悪いですが
ttps://www.bizclip.ntt-west.co.jp/wp/wp-content/uploads/2019/05/21723_01.jpg
システムフォントの游ゴシックとは違うフォントですよね >>401
恐らくHGPゴシックM
古いWindowsのデフォルトが確かこのフォントだったので、それが残っているのだと思う >>399
一回あの世に行ってから小学2年生に生まれ変わると一番早く正確に出来るようになるよ 地区の頑固爺が2002にこだわっていて、2019や2021を使えと説得しても頑なに拒むがどうしたらいい？
現役時代に2002ばかり使ってきたのでそれじゃなきゃ嫌だほざいている。 >>411
excel ウィルス 旧バージョン
で検索して、旧バージョンがウィルスを広めているニュースを見せてあげる
お前がクラスター源になっている、周りに損害を与えている、と伝えてあげるしかない 使い勝手が変わって戸惑うのはみんな同じ
みんなはみんなのためにバージョンアップしてる
あんあたはその平和を乱している、
と、ここまで言って動じないならウィルスモドキでも送ってあげれば良いかもしれないな アンタは何か困るの？
ほっとけばいいじゃん
そんな奴にセキュリティの話など聞く気力ないだろ よく考えたら何も困らない。爺がムカつくから説得していうこと聞かせて優越感に浸りたいだけだったわ。 いやいや、古いバージョン相手だと新しい関数使えないのめんどいよ 異なるフォルダにあってもファイル名が同一だとダブルクリックで開くことができない問題なんですが
例えば
2021\ちんぽサイズ報告書
2022\ちんぽサイズ報告書
のように毎年のちんぽサイズ経過を一覧表にしているのですが
いちいちExcel本体のアイコンをでデスコティップ上においてAlt＋ダブルクリックで
「新しいExeclを起動しますか」ダイアログにOKと答える手間が面倒です
（これらのファイルは頻繁に開くため）
どうにかして僕のちんぽサイズを大きくして、彼女を満足させたいです
童貞の願いを聞き届けてください >>420
中標麒麟でも入れとけ
きっと喜んでくれるぞ >>411
キーを押す度に屁の音が出るアドインを入れるとか。 excel使ってる人って、タイピング速度はどれぐらい？
試しにやってみたらe-タイピングで250だったわ >>392
383です、ご返事遅くなりまして申し訳ございません
そのようにFILTER関数を使うと>378のようにUNIQUE関数を入力してから参照してるデータを一部消すと
結果の一番下に0が表示されるのが表示されなくなりました
この問題はUNIQUE関数の仕様で製品版でも同じでしょうか >>429
考え方が変
D9:D10は空白、数値にすると0扱いになる
だから0が出てるだけ
この動作は当たり前の事で、むしろ0が無いほうがおかしい
で、回答すると当然0は出る >>430
>>383に書いたように
最初にD1～E8までのデータを入力してからA1にUNIQUE関数を入力すると4行目の0は表示されません
しかしA1にUNIQUE関数を入力してからD1～E8までのデータを一部消すと0が表示されるのです
なのでD9:D10が0扱いされているのではないと思います
もし製品版をお持ちでしたら>>378のスクショのように入力して試していただけませんでしょうか ご指導お願いいたします。
8：00 9：00 10：00・・・・・と24時間で受電デマンドを記録しています。
24時間の中で最大受電をＭＡＸで表示させるのですが、条件があります。
① ガスコージェネが運転していない日は、24時間の受電デマンド（最大）を表示させる。
② ガスコージェネを運転している日は、運転している時間帯で受電デマンド（最大）を表示させる。
計算式がわからず困っています。
お力添えを宜しくお願い致します。 >>431
俺の考え方が合っている。試してみたが0が出ないわけが無い
https://i.imgur.com/Qms9BUL.png
君が入力順を勘違いしたか、入力を間違えたか、web板にバグがある→後に修正される
のいずれかになる >>435
検証ありがとうございました
製品版では入力順に関わらず参照先に空欄があると最後に0が表示されてしまうんですね
Web版で再度>>383を試しましたが
やはり同じ挙動でしたのでWeb版のバグのようです ピボットの合計欄をクリックすると内訳が分かるという機能を偶然発見した >>435
365なら数式のエディタアドイン試してみて 関数入力の時に＝+って入力するヤツはLotus123時代からのユーザーか意識高い系のどちらかだな そんなにシフトキー押して＝打つの面倒なのか？？
キーボード見れば良くね？ オペレーターの様な打込専門の人には必要な知識かもね
日本語入力の学習機能オフにして何回スペース押せば臨みの変換が出てくるか固定するのもそういう人達の定番だったよね まさかとは思うが
『=+』と入力していると思ってる奴はいないよな？ ウチのじいちゃんに聞いたら当時の表計算ソフトは@や+キーで関数打っていたって言っていた。 今の時代はスマホのカメラで撮ったりマイクで収音するだけでAIが文字起こしする時代 >>453
AIのおかげで音声認識や画像認識の精度がめちゃくちゃ上がった Excelとドンパッチを交換してくれと言われても断わるね、俺は。 今のところはGoogleレンズ + GoogleDrive + GoogleドキュメントのスキームがMSをリードしている >>460
スマホで使うならスプレッドシートの方が良いよ
断然使いやすい
MSはUI似関してはあまりに無能すぎる 【1 OSの種類 .】Windows10
【2 Excelのバージョン 】 Excel2013
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
lslRのディレクトリの情報と画像のような資料の所有者・グループ・権限の比較を行いたいです。
できるだけ目視に頼らない方法ご教示いただきたいです。
ls結果をエクセルに貼りつけ先頭行をdやlでソートした結果から階層ごとにvlookup→vlookup結果を資料と比較 をしていますが、
同じ階層でディレクトリ名も同じだと先に検索に引っかかった情報が表示されてしまい、
異なった比較結果をls結果から検索する、という面倒なことをしています
https://i.imgur.com/K6YL32H.jpg lslR・ls結果
この辺の意味がわからんかった
教えてくれたら回答できるかも >>469
表に重複した値出現しない 言い換えるとどの値もユニークになるように複数の表に分ける事
分けた表をテーブルとしてリレーションをする事 vlookupは検索語の値が検索範囲に複数あったら最初に見つかったのを戻り値にする これは仕様
フィルタ使って検索語で絞込めば該当する行全部を表として得られる >>471
頭悪い人は 頭良い人の言葉を理解できんのよ
バカの壁って奴 正規化なんぞググれば方法は分かるやろ
それが分からない無能なら諦めろ
それが限界だと知れ また正規化？
このスレの >>106 あたりからでもやってるだろうに つい先日もVBAスレで、
非正規なデータは紙の帳票として印刷するくらいしか役に立たず、
セル結合の問題も含め、
Excel内でデータを使うのに正規化するのが如何に大切か、
どんだけ大変かの事例があった。
https://mevius.5ch.net/test/read.cgi/tech/1644384272/46
縦横そろえて、全てのマスを埋めよ お前らって教え方下手だよね
ちょっと聞き返せばすぐ無能だのバカだのしか書かないし。
自分でも教えられるほど分かっていないんだろうな >>479
それな
すぐ正規化だのなんだの言ってマウント取るしな。
説明しろと返してもバカの壁どうのこうのとか言って逃げるしなw
職場でもそういう態度なんだろうと予想できる。 まぁエクセル教えたがる連中なんてみんなそんなもんだろ >>466
lsの結果はこのような形ですが1カラム目をdとlから始まる語句でフィルタ後に
8カラム目を基準に1,3,4カラム目を比較したいです
https://i.imgur.com/jMUslLg.jpg
>>470
正規化したあとどうするのでしょうか？(ググって正規化してみましたがうまく行かなかったのですが…)
>>472
フィルタを使ってのあたりがよくわからなかったので詳しく教えていただきたいです これ正規化関係ないだろ。何で正規化させようと思ったのかね。 >>483
あぁ、lsってlinuxのlsか
windowsならTREESIZEってフリーソフトあって、一発でできる
https://i.imgur.com/6st4s5M.png
フリーソフト探して見ては？ まず質問者が自分の目的を説明できてない 回答を理解できる素養がない どういうふうな比較を行いたいかが欠けてるんだよな
過去と現在なのか、バックアップと現行なのか バカだの無能だのって口癖のように言うヤツって余程自分に自信があるんだろうな
どれだけ知識ひけらかしても人に分かりやすく説明できないのならただのマウントに成り下がる 要は仕様どおりに権限設定されているか確認したいってことでしょ ならvlookup使うのはダメだろこの形式で。
DeDupeしたら？ =2文字入力から関数候補でますが一部注意マークがついてる関数があります
どういう意味でしょうか？ >>492-493
・できるだけ目視に頼りたくない
なら、元データが必要だ
それと自動的に突合できればいいだけならそんなに難しくは無いと思う >>495
注意マークをクリックすれば内容がわかる
内容がわからないならその前後を含めて見せてくれれば回答出来ると思う >>497
レスありがとうございます。
今外で確認できませんが、各々違う内容と思っていいでしょうか。
覚えてる範囲ではCONCATENATE関数で互換がどうこうでした。 >>498
そう、そう
・上下が数式でそこだけ値だけどほんまにええか～？
・このバージョンには対応してない関数やで～
みたいな注意書きがある。今の情報だけではどれかはさっぱり分からん 九九の表を作る時、一行目に1～9が入ってれば簡単だけど、何もないときってスピルでできる？ =SEQUENCE(1,9)*SEQUENCE(9,1) =MAKEARRAY(9,9,LAMBDA(r,c,r*c)) ＞CONCATENATE が Excel の将来のバージョンで利用できない可能性があるためです。
といいつつ使えなくなる関数なんて今まであったっけ？
マクロ4.0は20年ぐらい経ってようやく死滅しようとしてるけど 「図として貼り付けする」あるじゃないですか？
貼り付けた後、元のデータをいじったら貼り付けられた図も反映されるには
どうしたらいいですか？ >>509
右クリックの「形式を選択して貼り付け」
そのあと>>508
バージョンが古いなら、「excel カメラ機能」などで検索すれば見つかるかもしれない >>498
新しい関数があるから非推奨の意
concat関数が推奨されている 【1 OSの種類 .】 Windows10 20H2
【2 Excelのバージョン 】 Excel16/19 混在
【3 VBAが使えるか】 いいえ
【4 VBAでの回答の可否】 (出来たら)否
データ抽出をしてVLOOKUPで検索して一致した関数を返すという処理を作成しようとしています。
ただ、抽出したデータが本来であれば半角英数字でなければならないのですが、
大本のデータ作成ミスによって日本語や記号なども入ってしまいました。
結果として、正常なデータと作成ミスのデータが混在してしまうということになっています。
例：1. AA00000 ←正常な欄
2. A/2*0お年 ←間違っている欄
のような感じでで行内で混在しています。
この状態から、日本語・(ハイフン以外の)記号を削除する方法などないでしょうか？
そして、VLOOKUPで検索した場合、
行内に半角/全角スペースがあるとうまく機能しませんでしたが、
これは仕様なのでしょうか？
また、HTMLなどは多少できますが、VBAは使ったことがありません
よろしくお願いします。 >>512,>>513
詳しく書き忘れて申し訳ありません
2はそもそも不良データ扱いで良いんですが、
AA00000*(あB
*い）QAA00000
のような後ろ7桁はあっているけど、前が間違っているようなケースもあります。
データが全部で10万件ほどあり、1つ1つ修正するのは無茶がありまして・・・
また、VLOOKUPのF>513
詳しく書き忘れて申し訳ありません
2はそもそも不良データ扱いで良いんですが、
AA00000*(あB
*い）QAA00000
のような後ろ7桁はあっているけど、前が間違っているようなケースもあります。
データが全部で10万件ほどあり、1つ1つ修正するのは無茶がありまして・・・
また、VLOOKUPの場合、falseで指定しないと変なところを参照していました。
このような場合、falseでないとVLOOKUPはダメなのでしょうか？ 質問です。
図のリンクを貼付けする
と
カメラ機能
っていうのは一緒の機能ですか >>515
ちょっと違うみたい。
グラフとデータ内訳としてのテーブルをセットで、データが変われば変化するリンク図として貼り付けるとき、
・図のリンクを貼り付ける・・・グラフとテーブルを含む範囲でコピーしても、貼り付けオプションに出て来ない
・カメラ機能・・・この範囲を選択して貼り付けたとき、リンク図になる 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか】 はい
【4 VBAでの回答の可否】 可
セルを範囲選択をした状態でボタンを押したら
その範囲を囲むような図形を作成する方法はないでしょうか。
罫線は既に使っている為、別の方法を考えたら図形で囲むのはどうかと考えた次第です With Selection
ActiveSheet.Shapes.AddShape(msoShapeRectangle, .Left, .Top, .Width, .Height).Select
End With >>518
うお、こんなに早くベストアンサーが返ってくるとは
感服いたしました
ついでと言っては何ですが
図形と罫線が重なって見えなくならないように
図形を罫線より少しだけ外側に塗りつぶし無しで囲いたいのです
あとその枠線の色をRGBで指定したいのですがどうすれば良いでしょうか >>512>>514
＞この状態から、日本語・(ハイフン以外の)記号を削除する方法などないでしょうか？
vbaじゃないと相当厳しいと思う
使わないなら
データを保存せずに
・A~Zとハイフンを空白に置換する
残った物が不要な文字なので、
それをまた一文字ずつ置換する
という恐ろしい作業がある
vbaだと正規表現でなんとかなる気がする
>>514
＞falseでないとVLOOKUPはダメなのでしょうか？
元データが昇順に並んでいるならtrueでいいけど、並んでないならfalseじゃないとおかしくなる >>516
ありがとうございます。
>>331のように
プルダウンリストの▼が消えるバグが、カメラ機能のせいで消えると聞いたので一緒ならもしやと思いましたが違うなら関係ないかもです 正規表現の具体的な例を書いてもらえますか？
そこからは何とかします。 >>519
Dim r As Long, g As Long, b As Long
r = InputBox("Rを入力してください")
g = InputBox("Gを入力してください")
b = InputBox("Bを入力してください")
With Selection
ActiveSheet.Shapes.AddShape(msoShapeRectangle, .Left, .Top, .Width, .Height).Select
End With
With ActiveSheet.Shapes.Range(Selection.Name)
.Fill.Visible = msoFalse
.Line.ForeColor.RGB = RGB(r, g, b)
.Left = .Left - 1
.Top = .Top - 1
.Width = .Width + 3
.Height = .Height + 3
End With >>526
ほとんど回答だけど
a1:a10の置換
Sub foo()
Dim re As Object
Set re = CreateObject("VBScript.RegExp")
re.Pattern = "[a-zA-Z0-9-]"
re.Global = True
For Each c In Range("a1:a10")
Debug.Print c.Value
c.Value = re.Replace(c.Value, "")
Next
End Sub >>521
㌧クス
昇順に並べて一回試してみます。
また、VBAを使っての日本語・記号の削除も模索して見てみます。
ありがとうございました。 やっぱりダメです
形式として～を開いてもリンクってのが全く出てきません。
なんか貼り付けの項目ではすべてとか数式とか入力規則
演算のとこで加算とか原産とかしかないです。 >>532
じゃ、頑張って
それさえあれば解決する。無かったら無理 まずmicrosoftが出してるエクセルを買います WPSかよｗｗｗ
その発想はなかったわ
>>535
それはWPSオフィスって言って、excelのパチもん
まぁパチもんと言っても、家計簿程度なら普通に使える
だが、カメラ機能辺りのニッチな機能になると互換性がなくなってくる。WPSのメーカーに聞いたほうが早い。多分このスレで知ってる人はいないと思う 体温表みたいなのを作りたいです。
例えば数字の5と入れたら自動で36.5って感じでなしたいんだけど可能でしょうか？
足し算とかだとわざわざ0.5と入力するのが面倒です。 =fixed(value(substitute(A1, "5", "36.5")), 0) >>541 2 3
ありがとうございます！
こんなに早く的確な回答をいただけて助かりました🙇‍♂ ありがとうございました！ エクセル2032くらいになれば、
エクセルに顔を近付けただけで体温が自動測定されるようにならないだろうか。 5chは年寄の巣窟ですよ。
子供は他所で遊んだ方が良いですよ。 赤外線カメラ内蔵のスマホはもうあるし、
PC後付けの赤外線Webカメラももうあるし・・・ 今はカメラで脈拍、血中酸素飽和度、ヘモグロビン
さらにはコレステロール、クレアチニンまでカメラで測定可能になっている だからそれをエクセルで自動的にやるにはどうするのか、言えるのか？言えないなら黙ってろ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel365
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
図のような表があるのですが、
氏名毎に売上を集計して合計の多い順に並び替えを行い氏名のみを表示したいのですが、
なにかいい方法はあるでしょうか？
氏名 売上
A 50
A 40
C 100
D 30
B 50
のような結果にしたいです
C
A
B
D ピボットテーブルで氏名列を売上で降順
売上列は非表示 おかん向けにPCを調達することになった
恐らく家計簿＋ごみの日の表（冷蔵庫に貼る）ぐらいの活用になる予定なのですが
・liobreoffice
・openoffice
他、無料のオフィススイートで良いものや、これは危険だから使うなというものはありますか？
ネットは切断される気がするので、スプレッドシートはやめておきたいです >>558
libreな
libreの方が見た目と操作感が似ている
oooは数式のカンマがセミコロンという致命的な違いがある ロシアの日経みたいなやつ、1日でマイナス50%だとさｗ Excel閉じた後、１度だけ勝手に立ち上がって
最近使ったファイルの画面が表示される（ホーム画面？）
それ閉じたら大人しくしてるけど
ワークファイル起動後に閉じるとなぜか勝手にexcelが再起動？してホーム画面になる
なにこれ・・・
とあるCOMアドイン入れた後になるようになったんだが
やっぱアドインが悪いのか？ 下記のように1日に何度も時刻が記録されているテーブル（PCの起動終了ログ）から
起動の最小値を出勤時間、終了の最大値を退勤時間としたい
日付/時刻 社員
12/1 08:30 A 起動
12/1 09:10 A 終了
12/1 15:43 A 起動
12/1 19:10 A 終了
12/1 08:50 B
12/1 09:22 B
12/1 17:16 B
12/1 20:20 B
12/2 .......
↓
12/1 A 08:30 19:10
12/1 B 08:50 20:20
12/2 A ...... 日付と時刻をわけて、ピボットテーブルで最小と最大取って、起動の最大と終了の最小を非表示に
https://i.imgur.com/JTAUn28.png テキスト共有サイトなんていくらでもあるのに何でそこなんだ 愛用してたソースコードの共有サイトが閉鎖されてしまった
無登録で気軽に使えて言語を指定すればステートメントや演算子を色分けしてくれるとこない？ 【1 OSの種類 .】 Windows11
【2 Excelのバージョン 】 Excel365
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
https://imgur.com/P4gsT96.jpg
質問です。
Bに数字を入力し、Cに前日の差分を表示させたいです。
現在は（当日-前日）で計算し、例えば1/6までB欄の数字入力が終わっていたとしてます。
そうすると1/7の差分が（0-50）で-50になってしまいます。
何か良い方法はございますでしょうか？
結果をC欄に表示はマストではないです。
よろしくお願い申し上げます。 B列の未記入部を全てNAにする
または
If関数で隣のセルが空白の時は空白を返すようにする 元号は、どうせ西暦しか使わないからいいけど、
以前なら「20/12/28」と入れれば2020年12月28日になるけど、
今は都度「2021/01/28」って入れないと1921年01月28日になっちゃう。
これはちょっとしんどいわ。 >>580
365だけど、前者になるぞ
国の設定か何かがおかしいんじゃないか >>578
C2=IF(B2="","",B2-B1) 【1 OSの種類】 Windows10
【2 Excelのバージョン】 Excel365
【3 VBAが使えるか】 いいえ
【4 VBAでの回答の可否】 否
質問
A列に適当な日付が入っていてB列に1年,2年3年とドロップタウンで年数を選択。
C列にA列＋B列の日付が入るようにしていてD列に〇×△の判定を入れて見たのですがうまくいきません。
文で書くと、C列の日付はToday()の90日前から〇、 すみません、途中で送信してしまいました。
Today＞C列日付から× それ以外は△としたいのですが
IF(Today()＞C列-90,"〇",IF(C列＜Today(),"×","△"))みたいな感じじゃダメなんでしょうか？(文に抜けなどありますが) 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2019
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
次の式で「LEN(VALUE(List2))=8」がTRUEのとき、「#value!」エラーが表示されるのはなぜでしょう。
「○」を入力した日付を抽出する式です。
解決策をご教示ください。
=INDEX(SUBSTITUTE(TEXT(IF(LEN(VALUE(List2))=8,VALUE(TEXT(List2,"0000!/00!/00")),List2),"gggee年mm月dd日;;"),"0"," ")&"",1/LARGE(INDEX((List1="○")/List3,),1))
【名前を定義した列】※すべて文字列
List1：抽出するものに「○」を入力
List2：ランダムな日付（2021/8/10,20220105,H31.4.10など）
List3：1から連番 エクセルがリスト2を日付と認識していない(文字列扱い) >>584-585
=+IF(TODAY()>C1,"×",IF(TODAY()>=C1-90,"○","△"))
×と○が逆 list2を配列として使っているけれど、text関数の置換え後は文字列で、
要素1の配列から○番目を取り出そうとしている
配列数式とすればいける ただ、0を空白に置換えするのはだめ
1月20日が1月2 日になる グラフを作った後、データの値をイジるとそれがグラフに即反映されるようにする方法ってありますか？ >592
むしろ変わらない方がおかしくないか
今試したけど普通に反映されるぞ
それともピボットグラフ？ シート上でファイル名をエクスプローラとかと同じ順に並べ替えたい
ググるとAPIのStrCompLogicalW使う方法が出るけどかなり違って困ってる
概ね辞書順だけど一部の平仮名が漢字よりあとだったり平仮名同士でも同値判定も多い >>596
並び替えるのではなく、
ファイル名を取得するときにその順番で取得しておけばok
https://happy-tenshoku.com/post-1370/
それが無理なら、かなり面倒くさい方法として
・いったんファイルを作る
・dirで取得
でok
fsoが対応してるかは知らん >>579
>>582
ありがとうございます！！！！ 【1 OSの種類 .】 Windows
【2 Excelのバージョン 】 Excel365
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
ある配列の階差数列の中で0を除いた最小値は？ >>603
どういう配列かわからないけど、作業列で差を出して求めれば良い >>589
配列数式を使わずに#value!エラーを回避する方法はありませんか。 >>586
なんで列で参照するんだ？
テーブルにしてセルで参照すればよくね >>571
こんな質問するなんて管理者なのにバカなんだねw >>586
List2が日付だって言うのなら、
「LEN(VALUE(List2))=8」がTRUEになる事は無いと思う 数式の検証してどの段階でエラーになるか確認してから質問しろや ドヤ顔で答えたくて待機してる奴らの餌を奪ってどうする 答えないじゃなくて、答えられないんだよ
自称Excelの事端から端まで知っている回答者君達だから コピペ質問でもスキルアップできる云々言うくらいだから自称もしてないよ >>608
テーブルで定義しても同じようです。
>>610
8桁表記の日付（例：20220105）の場合、「LEN(VALUE(List2))=8」がTRUEになる。
このとき「#value!」が表示されないようにしたいのですが回避策はありますか？
text関数の置換え「TEXT(List2,"0000!/00!/00")」で配列として認識されないのが原因なのはわかりましたが、配列数式を使わずに解決する方法がわかりません。 出勤簿で
日付テーブルと勤務テーブルをサブフォームを使い入力しています
Excelで入力してたデータをインポートするときに画像のように振り分ける方法がわかりません
https://i.imgur.com/OX2DIsi.jpg 質問です
下の①、②はともにメールをCSVエクスポートしたEXCELのメール本文セルから日付（yyyy/mm/dd）を抜き出す関数ですが
①=IF(COUNTIF(L249,"*注文日:*"),MID(L249,FIND("注文日:",L249)+5,11),"")
②=IF(COUNTIF(L760,"*ご注文内容:*"),MID(L760,FIND("/",L760,FIND("ご注文内容:",L760))-4,11),"")
①の返り値は 2019/10/23
②の返り値は 2020/03/24
で、両方の式に*1する
①’=IF(COUNTIF(L249,"*注文日:*"),MID(L249,FIND("注文日:",L249)+5,11),"")*1
②’=IF(COUNTIF(L760,"*ご注文内容:*"),MID(L760,FIND("/",L760,FIND("ご注文内容:",L760))-4,11),"")*1
①’の返り値は 43761
②’はエラー #VALUE!
以下は試しました
・①のメール本文の日付を2020/03/24に変更 → 43914になり正常
・②のメール本文の日付を2019/10/23に変更 → #VALUE!のまま
・②を3行目にコピー → #VALUE!のまま
・②の本文内の「ご注文内容:～2020/03/24」をセル内の1文字目からに移動 → #VALUE!のまま
両者の違いが全く分からない なぜ②’はエラーになるのか教えてほしいです
単にEXCELのバグかねえ あきらめるしかないんかな スケジュール環境がエクセルになったんだけど、
体調不良で急に休みになった人の予定表に「本日休み」って入れたい時に、
権限がなくて書き込めない。
全体にすると書き込めるがこんどは自分の予定表にも「本日休み」って入るし。
座席がフリーアドレス式だから物理的なホワイトボードでの行き先案内板とか
すでに無くなっている。
どうやればいいんだ？ >>621
スプレッドシートに移行して共有すればいいと思う >>620
①の返り値は 2019/10/23
②の返り値は 2020/03/24
空白か何か入っている。
MIDは11文字で撮っているが、その日付は10文字
MIDの第三引数を11から10にすれば良い
もしかすると10にするだけだとエラーになるかもしれないが、その場合は第一引数か第2引数がズレている
（022/2/28 みたいになっている） >>603
もうちょっと情報がほしい。
階差がマイナスになるかどうかとか。
（もしマイナスもある場合は、絶対値で比較したほうがいいのか）
具体的な画像があればなお良し。
>>616
あぁごめん、見落としてた。
いろんなパターンで入力する場合があるわけね。
スピルしないバージョンだと、そもそもList2が配列として認識されていないから、
ちょっと回りくどいかもしれないけど、こういう式にしてみては？ちなみにList3は使っていない。
=TEXT(IF(LEN(INDEX(List2,MATCH("○",List1)))=8,VALUE(TEXT(INDEX(List2,MATCH("○",List1)),"0000!/00!/00")),INDEX(List2,MATCH("○",List1))),"gggee年mm月dd日;;") >>586
IFの所為、IFを消す IF(a,b,c)→(a)*b+NOT(a)*c
ただしマイナスになる日付に注意 VALUE(TEXT(d,"[<19000101]1;0!/00!/00")) あ、マイナスっていうかこういうやつな
2022/2/28→44620→4/46/20 普通に考えてそんな形式で引き算すると思う？
それができるなら質問して無いです もはや業務で使用する関数の範疇を超えている件
保守しんどいだろ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
西暦日付が入力されたセルを数値として扱いたく、
以下のようにしてみたのですが、
西暦 as date
日付 as long
西暦 = Cells(1, 1)
日付 = Format(西暦, "yyyymmdd")
Debug.Print "西暦" & 西暦
Debug.Print "日付" & 日付
1900/2/28を渡すと、以下のようになってしまいます。
西暦1900/02/27、日付19000227
1900/3/1を渡すと、期待したとおりなのですが。
西暦1900/03/01、日付19000301
なぜですかね 家計簿アプリからコピぺすると一部の金額の後ろに半角空白が入っちゃうな
substituteで空白消そうとしたけどなんか出来なかった >>634
ユニコードだとスペースが何種類もあって単純に消せないやつがある
アプリの制作者に文字コードの知識がないと、スペースのところに適当に入力してしまってあとで困ることになる >>634
データ→区切り位置 でコピペした半角空白で区切るのはどう？ さすがにASCIIのタブ文字すら分からないのはちょっと >>634
trim関数を使うと不要なスペースを消してくれる
それか必ず一番右の一文字だけ消す、なら
=LEFT(A1,LEN(A1)-1) 区切りたいじゃなくて消したいんだけども。
タブって空白文字のこと？ >>640
空白文字には種類がたくさんあって、その中の一つがタプ(タブ文字とも言う)
TRIMでは消えない空白も何種類もあって、タブもTRIMで消えない空白の一種 >>634です
LEFT、LEN関数で消せました
ありがとうございます ラムダ関数ちょい使ってみた。
2次元配列が普通に使えるようになってる。
最近、エクセルがメモリバカ喰いで32ビット版はもうおしまいかと思ったが、ラムダ関数多用でメモリ節約できそうな予感。 >>624
ありがとう。
ただ、その方法だと「○」で選択したものを順番にリストアップできないようです。
なので、IFERRORで条件分けしてみました。
これなら、目的のことができるのですが式が冗長な気がします。
もう少しシンプルにできませんかね？
=IFERROR(INDEX(TEXT(List2,"gggee年mm月dd日;;"),1/LARGE(INDEX((List1="○")/List3,),1)),INDEX(TEXT(TEXT(List2,"0000!/00!/00"),"gggee年mm月dd日;;"),1/LARGE(INDEX((List1="○")/List3,),1))) それ業務で使用できる関数じゃないだろうよ
ウチの職場だったらそんな複雑なことやっていたらドヤしつけられるわ ラムダ関数はスピルと相性が良い感じ。
スピルって何？って言ってるようだと、
手を出さない方が良いみたいだね。 スピル/ラムダ
Office Premium
Office 365
スピル
Office 2021 貧富の格差でITスキルの格差が生じ貧しい者は職を失う場合も有る訳だ >>662
に反論しようとする奴は釣りに弱すぎるわ >>664
に反論しようとする奴は釣りに弱すぎるわ 高校生の頃から貯金頑張ってきて、今は1500万ありますが何か？ >>667
式が冗長気味ですが、これしか解決方法はなさそうなのでこれで良しとします。
ありがとうございました。 >>669
いや、少なくともスピル無しだと、オートフィルでいけない気がするんだけど。 >>670
オートフィルできませんが、スピル不要です。
INDEX関数の行番号をインクリメントします。
INDEX(TEXT(List2,"gggee年mm月dd日;;"),1/LARGE(INDEX((List1="○")/List3,),1))
INDEX(TEXT(List2,"gggee年mm月dd日;;"),1/LARGE(INDEX((List1="○")/List3,),2))
INDEX(TEXT(List2,"gggee年mm月dd日;;"),1/LARGE(INDEX((List1="○")/List3,),3))
... >>673
row使う方法もありますね。
ありがとうございます。 質問失礼します。
60個ほどのデータが入っているグラフから5個のデータは残して次の10個のデータは消すというマクロを組みたいのですがなにかいい方法はありますか？ なんで手動でできることをマクロでやりたがるんだろ？ >>675
マクロ書けばいいけど、
構成わからないと答えようがない 10x10の配列があるとして、n列目を10x1の配列として取り出すのはどうすれば良いの?
VBAなら一瞬だが、ワークシート関数探してて見つからない・・・ 自己解決。
INDEXで第2パラメーターを省略できたのね。 俺も
省略って0すら要らないって事か
Index + Matchの時
検索範囲, 0), 0)
で手が覚えちまってるよ 0は危険な気がする
第三引数だから、0列目の指定って事になっている
これバージョンアップで突然エラーになる可能性あるぞ 願望じゃなくてヘルプ見ようぜ
> For example, for a single row reference, use INDEX(reference,,column_num). Excel：2019、VBA：ちょっと使える
3月1日、08:00、36.1
(空白)、12:00、36.8
(空白)、16:00、37.1
(空白)、20:00、36.5
3月2日、08:00、36.2
(空白)、12:00、36.3
(空白)、16:00、36.7
(空白)、20:00、36.1
・
・
上のような１日に４回測定した体温データをもとに
体温推移の折れ線グラフを使っています。
横軸の目盛線の追加をすると時刻のすべてに縦の目盛線が入るのですが、
日付の区切り部分のみに縦の目盛線を入れるには
どのような方法があるでしょうか？ >>687
日単位より細かい時刻単位にすると
多分、日付単位の横軸自動認識はしてくれないので、
最小値/最大値の境界値を日付のシリアル値の整数(毎日午前0時でグラフ横軸表示期間に相当)にして
主単位を1.0
sheet上で計算したシリアル値の始期/終期で、グラフの表示期間をその都度変えたいときは
例えば、
Sub HoliAxis()
Sheets("グラフ").Select
ActiveSheet.ChartObjects("G_体温").Activate
ActiveChart.Axes(xlCategory).Select
ActiveChart.Axes(xlCategory).MinimumScale = Range("始期")
ActiveChart.Axes(xlCategory).MaximumScale = Range("終期")
End Sub
とか。 Excelでセルにデータを入力しているとき、キーボードの「←」を押すと選択しているセルが一つ左に移動してしまいます。
これを、セルを移動させずに、セル内でカーソルを移動させるにはどうすれば良いですか？
ご存じの方いらっしゃいましたら教えて頂けると嬉しいです。
宜しくお願い致します。 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel 2016
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
セルA1に
="https://hogehoge.com/file";&TEXT(TODAY(),"YYYYMMDD")&".xlsx"
と書かれており、
このWeb上のエクセルファイルの[tabname]というタブのB1セルの値を
取得・表示したい場合の数式またはヒントをご教示くださいませ
よろしくお願い申し上げます >>675
スピルを使って、元のデータからグラフ化するデータを計算式で引っ張ってくれば楽に色々いじれそうだが。 365インサイダーに代えたら動作不安定なんだが？？
矢印キーが突然効かなくなったり >>695
>>692が既に変態なので何も変わらん お前自分が馬鹿って言ってるのと変わらないんだけど大丈夫か？
>>702 カーソルの位置を黒い丸（リング）で教えてくれる機能を消したいんだけどどうすればいいんだろ？
出てきたり消えたりしてすごく邪魔
ちなみにWordでも同様の黒い丸がたまに出現する 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel 365
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
filter関数の結果を10件までに絞る、などはできますか？ >>707
すいません、これテストですｗ
韓国人みたいな嘘つきますねｗ 10件まで
INDEX FILTER SEQUENCE >>706>>708
余裕ではなかったけど、できなくもなかった
A1=row() で連番作って、
奇数を上から10個とるとする
B1=INDEX(FILTER(A:A,MOD(A:A,2)=1,""),A1:A10)
>>709
SEQUENCE関数でできるの？やり方教えてほしい >>711
=INDEX(FILTER(A1:A100,B1:B100="AAA"),SEQUENCE(10))
=INDEX(FILTER(A1:B100,B1:B100="AAA"),SEQUENCE(10),SEQUENCE(1,2)) >>712
ありがとうございます。勉強になりました。 >>712
一応、報告
スプレッドシートで試したら挙動が違ってた 転職すべきかご相談させて貰えないでしょうか。
年齢 43歳
現職 日系大手メーカー core 70 ホワイト
年収 1250万円
役職 課長 ITエンジニア
転職先オファー
業界 外資系超大手IT企業
年収 1400万円 RSUあり
役職 ソリューションアーキテクト
妻からは、家族として
現職の仕事内容や年収に十分満足しているから、
あえて外資系に飛び込む必要は
ないんじゃないか？
と言われてるんですが、
客観的にどう思いますか？
個人的には、外資系に挑戦してみたい
気持ちもありますが、
本当にやってけるか一抹の不安は感じています >>716
外資は基本的に長続きしないという前提でイたほうが良い。マジでキツイ
絶対に必要な情報は、
・貯蓄と必要経費（ローンや学費）
転職失敗して即止めても、貯蓄で一生食っていける～ってなら別に転職してもいいと思う
年収1000万、年間1000万使います、貯蓄ゼロです！アホな家計なら、まずは貯蓄しろとしか言いようがない んで、給与じゃなく本当に挑戦したいだけなら、
今の会社で、自分の裁量の範囲内で時間を使わせて貰えば良いと思う ワロタw
実体験のないアドバイス
自分に酔ってるのか？ EXeCutivE Lucrative 総合相談所だからスレ違いでは無い 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel365
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 否
業務でexcelをよく使いますが
モニタのサイズと解像度はいくらぐらいが良いでしょうか？ >>727
すいません、会社で購入するにあたって、本当に教えてほしいのです
ネタなどではありません 本当に聞きたいならもっとマシな質問文になるはず
よって728はなりすまし エクセルをどう使うのかわからんし
表の作り方によっては、
おもいっきり横長のが良かったり、
縦横変えられるのが良かったり、
フルHD2画面が良かったり。 >>726
>>730も言ってるけど、モニタは24インチのFHD2枚が良い。
その場合、フレームレスは必須。PHILIPSだと接続方式も多くてほぼ間違いない
大丈夫とは思うけど、本体側にモニタ2枚差しできるかどうかの確認はしておく事
モニタ一枚で済まそうとすると厳しい >>729
朝鮮人じゃないのでそんなことしませんよ
>>730
ありがとうございます＾＾
>>729みたいな無能のカスとは違って素敵！ >>733
＞自演はもういいから。
切れてる
＞チェッカーでバレてるぞ笑
悔しいので的はずれな反撃
せっかくの休日なのに自分はゴミですって自己紹介とか、凄いな >>726
WQHDでも良いと思う
4kはやめとけ、目が疲れる >>734
幼稚園児か小学校低学年かw
本人が全然関心のない事なのに「そんな事も知らないのか？」って感じで
偉そうに自慢してるつもりでいるw
例えば野球に全然関心がなくて野球の試合を観てるわけでもない外国人に向かって
この外国人は無死または1死で塁がつまってる時は振り逃げができないって事を
知らないみたいだと自慢してるみたいだw
本当に自己中クズだなw
自分にケチつけるのはやっぱりクズは同類のクズを援護するというクズの掟に
忠実に従いたいからだろw >>726
ネットカフェか電気屋で見たほうが早いんじゃないか？ >>736
何度もイチャモン挑発レスしているが相手にされないのがそんなに悔しいのか？w
自分は妄想クズにどう思われようと全く気にならないんだがw
妄想クズは自己中だから都合の良い解釈(願望)をしてそれを信じ込めば
自分が卑屈にならずに安心できるとでも思っているのか？w だからExcel以外の事は的外れなんだろうなここの回答者は
世間知らずっぽいし >>726
若者ならWQHD
年寄りなら4Kの価値分からんだろうからフルHDモニター 4kはPCの方が対応してるか分からん
自分のならともかく会社のじゃ 4k対応してないPCはさすがに本体買い換えていいだろう セルの内容に応じて表示させる画像を変えたい
ぐぐると、入力する箇所に名前を付けて、indirectでその名前を指定する方法は見つかる
ただし、この方法は入力する箇所が1つだけの場合なので、
同様のことを何10行もやろうと思うと、名前を何10個も定義する必要があり現実的でない
例えば、名簿があって、名前を入力すると隣のセルに顔写真を表示させるイメージ
名前と画像のデータベースを作れば、あとはコピペでいくらでも増やせる形式にしたい VBAなら簡単
もしVBAの使えない環境でも、名前の定義だけVBAで一括でやってしまって、実際に使う時はVBAだけ削除してしまえばいい >>749
＞VBAなら簡単
サンプルコード教えてください どうも困難そうなのでxlwingsあたりで検討しよう 図のリンク貼り付けとfilter()で行ける気がする
作ってる内にわけわからなくなってきた。 >>748
A列に名前
B列に画像
A列でフィルタとか 図のリンク貼り付けのリンク先を変えればいいだけだと思ったけどその方法が分からなかった
寝よ >>744
VBEがウィンドウ分割できないからWQHD欲しいわ windows10、エクセル2016です
VBAでmkdirや、filesystemobjectでAというフォルダを作りその下にBというフォルダを
連続して作成した場合
エクスプローラ上からAを削除しようとしたところ管理者権限を要求され削除できません
削除するには一番下のBのフォルダから順に削除しなければいけないようです
フォルダのセキュリティのアクセス許可に全てチェックを入れても同様でした
なにか他に回避方法がありましたらご教示頂けませんでしょうか 年寄りエクセラーは相変わらず古い技術知識でどや顔してくるのがウザイ 会社じゃないの？
赤字で買えないなら他力本願も何もないだろう
無職はその辺わからないのか？ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2019
【3 VBAが使えるか .】 わからないのでいいえ
【4 VBAでの回答の可否】 否
一つのセルに毎月の決められた目標値を月が変わる毎に自動で表示させるようにするにはどうすればいいでしょうか？
あと、当月までの累計目標平均値も自動で表示させるようにしたいです。 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
https://dotup.org/uploda/dotup.org2743417.png
こちらの画像に書いてある事をしたいのですが、
日付に対し重複しない数字を振る方法がわかりません
XC-Gateという関数にしか対応していないソフトで使用するので
関数のみで構成したいのですが方法はありますか？ >>768
目標値がどこに書いてあるか分からないので答えようがないけど
とりあえずは
date()、month()、などを使えば出来ると思う
ブックの構成を知りたい
>>769
g3=IF(C3="","",+C3+ROW()/1000000)
b3=IF(C3="","",RANK(G3,G:G,1))
下にオートフィル ただこの場合、品名関係なく上から順に順位をふるけど別にいいかな >>770
すげぇ…関数入れたら理想どおりの動きをしてくれました
大変助かりました、ありがとうございます >>770
すみません。4月～3月の下のセルに各月の目標値が表示されてます。
それを別のセルに当月の目標値
その下に当月までの累計平均の目標値が出るようにしたいのです。 あー累計じゃなくて平均か
=AVERAGE(OFFSET(A2,0,0,1,O3+1)) excelはできる範囲で使うのがいい
折角機能があるのに使わずに苦労してるなら使った方がいい
複雑な式やマクロを駆使すれば実現できるのに、みたいなものは手を出さないのが吉 ヒマなんだろうが、言ってることが矛盾してんのわかってる？ 要は、縛りゲーじゃないんだから、excelだけでどうにかしようと思わないこと
効率よく仕事をしよう >>769なんですがXC-GateがROW関数に対応してなくて代用の方法を探してます…
110種類の関数に対応と謳ってるけど何が対応してないか分からない状態でして何度も質問してすみません >>780
コピーして、同じ場所に値はりつけ
こうすれば関数は全部消えるので、それを読み込ませれば良い Date関数で月の引数が13になるときは翌年にしてくれるか
便利便利 0月とか0日とか、エラーになりそうなこともいい感じに処理してくれる 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
1行目に項目名（数学、国語、英語、理科）
2行目に分類（中間テスト、期末テスト）
3行目に学期（1学期、2学期、3学期）
という風に表を作っています。
例：
A列=数学、中間テスト、1学期
B列=数学、中間テスト、2学期
C列=数学、中間テスト、3学期
D列=数学、期末テスト、1学期
E列=数学、期末テスト、2学期
F列=数学、期末テスト、3学期
G列=国語、中間テスト、1学期
・・・
X列=理科、期末テスト、3学期
VBAでボタンを押したら「中間テストのみ」とか「3学期のみ」とかで絞り込み（ソート）できるように
コードを組みたいのですが2行目3行目の値を参照して対象の列を割り出すにはどうすれば良いでしょうか
対象外の列は非表示にする（.hidden = true)形を想定しています for eachでセルの値を検索して、該当するセルの行を非表示
それかオートフイルター for each c in range("a2:z2")
if c.value ="期末テスト" then c.entirecolumn.hidden =true
next >>784
リスト作っておく
https://i.imgur.com/Rfq3nCk.png
横向きフィルター
Private Sub Worksheet_Change(ByVal Target As Range)
'最初に全て表示しなおし
Columns().EntireColumn.Hidden = False
'全ての場合終了
If Target.Value = "全て" Then
Exit Sub
End If
'本番。A1-A3が対象
If Target.Column = 1 And (Target.Row >= 1 Or Target.Row <= 3) Then
最終列 = Cells(1, Columns.Count).End(xlToLeft).Column
作業行 = Target.Row
For i = 最終列 To 2 Step -1
If Target.Value <> Cells(作業行, i).Value Then
Columns(i).EntireColumn.Hidden = True
End If
Next
End If
End Sub >>789
はボタンを使ってない。1列目を変更することで、同じ物を抽出する ボタンで起動するにはどうすればいいかわかりますか？ >>791
ボタンを設置して、
>>789
の
Private Sub Worksheet_Change(ByVal Target As Range)
を
Sub ボタン1_Click()
に変えればok >>793
ほんとだ、全然ダメだね
>>792は無しで アンタ、自分の排泄物で喉詰まらせてる人？
回答するなよー ご回答いただいた方ありがとうございました
お蔭様で個々の絞り込み自体はできるようになりました
ただそのあと任意に複数選択した項目で絞り込む必要が出てきました
例：
「1学期」の「中間テスト」の全教科とか
「数学と英語」の「2学期」とか
ユーザーフォームで各項目のチェックボックスを作って
チェックを入れた項目を絞り込みたいのですが
複数項目で絞り込むにはどうすれば良いでしょうか 縦一列に並べるのはNG？
それさえできればオートフィルタ一発なんだけど いくつか案があるけどできれば今のシートとフォームの構造見ながら説明したい。スクショを提供してくれる？ >>802
すみません業務内容に関わるのでできません 別にダミーデータで良いだろうよ
楽して回答得ることが目的かな？ >>803
回答する気がなくなった。
誠意のないヤツに教える義理はない。 >>783
でも、1900年のバレンタインの曜日は間違ってるよな
ホワイトデーはあってるのに >>803
ダミーデータ出してくれれば答えるよ
なかったらめんどくさすぎる >>807
どっかで1900/2/29を跨ぐ計算がおかしくなるというのを見た ○○歳以上なら500、違うなら400って感じで関数を使いたいんだけど、イフ関数と何を組み合わせたらいいですか？
年齢による価格分岐をしたいです >>811
年齢は、年齢そのもののデータがある？
それとも、誕生日？ >>811
=IF(年齢>=○○,500,400) >>812
年齢データはあるけど数値ではなく、生年月日から関数によって計算された基準日年齢を元に価格分岐させたい
基準日年齢は表示されてるけど数値じゃないからどうやって分岐させたらいいかわからなくて悩んでる
初心者すぎてすまん >>815
いくつか案があるけどできれば今のシートの構造見ながら説明したい。スクショを提供してくれる？ >>815
こんな感じ？
https://i.imgur.com/4jaUB1D.png
IF(C2>=40,500,400)
IF(DATEDIF(A2,B2,"y")>=40,500,400) >>816
>>817
ありがとう
スクショので出来た。 >>809
1900年には2月29日が存在しないのにデータ上存在した扱いになってるからだね
2000年問題を対処した名残 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel365
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
F-J列を、A-C列のようなデータにしたいと思っています
https://i.imgur.com/svTbPl2.png
・時刻は5分置き
・担当者ごとに分ける
・作業列可
どのような数式を用いれば良いでしょうか？ イフ関数とブイルックアップ関数の組合わせで例えばA1のセルが○ならブイルックアップ、ブイルックで検索された数値が100以上なら1000、違うなら900と表示させたい場合、どういう数式の書き方をしたらいいですか？ if(a1="○",if(vlookup()>=100,1000,900),"")
vlookupの引数は省略 =if(A1<10, "<10",
if(A1<20, "<20",
if(A1<30, "<30", "else")
)
)
ネストするIFは改行して字下げして書いて、そのまま貼り付ける 遅くなりましたが自己解決しました
IF構文を3層に分けて重ねて展開したらいけました
ご協力くださった方ありがとうございました >>823
この手のヤツ、俺も前からなんとか出来ないかなぁと思っていて、PowerQueryで
今、分かる範囲でやってみた。
日時の開始と終了の幅で、担当者ごとに顧客名を抽出する方法が思いつかなかった。
MATCH(検索値1&検索値2, 検索範囲1&検索範囲2, 1or-1)では上手く行かず。
1. ガンチャートで"■"を並べるのとは違って、
まず、顧客ごとに各5分値の「時点」ごとに、こんなテーブル(右側)が必要なのかなと。
https://i.imgur.com/wr0EJEZ.png
難点なのは、左の表の予約番号の個数分だけ、手動でクエリーを作って合体させたこと。
パラメータなる手法を解明できれば、クエリー更新で自動処理になるかもしれない。
あと、年間では膨大になる。
2.1.の右側テーブルを元に、まず、5分コマと担当者ごとに、重複数を数えておく。
(真ん中のテーブル)
COUNTIFSを使用
https://i.imgur.com/VsLI4If.png
3. 2.の右側のテーブルで、5分コマごと&担当者ごとにINDEX(MATCH)で顧客名を抽出した。
ただし、
もし、重複ckテーブルの値が0だったら、""
もし、重複ckテーブルの値が2以上だったら、(重複数)&"重です！"
もし、重複ckテーブルの値が1だったら、顧客名を引っ張ってくる
という感じ。
5分コマのリストは、Excel関数で 前行+TIME(0,5,0) としたものと、
M式言語で5分刻みで生成した値 (List.DateTimes([開始日時],コマ数,間隔#duration(0,0,5,0)) では
微妙なズレが生じて上手く照合出来なかったので、
後者で統一した。
完成形ではないのであしからず。 ＞5分コマのリストは、Excel関数で 前行+TIME(0,5,0) としたものと、
俺も作ってたけど、ここでおかしくなってたのか・・・疲れた A列 B列 C列
3/5 ABC-01 01
3/6 ABC-02 02
3/6 ABC-03
3/7
3/8 ABC-04 03
・・・
3/31 ABC-15 12
4/7 ABC-01 01
4/7 ABC-02
4/8 ABC-03 02
4/8 ABC-04
4/8 ABC-05
4/9
4/10 ABC-06 03
上手く表現出来ないですが上記のC列のように出力したいです。
月初めの最初に発生 +1
日を跨ぎかつデータがあれば+1
同日に異なるデータがあっても+0
翌月は0からスタート
関数でもVBAでもいいので考え方を教えて頂きたく。
Win10 Excel2019です。 >>833
いくつか案があるけどできれば今のシートの構造見ながら説明したい。スクショを提供してくれる？ >>823
https://i.imgur.com/PrW1Omw.jpg
https://i.imgur.com/MBiatz8.jpg
作業列の範囲は適当に広げてくれ
5分刻みの時刻は連続データの作成で作らないとバグるので注意
>>833
https://i.imgur.com/hEEuw4S.jpg
セルの値が一つ上のセルと同じ時、条件付き書式が発動する様にして文字色を白にする
画像はわかりやすいように赤くしておいた
1日にB列空欄時の処理が分からんかったけど0にしておいた >>835
助かります。ここまで教えて頂ければ後はDictionaryとかにぶっ込んで処理出来ます。ありがとうございました。 オリジナルバージョンって作れないかな?
起動画面にExcelサンバルカンとか表示されたらいいと思うんだよね。 パワークエリが実装されていなかったり新関数が実装されていないVer.を使用している人の事を配慮していないでしょここの回答者は。 >>823
A1 1月1日
A2 08:50
A3 =TEXT(A2+TIME(0,5,0),"H:MM")*1
↓
B1 山田
B2 =MAP($A$2:$A$30,LAMBDA(TA,LET(A,FILTER($J$2:$J$6,($F$2:$F$6=B1)*($G$2:$G$6=$A$1)*($H$2:$H$6<=TA)*($I$2:$I$6>TA),""),IF(ROWS(A)=1,A,"2重でず!")))) あぁ365だったか、なら何とでもできるね
スピル非対応で考えちゃってたw >>823
B2
=IF(COUNTIFS(F:F,B$1,G:G,$A$1,H:H,"<="&$A2,I:I,">"&$A2)>=2,"複数アリ",
INDEX(
IFERROR(FILTER(J:J,(G:G=$A$1)*(F:F=B$1)*(H:H<=$A2)*(I:I>$A2)),"-"),SEQUENCE(1))) excel2007使ってます
メモ帳などテキストデータをexcelに貼りたいのですが、分数が日付で表示されてしまいます
予め分数が入るセル(列)をユーザー定義で分数にしておいても
いざ貼り付けると[分数]から[ユーザー定義]に変更されて、日付になってしまいます
文字列に変更すると分数表示はされますが、今度は数値として計算出来ません
何か良い方法があれば教えて下さい >>843
最近、ある程度わかる人が何人かいるようで嬉しい 社内の365でラムダ関数使える人どれくらいいる？
うちは半期チャネルだからまだまだ使えん イフ関数とオア関数の組合わせでA1セルが○または☓のどちらかだったらA2セルにEXCELと表示させるにはどういう数式の書き方をしたらいいかどなたか教えて下さい。 >>852
=IF(OR(A1="○",A1="×"),"Excel","") エクセル365で納得出来ないけど以下解決した
•現象
エクセル再計算毎にメモリをガンガン消費、3GBを超えたあたりで落ちる。
•詳細
ifsがおかしい。
大容量データを扱う計算式をifs関数の後半に入れてたが、条件が成立しなくてもメモリを確保し、そのまま解放しないようだ。
•対策
ifsの後半にif文を追加して大容量データを扱う計算式をその中に入れた。if文は条件が成立しなければメモリを確保しないようだ。 思い込みや持論を晒してくる人ってなんなんだろうね？ 823です
たくさんの回答、感謝感激です；；
>>830,835,839,844さん、ありがとうございます
どれがいいのかよくわからないので、一通りさわってみようと思います オートフィルターで非表示の行とか表示してる行とかを全部削除するにはどうしたらいい？ ExcelのIFは関数で唯一 短絡評価ができる
論理式が配列でないとき条件分岐で使われない方の式は評価計算されない >>865
IFだけ
数式の検証でIFだけ直接#N/Aになるのは計算してないから
=IF(0+0,0+0,0+1)
=IFS(0+0,0+0,0+1,0+0,0+0,0+0) >>866
地味に検証の数式もめちゃくちゃかっこいい。神だ・・・
ifsで試したけど、たしかに計算していた
ありがとう、そして疑ってごめんなさい 条件付き書式で質問です
ハイフンを入れたセルに色を付けたいのですが、反映されません
特定の文字列として、「次の値を含む」で「-」「"-"」「*-」を設定したのですが駄目でした >>873
あるデータ群の中で空白セルだと白が目立つ＆未入力か区別し辛いので
-(ハイフン)を入力、色をグレーにしたいのです
数値が入力してあるセルは条件付き書式で色付け済みです >>875
ユーザー書式でハイフンにしてるなら、
条件付き書式は「空白の場合」で設定しないとダメだよ >>876
すみません、問題解決しました。
どうやら文字列は数値より上？の扱いになるらしく
他の数値の書式で「次の値以上(以下)」が影響していたようです
列毎に異なる数値の書式設定をしていて、色が付いたり付かなかったりしていのですが
全て「次の値の間」に設定してから、再度ハイフンの設定をしたら無事反映されました >>878
他の皆様含めお詫びと感謝申し上げます
ありがとうございました じゃあ俺達も言わせてもらうわ
「質問してやっているんだからちゃんと扱え！」 =INDIRECT("R[-20]C[0]",FALSE) INDIRECTで解決しよう、と思うとそれは大抵間違い セル名を生成しよう、という思いつきそのものに、
絶対バグるとかメンテ大変とか直感する筈
無理やりパッチ当てて動かすようなもので、動くかもしれないけど方法論として間違い Macのparallels desktopで Windows版EXCELを使っているのだけど
普通のWindowsのEXCELと比べてできないこととか不便なことある？
色合いとかなぜか違うのも気になるけど 目的を聞くのは良いと思うけどな
手段にとらわれて本末転倒転倒なんて今時のユーザーあるあるだし 流れぶったぎってスマンが、みんなの中にはExcelオンライン使っている人いる～？
使用感教えてくださいまし VBAを使わないと解決できないような問題は、VBA以外の方法で解決すべき 目的は？
>>897
＞>>894
＞具体的に何が違うの？ でもVBAは徐々に減らしていく方針らしいですしMS そんな10年前から言われてることわざわざ書かなくていいから なんだ減らすて
VBAは無くならないよ
だからこそ、近づかないようにする努力が必要
VBAが必要なケースは、そもそもexcelでやるべきでないようなことを
無理やりexcelでやってる場合が多い
もっと簡単で高速で優れた方法がある なんでまさかなのか理解できんけど、pythonは有力な候補の一つ
そんなもんexcel一切使わずpythonでやればいいのに、みたいな事例はたくさんある ＶＢＡからpythonにデータを渡して結果を受け取る
いい方法を教えてください excelの位置付けによる
excelをメインで使って、複雑な処理だけpythonに任せたいのか、
excelはUIとしてのみ使って、処理のメインはpythonなのか
人気の言語なので、それぞれに適したモジュールがある 質問に答えてないな
高卒とか派遣は黙っててくれないかな つか高卒がExcelなんか操作できる訳ねーよ
考えて書き込めよスレの無駄遣い >>911
VBAerなので
「excelをメインで使って、複雑な処理だけpythonに任せたい」でお願いします excelメインならxlwings
excelがインストールされていること前提で、excelの操作が全部pythonでできる
書き方もVBAとそっくりで、手間は1/3くらい
なにしろpythonなので保守性高くすっきり書ける
逆に、excelは入力の表を作ったり結果をexcelで出力したりするだけで、
基本はpythonで完結する場合は、openpyxlとかpandas
excelがインストールされている必要すら無いけど、互換性は落ちる
excelを読み込んで全部のセルに1足して閉じる、とか数行で書けちゃう >>914
あー日本の女子高生がExcel世界一になったアレね
おまいら敗北 は？世界の範囲が全然ちがうだろう。重要なポイントた。 大卒の派遣が何を焦ってるのか知らんがズレてる
高卒がエクセル操作できないってのが元々の質問
どうやらできるようだな
Pythonの話は具体例書かないので回答になってない エクセル操作ができるってつまりどういうことだろうか
何ができたらできるに分類されるの？ 日本の高校生が世界一になったのはMOSだよ
出題範囲はネットに公開されてる
https://mos.odyssey-com.co.jp/outline/excel365_2019_ex.pdf
全部できるのが当たり前で、あとは早く終わった方が順位が上になるルールだから、事実上マウスやキーボード操作の競争
上位に食い込む人はショートカットもみんな覚えてる >>924
一般的な指標はMOSエキスパートぐらいしかない
ピボットとvbaのif・for・setが出来れば実務上は十分だと思う あんた924の質問理解してないのに適当な感想書くなよ 実際に使う人は指示されたことしかやらないからね
低レベル作業になりがち 人の指示を理解できる能力がないやつが多い
このスレで回答書きたがるやつはその真骨頂 人とは違う頭の使い方をする、それがエクセルで仕事する際のコツ
俺はエスカレーターの右側に立つようにしている
かれこれ２年はそうしている
絶対にどかない、と言う決意とイヤホンつけることで何とかなるもんだ
君たちにはできるかい
横断歩道に自動車の列に突入とか
歩道で自転車きても道譲らないとか
他でも正義を発揮している >>933
東京か
大阪は逆で、みんな右側に乗るので俺は左側で邪魔してたんだが・・・
おっちゃん「（肩トントン）にーちゃん、ちょっと急いでるのでどいてんか～」
おばちゃん「すいませ～～～～ん（イノシシみたいに突っ込んでくる）」
割とマジで危ないから止めることにした
ってかお前ら、どれだけ急いでんのよｗ >>933
常にエクセルの事を考えてイライラしてる俺に、
後から傘で刺し殺されないよう気をつけるんだな >>933
下りのエスカレーターでお前を見かけたら後から思い切り蹴飛ばすと思う 意志弱い
>>934
＞>>933
＞東京か
＞大阪は逆で、みんな右側に乗るので俺は左側で邪魔してたんだが・・・
＞
＞おっちゃん「（肩トントン）にーちゃん、ちょっと急いでるのでどいてんか～」
＞おばちゃん「すいませ～～～～ん（イノシシみたいに突っ込んでくる）」
＞
＞割とマジで危ないから止めることにした
＞ってかお前ら、どれだけ急いでんのよｗ >>936-937
話をまとめられない、人の時間を無駄にするタイプだな 例のExcel世界イチ女子高生を大したことないとか言っているヤツなんなの？
じゃあおまいらも同じ賞取ってみろよ？
素直に認めないとか老化の始まりそのものだな んなこと言われてもな、
Excelをシートがオマケに付いてくるVB6.0くらいにしか思ってない連中から見たら実際そうだろう。 >>937
エスカーターはそもそも歩いちゃいけないのがメーカーから指定されたルールだからな
みんなが自分ルールで歩いてるだけで 片方で止まるのもNG
負荷がかかりすぎてかなり傷む そんなもんは、片方に寄って乗ることを想定して設計すべき 全員が遅くなるようなアホな乗り方するなんて想定できるかよｗ 高校生は仕事でエクセル使ってないじゃん
問題集相手にしているだけだろ
そんなの使えるってレベルに入らない
公文やってたけど清掃婦にしかなれなかった人なんて腐るほどいるだろ
参考にならんよ エスカレーターのコピペにいつまで反応してんだよ。。。これ有名なやつ >>936
常にExcelの事を考えて～
きっしょ、Excelマニアかよ エスカーターはいかにもコピペだけど
>>936がコピペなのは気づかなかったわ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
注文票を作成しております。
一番上のZの５００個に対して、
AとBの必要セット数の注文計画となります。
それぞれAとBのセット数は異なります。
Aの数式D5セル=ROUNDUP(D3/$B$5,0)
となりBも同様です。
Zの土日に入ってるものからＡとＢの商品は
金曜日で上乗せで注文できるようにしたいと思っております。
５行目７行目に当たる部分です。
なのでＧ５セルを７＋７＝１４という値になって、
Ｈ５セルは０となるような数式にしたいです。
日付はシリアルを表示形式daaa表示です。
この場合、どのような数式にすればよいでしょうか？
https://dotup.org/uploda/dotup.org2750105.png 一覧にした商品全てに番号付けて、番号だけで納品書作成するのは簡単ですか？ ダブルクリック→右クリックで検索できる
これを必死と思うなら、必死なんじゃないかな 暇なんだ
いいなあ
>>972
＞ダブルクリック→右クリックで検索できる
＞これを必死と思うなら、必死なんじゃないかな お前この程度のことするヒマもないの？
それともやり方わかんないの？ 【1 OSの種類 .】 Windows10pro
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
条件付き書式で第1第3土曜に色をつけたいです。
数式を教えてください。 でも5chに書き込む暇はあるんだね
アンカー付けて引用までして >>976
weeknumを用いて差分で判断させれば？ 月の最初の土曜日のweeknumが判らんがな
=DATE(YEAR(a1), MONTH(a1), 1)
で月の初日を計算して、それとの日数差から判断する >>976
いくつか案があるけどできれば今のシートとフォームの構造見ながら説明したい。スクショを提供してくれる？ 第1土曜日は1から7日のどれか、第3は2*7+1から+7日のどれか
=IF(WEEKDAY(A1)=6,OR(DAY(A1)={0;2}*7+{1,2,3,4,5,6,7})) 条件付き書式と関数を組み合わせたいのですがそれはどうやりますか？ 数式を使用して、のルールを使う
A1=1
という条件の書き方は
=A1=1
どう見ても間違ってるけど、これで正解 >>976
条件付き書式
=AND(WEEKDAY(A1)=7,WEEKNUM(A1)-WEEKNUM(DATE(YEAR(A1),MONTH(A1),1))+1=1)
条件付き書式
=AND(WEEKDAY(A1)=7,WEEKNUM(A1)-WEEKNUM(DATE(YEAR(A1),MONTH(A1),1))+1=3) 質問です
12F35DDD52
数字一桁か二桁+文字1つ+数字二桁+数文字+数字
のような文字列で、頭から見て2つ目の数字のみを取り出したい場合どうすればよいですか。
↑の文字列で言えば 35 を表示したいです >>987
いくつか案があるけどできれば今のシートとフォームの構造見ながら説明したい。スクショを提供してくれる？ スケールしない方法を紹介する意味ないだろ
お前普段からそうやって揚げ足取って生きてるのか？ >>987
=IFERROR(MID(A1,4,2)*1,MID(A1,3,2)*1) >>976
=(WEEKDAY(A1)=7)*(SEARCH(INT(DAY(A1)/7),"02")>0) >>992
そんなことできたっけ？と思ったらやっぱりエラーになった >>994
あとはmidをvalueで包めば良い
*1は無くても良い 文字列に1かけて数値にするの、うちではエラーになるんだけど、何が違うんだろう？
Excelは2021の買い切り版
https://i.imgur.com/Bz6vaAs.png いやいや、文字列の「35」に1かけるから数値になるんであって、
アルファベットが混ざってたら、エラー出るに決まってるでしょ・・・ このスレッドは１０００を超えました。
新しいスレッドを立ててください。
life time: 42日 21時間 55分 43秒 5ちゃんねるの運営はプレミアム会員の皆さまに支えられています。
運営にご協力お願いいたします。
───────────────────
《プレミアム会員の主な特典》
★ 5ちゃんねる専用ブラウザからの広告除去
★ 5ちゃんねるの過去ログを取得
★ 書き込み規制の緩和
───────────────────
会員登録には個人情報は一切必要ありません。
月300円から匿名でご購入いただけます。
▼ プレミアム会員登録はこちら ▼
https://premium.5ch.net/
▼ 浪人ログインはこちら ▼
https://login.5ch.net/login.php レス数が1000を超えています。これ以上書き込みはできません。
