Excel総合相談所 149
レス数が1000を超えています。これ以上書き込みはできません。
【1 OSの種類 .】 Windows**
【2 Excelのバージョン 】 Excel**
【3 VBAが使えるか .】 はい･いいえ
【4 VBAでの回答の可否】 可･否
注意事項
・情報を隠すために別の問題を設定するのはやめましょう。たいていの場合その問題は的外れな設定で、期待していたものからずれた回答が返ってきます。
※前スレ
Excel総合相談所 148
https://mevius.5ch.net/test/read.cgi/bsoft/1643843984/ やりたい事は、特定のフォルダを指定して、その中にあるフォルダ・ファイルの中から最新の更新日を取得する
です。
今考えているやり方は、
①特定のフォルダを取得する（エクセル内にパスの指定あり）
②サブフォルダを含むすべてのフォルダパスを取得
③サブフォルダを含むすべてのファイルパスを取得
④取得したフォルダパスとファイルパスの最新更新日時を取得
⑤その中から一番最新の日時を取得
です。
他に簡単な手順ってあるでしょうか？
ヒントでもいただけるとうれしいです。
よろしくお願いします。 ヒント：
来世はもう少し賢く生まれてこられるかもしれない 前スレ987に回答くれた方々ありがとうございます
LEFTとかmidに*1したら数字だけ取り出せるんですね ただ左から何個文字を抽出っていうのしか知らなかったです あたしゃ未だにこの式の仕組みが分からないまま、
コピペで使ってた。
エクセル関数でどんな文字列からでも数字だけを抽出できる方法！裏技
https://whiteleia.com/%E3%82%A8%E3%82%AF%E3%82%BB%E3%83%AB-%E9%96%A2%E6%95%B0-%E6%96%87%E5%AD%97%E5%88%97-%E6%95%B0%E5%AD%97-%E6%8A%BD%E5%87%BA/
1. 数字＋文字列から数字を抽出する方法
B1が「325ANｱ 品川」の時：
B1 = LEFT(A1,LEN(A1)*10-SUM(LEN(SUBSTITUTE(A1,{0,1,2,3,4,5,6,7,8,9},))))
2. 文字列＋数字＋文字列から数字を抽出する方法
B1が「契約№は、WW2352です。」の時：
B1 = =MID(A1,MIN(FIND({0,1,2,3,4,5,6,7,8,9},A1&1234567890)),LEN(A1)*10-SUM(LEN(SUBSTITUTE(A1,{0,1,2,3,4,5,6,7,8,9},))))
3. 文字列＋数字から数字を抽出する方法
B1が「社員№：20136」の時
B1 = RIGHT(A1,LEN(A1)*10-SUM(LEN(SUBSTITUTE(A1,{0,1,2,3,4,5,6,7,8,9},)))) excel2007使ってます。
オートフィルの結果をデフォルトで「書式なしコピー」に設定することは可能でしょうか？
罫線のある表内の数値をオートフィルで変更しているのですが、毎回「書式なしコピー」で変更するのが面倒でして。 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
【9 VBAの方が簡単で早くできる場合はVBAで回答】 可
行数760くらいの表があります。
a列は1行おきにデータが入っていて、その行は他の列にもデータが必ず入っています。
a列にデータが入っていない行は、他列にデータが入っている行もあれば無い行もあります。
a列のデータなし行だけ1行ずつグループ化したいのですが、マクロはどう書けば良いでしょうか？
a列データなし行は、他列にデータを入れる行だけ展開して、データなし行は畳んでおきたいのです。 配列から好きな列を抽出できる関数ができたらしいけど早くプレビュー版から下りてきて欲しいわ >>9
右クリックでオートフィルして書式無しオプション選択を簡単にするか、範囲選択してF2→ctrl+enterが楽
ctrl+dでは書式もついてくるからダメ スピルとかxlookupとか使いまくりたいのに会社のエクセルが対応するのはまだまだ先
個人的な興味で使うだけと中々経験値が上がらない Excel多用する会社なら費用対効果大きいから365に変えるよう仕向けてみては？ 365に変えて効率化して1日あたり〇〇時間浮きますってなったら後は時給掛けて365の時間当たりの価格と比較 不可能ですよね？使ったことのないものの効果がわかるわけない 世の中システム投資効果をROIやKPIで説明して稟議書回してるけど 関数使う様な定例作業があるなら、lambda関数プッシュしてみるとか？ 出勤簿で
日付テーブルと勤務テーブルをサブフォームを使い入力しています
Excelで入力してたデータをインポートするときに画像のように振り分ける方法がわかりません
https://i.imgur.com/OX2DIsi.jpg >>22
エクセル詳しくないけど、アクセスも詳しくないけど、アクセスにクエリ作ってクエリからデータのインポすればええんちゃうの？
それではあきまへんか？ 大阪人の「知らんけど」ってやつのバリエーションでしょ 第三者のコピペ質問に対して適当に答えても誰も困らん そもそも手を使う理由が分からない
ずーと口だけでやってもらいたいのに
あごが疲れたとか言って
手でシコってるの
手抜きすんなと言いたい >>5
大分違う
取り出した数字は文字列になっているから、*1で数字にしているだけ
で、「A」や「B」に掛け算を行なうとエラーになるのでそこで分岐させている このスレで毎度感じることは、基地外連中のレスには他人に与えるアドバイスなんて物は全く無く、タダ単純にウソを吐いてまでマウントしたいだけ、自己満足に浸りたいだけ。
スレのコテハンに粘着して扱き下ろしてマウントしたいだけ。
そう言う卑しい願望の塊であるから基地外と言われるわけです。
加えて、他人の懐にまで手を突っ込んでみたい願望に溢れた基地外でも有るわけですね。
ですから、レスを付ける相手を取捨選択をせざるを得ないのもこれまた必然というわけですね。 エクセルexcelでの検索で、該当するセル内で「検索した文字のみ」を強調表示することってできますか？
エクセルexcelで自分用の用語集を作っており、Ａ列に単語＆Ｂ列にその説明を記載しています。
だんだんＢ列の１セル内の文字数が増えてきて、通常の検索機能ではセル内のどこに調べたい単語が記載されているか判りづらくなってきました。。。 例えばセルに「ABC」と入力し、
その中の「B」だけ選択して下線を付けてみる。
それで期待した感じになっていたら、
次にそれを「マクロの記録」状態で同じことを試してみる。
マクロの内容を確認し、それを参考に実装する。
俺ならこうする。 ウェブアプリのあるページをエクセルに出力したく、
コピペしたんだが、レイアウトも崩れるし、リストボックスなどのオブジェクト内の値もコピペできていない。
レイアウト崩さず、実行する方法教えてください >>36
PowerQuery使ってやればできるかもね。知らんけど >>29
*1とかwww
普通は型変換関数使うべき
こういう実装依存の方法嫌い >>33
単独質問スレ立てんなや
適当なマークアップエディタ使えや >>43
ダメなんですか？
エクセルを何に使おうが自由じゃないですか。
ちなみに自分は計算とかそういうのはせず、マクロ機能でメールやWebの記事を抜粋してパワポに転記したいのですが可能でしょうか？ >>45
確かに何に使おうが貴方様の自由だけどね。お絵描き専門で使ってる人いるぐらいだし。
だけどそのメールとかwebをパワポに～とかExcelでやるべきではないと思うよ。 余計なお世話ですかね？
好みと感想で決めつけてませんか？ 余計にめんどくさくなるだけ
使うのは自由、わざと茨の道に突っ込むのも、それは自由
>>36の方法はあるかもしれないが、ここのベテランでも分からんというか、
考えるのがめんどくさいから誰もやってくれないと思う それだと思うね。
面倒なことをわざわざやるのはアレだしね 5chは老人の巣窟ですよ。
子供は他所で遊んだ方が良いですよ。 目的とかエビデンスって聞いたことあります？
余計に面倒になるかどうか
目的がわからないければ言い切れないし
エビデンスもなく面倒だアレだって
言うのは小学生でもできるし >>45
用途に沿った使い方をしている人に用途外の使い方を尋ねても良い解は得られないことを覚えた方がいいよ 分からないなら黙ってればいいのになw
まともな説明もできないのにウダウダうるさいわ 逆になぜエクセルで計算するのですか？？自分は電卓で十分だと思うのですが？ 横レスも、理解の助けになるものと、そうでないものがある。
後者は、頭が悪いか、何も考えていない脊髄反応か、
劣化した感情の主であるかが
はっきり分かる。 実例が出せない
ただのぼやき
そして自分のことだって気づいてない
脳が縮小してるからな 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
【9 VBAの方が簡単で早くできる場合はVBAで回答】 可
VBAのフォームからボタン押下でフォームの内容をセルに入力するシートがあります
フォームから1度に6行まとめて入力します
入力位置はシートの文字列があるセルの1つ下に追加していく形です
例えば1回目のボタン押下で3行目から8行目に入力した後
再度フォームからボタンを押下すると9行目から14行目の範囲に入力されるといった具合です
入力する6行のうち2行目～6行目のある列（B列とする）は後から他の行の更新日時を入れます
1行目のB列には2～6行目の最も新しい日を算出する為に
=max(B3:B8)
といった関数を組んでいます
お聞きしたいのは、入力した6行のうち1行目に
max関数など（別の方法でも良い）で自動的に列範囲内の最大値を取る仕組みを構築する方法です
どのような手段があるでしょうか >>72
Range("B2").Formula = "=max(B3:B8)"
以上 >>73
例としてB3:B8を挙げましたが
その後もフォームを使用する度にその下に6行ずつ追加します
その場合Formulaで"=max(B3:B8）"を入れると参照範囲が異なるので困っています 開始行が3行目→9行目→15行目と出来ている事から開始行は取得出来ているよね？
ws.cells(開始行, 2).value = WorksheetFunction.max(ws.Range(ws.cells(開始行 + 1, 2), ws.cells(開始行 + 1, 2).End(xldown)) )
こんな感じのをコードの最後らへんに入れる エラーが出ます、、、、
開始行のとこはそのままで動くのでしょうか？？ おいちょっと待て..
何でVBA可で質問出した
基礎から1回やり直してこい >>72
>入力する6行のうち2行目〜6行目のある列（B列とする）は後から他の行の更新日時を入れます
> 入力した6行のうち1行目に
max関数など（別の方法でも良い）で自動的に列範囲内の最大値を取る仕組みを構築する
２行目は更新日時入れて更に変更するの？
何でそんな無駄な事するのか？ エクセル欲しい、、。
リブレオフィスでお茶を濁してたがやはり似て非なるものとても使いづらい。 なんかヤフーニュースで新しい関数が追加されるとか？？
2021ユーザーの自分涙目 Excel単体ではなくformsとOneDrive使ったあわせ技みたいなのの相談がしたいんだけどそれはスレチ？
スレチなら誘導してもらいたいんだけど（該当スレが見つからなかった） vbaスレに行ったほうがいいぞ
ちょっとスレチだけど向こうの方が高レベルで大体なんでもこたえてくれる
Excel VBA 質問スレ Part75
https://mevius.5ch.net/test/read.cgi/tech/1644384272/ >>88
あなたが欲しいのはきっとPower Automateになると予言しよう >>89>>90
ありがとう
覗いてみるというか既に転載されてて草
>>93
最終的には自分の手から離れるデータだから複雑化は極力したくないんだ
多分そこまで絡めたら使う人が扱いきれない 私物PCで日ごろからエロゲの周回自動プレイやMMOの販売放置などをしており
昼休みなどにちょこちょこ操作していたので不安で発狂しているところです
調べてみたもののプロキシ経由かもわかりません
シングルサインオン後のURLは独自のものではないのですが確認方法はありますか？ >>96
質問する板だいぶ違うからWindows板辺りだと正確な情報得られるのでは？ よくＷＥＢページとかの検索バーみたいに「ここに＊＊＊を入力してください」とか書いてあって
クリックして編集状態にすると消える薄い文字を、エクセルのセルでも再現する方法を知りたい >>99
1つ左のセルにその文章を入れて、条件付き書式で
=COUNTA(入力するセル)>=1
で文字色透明にする とかどうですか >>103
ここでそれっぽいことやってるね。
https://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q1088496845
ただ、この方法だとセルのデフォルト値が
「ここに～を入力してください」の文言となって、
ブランクではなくなることに注意。 普通のエクセルだと、home、endボタンで入力されてるセルの先頭列、最後尾列に
フォーカスが移るけど、365だと同じ挙動にならない
先頭行、最後尾行への移動も出来ない
直す方法は？ お前ら・・・
答え知らないならわざわざカキコするなよ
暇なのか？ >>113
どうでもいいレスしてるお前もヒマそうだな……俺もヒマだよ >>107
そもそも標準のEXCELにhomeボタンとかendボタンなんて存在しない。
どうせボタン作ってマクロで動いてたものを、マクロの方はコピーせずに放置していたとエスパー。 キーボードの話
つまり >>119 はドグサレ野郎 エクセル2021ですがシートの分割をするときにいちいち表示→分割を選ばなければなりません
以前のバージョンでは行と例の隅にそれぞれ分割のスライドバーがありましたがどうやったら出せますか？ バージョンアップで常に機能がアップするわけではありません。 >>126
分割ボックスってやつです
廃止されたんですか？ エクセル2022年度版はいつ出るんでしょ？
今は2021年が売ってるんだけど毎年何月にでてるんだか
今2021を買ってちょいしてすぐ2022が出たら損だしなぁ･･･ Office Insider に参加すると、新しい機能と更新をいち早く入手して、フィードバックを Office に直接送る機会が得られます。 お前はそれ使ってんの？
使ってないのに何で人に勧めるの？ >>135
直近は3年に1回ペースだよ
次は出るとしても2024じゃないかな ドケチは買わない理由しか響かないから
何言っても無駄だよ 了解です、ありがとう
2008年から止まってたんでさっそく買おうと思います すげぇw 慣れるまでに三ヶ月掛かるw PC本体も古いのか？ インスコ出来んぞ？ インストールを省略するとインスコになる理由を教えて下さい
「コ」はどこから出てきたんでしょう？ 非表示にした列や行を含む範囲を漏れなくExcel以外にコピペする方法はありますか？ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否(ただし、VBAしか方法がないのであればVBAでも可)
エクセルで数式を作っているのですが、
可読性を上げるために文字列で数式っぽいものを作成して、
それを別のシートで数式として扱いたいです
どのような手法が考えられますか？
出来ればVBAのない方法が良いです VBAなら比較的簡単に出来るんだけどねぇ
それ以外の方法となると思いつかないなぁ ある計算結果に対して
10の位が存在する時は整数表示で
15 14 13 12 11 10
10の位が存在しない時は小数点まで
9.9 9.8 9.7 9.6 9.5 9.4 9.3 9.2 9.1 9.0
って数字が出るようにしたい
逆に
9.9以下の結果の場合は整数表示で10.0以上は小数点まで表示ってどうやればできる？
RONDD関数とINT関数組み合わせてもうまくいかない if(a1>=10,int(a1),text(a1,"#.#")) =TEXT(A1,"[<10]0.0;0")
=TEXT(A1,"[<10]0;0.0") >>155
VBAで自分好みの関数を作って、その関数をエクセルのシートに設定できるのはご存知でしょうか？
ユーザー定義関数って言うんですけどね。
例えばMyFormat関数を自作して、その中でif文で処理を分岐させて、10以上ならこの型式（Format関数を使う）、10未満ならこの形式ってやってあげれば良いかも。
ユーザー定義関数が面倒なら、Excelの関数で「=if(セルの値が10未満なら,Format(小数点付きの書式)&"", Format(小数点ナシの書式)&"")」みたいなのでどうかな？
「&""」は「これ文字列として扱ってね」の合図ね。 いつまでも派遣でexcelやってていいのか？
お好きなものを選んでください
看護
介護
保育
運輸
物流
警備
農業
林業
漁業
畜産
土方
清掃
飲食
ならすぐ正社員になれるよ >>163
派遣でエクセルやってるほうがマシじゃん 派遣でエクセル、家族持たず将来も考えなければ楽な日常ですよ 理解しようとする気がないだけだろ
行動力とかもないタイプだよ A1のセルが10以上は整数表示で切り捨て
1.1〜9.9は少数第2位で切り捨て
0.1〜0.9も少数第2位で切り捨てって表示したいんだが上手くいかない
=IF(A1<1,ROUNDDOWN(A1,1),IF(A1>=10,INT(A1),TEXT(A1,"0.0;0")))
これで数式は良さそうなんだが 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel 2007
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
Excelにて相談窓口の電話対応件数の業績表を作っています。
1ヶ月20日以上の出勤の場合、1日平均対応回数20.43回（目標値）
21日以上の出勤の場合、1日平均対応回数19.46回（目標値）
22日以上の出勤の場合、1日平均対応回数18.23回（目標値）
23日以上の出勤の場合、1日平均対応回数17.6回（目標値）
など、平均対応回数を表示するセルで目標値を上回った際に赤字とする数式や条件指定は作成可能でしょうか？
1日平均対応回数を表示するセルは「=A1（出勤日数）/B1（1ヶ月の対応回数）」の式を入れる予定です。
※目標値に一貫性がないのは時間によって1回の対応件数を1.15回や1.5回などカウントを変えているからです
※目標値というのは便宜上の名称で、当社では上限対応数と呼称しており、それを超えたスタッフには別途手当を出す予定をしています。 大きなファイルで早く起動させる方法教えて
一つのシートに100万行×8列ほどのデータがあり、それが10シートくらいあるんだけど
（そもそも一つのシートにしたかったのだけど100万行規制があって仕方なく分割した）
20秒くらいかかって、嫌 orz >>179
パソコンを一番高いやつに買い換えるかクラウドを使う
そもそも1千万件のデータなんてExcelで扱うべきじゃない
データベースに入れろ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2013
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 否
y年m月の第x 〇曜日はなん日かを算出したいです
計算式だけでなく、なぜその計算式になるのか解説もお願いします >>182
ついたちにx週を足して、〇曜日から先月末の曜日までの曜日の差を引く
=DATE(y,m,1)+7*x-WEEKDAY(DATE(y,m,0),10+FIND(〇,"月火水木金土日")) エクセルの計算式でスピル使用の2次元配列をバリバリ使いたいと思ってるが、計算結果も2次元配列対応の関数がどれなのかよくわからず、試行錯誤してる状況です。
どこか見たらわかったりしないですかね？
ちなみに以下のような感じで基準がよくわからん。
•四則演算: 対応
•index: 対応
•or、and:
map(A,B,lambda(a,b,or(a,b))はなんとなく対応
lambda(a,b,or(a,b))(A,B)は非対応。1次元に化ける ありがとうございました
ちなみに、indirectはエラーにより計算結果が出ないことを確認しています
なので、他の方法がないものかと探していました
Excelにあまり詳しくないもので、
VBAを作成する決断がなかなか出来なかったので質問させていただきました >>188
orやandはスピルしない
適当に四則計算でもつかってくれ
or=((論理式)+(論理式))>0
and=((論理式)*(論理式))>0
※別に数字でもいいなら一番外側はいらん
lambdaは中身の処理をしてるだけなので中身次第
mapはlambdaに対して配列処理してる >>190
四則演算でand/orになるなんて知らんかったわ。
情報ありがと。
実はFilter関数でand/orの意味合いで四則演算を既に使ってるのに気づいた。これも2次元配列で。
応用が全然できとらんかったわ。 5分に10秒ぐらいPCからﾌﾞｩｰｰｰｰｰｰﾝって高音がなるようになった 耳近づけても何処から鳴ってるか全くわからん、誰か助けて
ちなデスクトップPC >>195
ファンの音
CPUに負荷がかかると冷やすためにファンが高速回転する つまり埃つまりで
PCが熱持って起こったってことか
掃除しろ デスクは特にメンテに気をつかえとWindowsスレで言われた Очень интересные условия предлагают, но отзывов мало... 筐体開ける時はそおっとな 中の人がびっくりするから 【1 OSの種類 .】 Windows11
【2 Excelのバージョン 】 Excel2021
テーブルについて
商品名、累計入庫、累計出庫、在庫、発注をテーブルにしたあとに別シートにある商品名をドロッダウンリストにしたく、データの入力規則から入力値の種類をリストにし、元の値を商品名にするのですがリスト化されていません。
テーブル化した後にテーブルの先頭行「商品名」をアクティブセルにしても下の個別の商品名まで選択されていません。
テーブル作成時に先頭行を～にも、チェックを入れています。
よろしくお願いします。 説明が理解しきれた訳ではないが、そのテーブルの商品名の範囲を名前の定義に追加して、リスト設定の際に設定した名前を使えばいい
テーブルに商品が追加されても追随する 新聞購読を止めて、月3400～4900円、年間40800～58800円の節約
その上日本を貶め、国民を虐げる売国新聞の世論工作の影響力が減って一石二鳥
これはもう新聞購読を止めるしかない どこのスレでもそうだが、毎行改行するひとはやっぱりアタマがアレだな 【1 OSの種類 .】 Windows11
【2 Excelのバージョン 】 Excel2019
【3 VBAが使えるか .】いいえ
【4 VBAでの回答の可否】 否
【5 クエリが使えるか】いいえ
【6 クエリでの回答】否
【7 Accessが使えるか】いいえ
【8 Accessでの回答】否
【9 VBAの方が簡単で早くできる場合はVBAで回答】 否
列１ 列２ 列３ 列４
餌 動物１ 動物２ 動物３
りんご ラッコ くじら たぬき
バナナ きつね くじら カツオ
みかん いぬ ねこ ラッコ
りんご いぬ たぬき きつね
上記のような表に対して、りんごを食べるたぬきが何匹いるか数えたいです
COUNTIFSだと実際にはデータ数が膨大なためかエラーになってしまいます
また、列１の項目が同じ名前のものが複数出てくるのですが、整理方法もわからず
お教えいただけると本当に助かります COUNTIFSってデータ数が膨大だとエラーになるの？ >>206
問題はデータ数じゃない気がするけど
とりあえずCOUNTIFSでどういう式を組んで失敗したかまで書いてよ
それをもとに考えるから a1:a1000000=rand()
b1=COUNTIF(A:A,">"&50)
別にエラー置きなかったぞ A B C D
1餌 動物１ 動物２ 動物３
2りんご ラッコ くじら たぬき
3バナナ きつね くじら カツオ
4みかん いぬ ねこ ラッコ
5りんご いぬ たぬき きつね
=COUNTIFS(A1:A5,別シート$A$1,B1:D5,別シート$C$1）
上記のような感じです。検索範囲とは別シートに餌一覧と動物一覧を作ってます
そちらから抽出したい言葉は引っ張りました 試しにB1:D5の部分をB1:B5にしましたらB列だけの数が拾えました
横列まで範囲にする場合はまた別の式の組み方になるのでしょうか
とりあえず各列で拾うことにします
長々とすみません >>213
=SUMPRODUCT((INDEX($A2:$A5&B2:D5,)="りんごたぬき")*1)
=SUMPRODUCT((INDEX($A2:$A5&B2:D5,)=別シート$A$1&別シート$C$1)*1)
これでいけるんじゃないかな >>213
=SUMPRODUCT((A1:A5="りんご")*(B1:D5="たぬき")) たびたびすみません
りんごとたぬきの種類がたくさんあるのでできれば言葉指定でなくリストのセル指定でやりたいのですがその場合も""で可能でしょうか
後出しで申し訳ありません あと、１つの列にデータがずらっと並んでいて、そこから重複していないデータだけを別のシートに抽出する方法を教えてください
りんご
ラッコ
バナナ
かつお
たぬき
が並んでいる場合、バナナだけを抽出したいです >>221
試してみましたが自分ではダメそうでした
元データの作り方がそもそも悪そうなのでこれをなんとかします
色々教えていただいたのに申し訳ないです >>222
フィルター関数が使えないからピボットテーブルだな 【1 OSの種類 .】 Windows11
【2 Excelのバージョン 】 Excel2021
【3 VBAが使えるか .】 はい(少し）
【4 VBAでの回答の可否】 VBAのみの回答希望
文字列として入力されている時刻を計算ができるようにVBA（timevalue）eで時刻表示にしたいのですが、24：00以上はエラーになっていまします。
回避方法を教えてください。
サンプルコード
For Each acell In selection
acell = TimeValue(acell)
Next acell >>222
作業列を二列使っていいなら思い付きはした
作業列一列目を
=COUNTIF(検索列最初の絶対値セル:検索する列の相対値セル,検索する列の相対値セル)
を下にコピペしていくことで、検索するものごとのそこまでの範囲の個数を求める
作業列二列目を
=(SUMIF(検索する列の範囲,検索するものの相対値セル,作業列の範囲)=1)*ROW()
にして、あとは表示させたいシートで
=INDEX(検索したい列,MATCH(LARGE(A1),作業列二列目の範囲,0))
で下にコピペしていけば、重複なしのデータを抽出できるんじゃないかと >>228
この質問者はろくに礼も言えない様なので今後は無視でOK >>225
For Each acell In Selection
temp = acell.Value
acell.Clear
acell.Value = temp
Next acell
こんなんでええか >>234
ありがとうございます。
できました。！
今回の場合は、acell.Clear がなくても使えました。
>>237
表示形式は変わりますが、あとで再設定すれば大丈夫です。 【1 OSの種類 .】 Windows11
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】はい
【4 VBAでの回答の可否】 可
【5 VBAの方が簡単で早くできる場合はVBAで回答】 可
セルにハイパーリンクを挿入した際に
直後はリンク先にジャンプできるのを確認できたものの
ある時点でそれが飛べなくなってリンク先が参照できない
といったエラーが出るのですが
そうならない為にはどうすれば良いでしょうか
ひとまずオートシェイプを作って
それにリンクを貼ればこの現象は回避できるのですが
リンクを結構たくさん作るシートなので
オートシェイプが増えて重くなって悩んでいます >>239
hyperlink関数にしてみては
ハイパーリンクの挿入はどうにも挙動がおかしい 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel365
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
3から４行ごとに区切られたデータをコピーして行／列入れ替えしたいのですが、1700件ほどあるので
マクロだと終わりません。ご教授おねがいします。
国分加奈 →国分加奈 女 0952106646
女
0952106646
石田沙也佳 →石田沙也佳 女 0481511484
女
0481511484
中里裕晴 → 中里裕晴 男 02789452
男
02789452 >>240
ありがとうございます
hyperlink関数と挙動が異なるのですね
てっきり同じ扱いだと思い込んでいました
早速明日職場で試してみます >>241
たった1700件のマクロが終わらないはずがない
画面の書き換え止めてみ >>243
最下行から空白行から空白行を選択しコピー。
右にオフセットして行・列入れ替え
左にオフセット
というマクロなんで、ctrl+qを割り当てして、キーを押しっぱなしのマクロなんです。 マクロ分からないなら関数とオートフィルで解決すれば？ >>244
そのマクロをループすればええやん
ここに貼り付けてみ >>244
国分加奈がA2だとして
B2に =IF(A1="",A2,"")
C2に =IF(A1="",A3,"")
D2に =IF(A1="",A4,"")
で下までコピー。
いらなくなった行はフィルターで消す >>247
Selection.End(xlUp).Select
ActiveCell.Offset(-2, 0).Range("A1:A3").Select
ActiveCell.Activate
Selection.Copy
ActiveCell.Offset(0, 1).Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
Selection.End(xlToLeft).Select
Selection.End(xlUp).Select
Selection.End(xlUp).Select
Application.CutCopyMode = False 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel365
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
あるセルに数字を入れた場合に、隣のセルの同じ行から数字分下の行まで色付けをしたい。
例）
A3に10という数字を入れたら、B3からB12までセルが黄色で色付けされる。
よろしくお願いします。 >>251
即レス、ありがとうございます。
方向性がわかったのでVBA勉強してみようと思います。 >>249
While 1
Selection.End(xlUp).Select
ActiveCell.Offset(-2, 0).Range("A1:A3").Select
ActiveCell.Activate
Selection.Copy
ActiveCell.Offset(0, 1).Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
Selection.End(xlToLeft).Select
Application.CutCopyMode = False
Wend
最後はエラーで勝手に止まる 自分のExcel力がどの程度なのかを簡単に調べるサイトあったら教えてくれ ここだろ
何ができるか、3個あげてみろ
速攻で判断してやる 交通費の集計に使ってる
乗車駅降車駅を入力すると、金額と使った路線が一覧表に入力される
勿論新規の駅名と路線、金額の対応表は随時追加更新してやらなきゃいかんが、一度対応表に入った分は自動的に引っ張ってこれるので手間が減る ミジンコレベル
まず、会話ができない人
しかも出来ることは起動、入力、結果の確認w
いると周りの生産性落とす存在 本末転倒だがExcelレス化が最終到達地点だと思う おみくじみたいなもんか
>>260
・winapiを呼び出して他のプログラムにアタッチしてメモリ操作
・Seleniumでスクレイピング
・他部署と交渉して自分のフォームに入力させて生産性アップ >>259
この過去スレの質問をどれだけ解けるかで分かる
碌でもないのはパスしていい
プラスでコピペ質問判定士にもなれる 何故excelでできることを書かないのか？
マジで会話できない人？
>>264
＞おみくじみたいなもんか
＞
＞>>260
＞・winapiを呼び出して他のプログラムにアタッチしてメモリ操作
＞・Seleniumでスクレイピング
＞・他部署と交渉して自分のフォームに入力させて生産性アップ セルの計算結果を挿入したテキストのように自由に動かせるようにするやり方教えてください！ 何を言っているのかわかりません！
具体的に操作と画面の動きを書いてください！ マウスでセルの上下左右どれかの枠を掴んで移動させる
マウスカーソルの矢印の先っちょが枠に重ならないと掴めない >>264
xlsxファイルでおみくじつくって遊んでみたらどうだろう
揮発性関数の特性使えばマクロなくても作れるのが理解できるなら、初心者は卒業できる >>275
秒で出来たぞ
=LAMBDA(r,IF(r>0.8,"小吉",IF(r>0.5,"吉","凶")))(RAND()) ハイパーリンクで、他のファイルを開こうとすると、警告ダイアログが出ますが、
（「ファイルには、ウイルスやコンピューターに問題を…」）
非表示にできますか？
レジストリでDisableHyperlinkWarningをやっても、ダメでした…。 >>254
ありがとうございます。数えたら3000名でしたのでフリーズしました。変数 回数を数えて500で止まるようにしたらできました。 外部からコピーしたテキストをExcelに貼ろうとすると、Excel内で以前コピーした内容を優先されて
外部のコピーの内容が無視されてしまいます
レジストリでAcbControlを弄れという記事を見ましたが、確認するとAcbControlの値自体がありませんでした
自分でAcbControlを作っても、Excelのクリップボードを無効化できますか？ それとも他に方法がありますか？ 見た目全く同じ漢字で、コピーしてもクリップボードの内容が書き換わったりしないのに
ソートすると全然別のところに分かれる事があります
具体的には先頭の一文字が水なんですが、カタカナのンの後に水がくるセルと
ミが並んでる中に唐突に挿入される水のセルがあって
見た目は全く変わりないので、どうしてそうなるのか全く分からないんですが、どういう事なんでしょうか >>284
全く同じ見た目だけど、中国の漢字で別の文字。これは文字コートを見ればわかる
全く同じ文字だけど、違う場合はフリガナの有無 だからその関数は何って話
知らないのに書かなくていい そうそう
色々な方法があるから試行錯誤してみればいいよ 関数は何？っていうか、まんまな関数名だと思うけどw なんかよ、定期的に「答えるな」とか「関係のない書き込みするな」とか食ってかかるヤツがいるけどなんなんだ？
嫌ならこの板に来なければ良いのに。
変わった人だな。 >>294
現実で誰にも相手にされてないから、なんとかプライドを保とうと頑張ってるんだお・・・
察してあげてお・・・ >>285
>>287
ありがとうございます
ふりがな表示すると、その場で入力した水の文字にはふりがなが付いて、
ンの後に来る水はふりがなが入ってませんでした
どうしてそうなるのか分かりませんが、ふりがなが入ってる方の漢字は、ods形式で保存してMySQLに取り込ませると
ふりがなつきの漢字の部分が消えてしまって（水○○→○○ 水の字が消えてしまう）、困ってました
ふりがなは表示されないだけで内部的にはデータを持ってるっぽいのですが、Excelへの直接入力時でもふりがなを持たせないようにする事は出来るでしょうか？ 下手な事やるとまた「検討違いなこと貼るなよ」とか書かれるぞ構ってちゃんに 何書かれても痛くも痒くもないから知らんぷりしてればおｋ
先ず、どっかからコピーして来るんだろ？その元データは何なん？
サイト？他Excel？ｃｓｖとかのテキストデータ？ それらがどの文字コード使ってるかでも
挙動が変わることは稀によくある
範囲選択してCtrl+ｃでコピーしたと思っててもクリップボード空っぽ とか 最近そういうサイトも多い
どうしても保存したいエロ画像だけど何やってもコピー・保存出来ないとか ←？？？
その取っ掛かりのコピーがちゃんと機能してるかの判定のが第一歩なんでは？ >>271
テキストボックスにセルの計算結果を反映させることではないかな
テキストボックス選択して数式バーに=入力してセル選択 同志達凄いな、いろんなサイト知っているのはググる能力高いな。 >>306
他になにをしたいんだ？ 文句言うより先にしたいことを書きなよ
文句言うだけなら猿でもできる そこからもう一歩踏み込むことが肝心 >>312
ほんとそうだよな
>>312とかまさにそれだは 変なツッコミ入れてくるから回答側も気分悪くして答えなくなるんだわ。
ツッコミ入れるなら自分で答えれば良い 俺は気にせず回答してるぞ
変なツッコミは在日韓国人ですかあなたって言えば瞬殺できるから問題なし
正直韓国人扱いするのはちょっと気が引けるけどな。さすがにキツすぎるかな 最低すぎて草
韓国人ですら韓国人と言われるのを嫌がるというのに その手があったな
道筋ずらしてくるヤツや荒らしてくるアフォは在日認定で。 >変なツッコミ入れてくるから回答側も気分悪くして答えなくなるんだわ。
だったら、黙っとけよって思うわ ベータチャネルバージョン
TEXTBEFORE関数/TEXTAFTER/TEXTSPLIT関数
VSTACK関数/HSTACK関数
TOROW関数/TOCOL関数/WRAPROWS関数/WRAPCOLS関数
TAKE関数/DROP関数/CHOOSEROWS関数/CHOOSECOLS関数/EXPAND関数
エクセルについてもっと知りたいですか?
「Excel の新機能」を参照し、Excel ブログを購読して最新の更新プログラムを入手してください。
私たちや世界中の他のExcelファンとのつながりを保つ -
https://techcommunity.microsoft.com/t5/excel-blog/announcing-new-text-and-array-functions/ba-p/3186066 新しいの追加はいいけど、職場先のVer.が2019のままなんだよな excel2019使ってます。
オートフィルの結果をデフォルトで「書式なしコピー」に設定することは可能でしょうか？
罫線のある表内の数値をオートフィルで変更しているのですが、毎回「書式なしコピー」で変更するのが面倒でして。 右フィルでコピー後、0(ゼロ) そのぐらいの手間を惜しんではいけない
手持ちの道具で闘うしか無い 個人用ブックにマクロを仕込んどいてクイックアクセスツールバーにそのマクロを登録
残業代とか頭の悪い発想しか出来ない奴はよく反省する様に んー どっちかっつーと、残業代(とは呼ばないが)出す側 >>333
ダラダラやって時間かけて残業代ドロボーしてるんか? と思われがち。 残業時間になると井戸端会議を始める同僚にはイラッとする。
残業申請時間の30～40分前になって急に仕事しだすのは滑稽だし。 緊急です！
マクロの入ったボタンが図だかイラストになってしまい困ってます。
直し方のアドバイスお願いします。 >>343
ご無礼なのは承知なんです
てすが緊急なんです、うちの会社内では解決できませんお許しけださい そういや前にうちの会社でもExcelで似たような事起きて騒ぎになってたな… というかわざわざマルチしてまでレスしてる時点でマジで緊急なんだろうな は？マルチいいじゃん
その方が早く答えが見つかるし
マルチがダメな理由、言えないだろ？ 前にExcel壊れて似たような状況に遭遇したことあるから必死だろうしパニックになってるだろうから笑えない 本当に今大騒ぎになってるんです
顧客情報とか配送先とか全部情報が拾えないほんとに緊急事態なんですお願いします！
詳しい人が普通会社誰もいないです！ つーかそのボタンは直せないよ
ボタンを作り直さないと
Alt f11でIDE開いてみろ ボタンが何らかの拍子にイラストファイルになっちゃったから何とかしてボタンに直したいんだろうなぁ >>353
多分それやってもわかんないと思うよ
多分ここで聞いてんのただの事務員だろうし >>353
要するにマクロそのものが吹っ飛んじゃったってこと? すいません拡張子って何ですか？
それを帰ろと言われてます とりあえず顧客に頭を下げてFAXでリスト送って頂いたのでしばらくはなんとかなりそうですが>>353とかは開いても全員サッパリ意味不明なためどうしようも無さそうです…
（エクセルファイル作った方自身が既に会社にいないのでどうしようもない）
とりあえずエクセルファイルがどうする事もできないため私と社長ら数名は土日も休日出勤して1月〜4月までの記録も全部紙ベースの資料に手書きで書き写す事になりそうです
しばらくは紙とペンでのアナログなやり方で回すしかないですがアドバイスくださった方ありがとうございました クラウドワークスみたいな副業サイトに1万円くらいでボタン直してくれって依頼上げたら殺到するのでは
土日出勤するくらいならその方が楽そう 拡張子も知らんのか そら、どこぞの添付ファイル勢いよく開いてランサムウェアに引っ掛かろうってもんだ
Emotet(エモテット)とかいうのも流行ってるようだし、昨今はセキュリティ対策してないと取引停止に成るぞ？
.xlsx を .xlsm に変えるだけだったりする説明を受けてるのか？ そもそも拡張子見えてるのか？
デフォルトで拡張子隠したりしてないだろうな つかエクセル作るだけ作って仕様も教えず辞めてくとかどんだけ無責任な奴なんだろうな >>363
予想するに扱いがひどかったんじゃないかな
全部そいつに何でもかんでも押し付けてそう
まー周りが拡張子もわからず、勉強しようともしない奴らじゃIT介護も疲れるってもんよ あれじゃね？
その酷さじゃ、誰かがxlsxで保存したとか有り得そう
その場合、ボタンが壊れたとかそんなレベルの話ではない >>363
>>365
ごめんなさい、本人の名誉（？）のために理由をお話ししますと2年前にコロナで亡くなってしまったらしいです… >>342
わからんけどデザインモードになってるんでないか、開発タブ
いや違うな xlsxで保存されてたらマジでアウチだろうな
xlsmからxlsxなら故意だろうがxlsからxlsxなら分からんかもな >>373
マクロの事よくわかってない人間が、ウィルス的な物だと勘違いして「このファイルにはマクロが含まれています・・・」のポップアップに誘導されてxlsx化する事もある。
無知は罪。 まぁマジレスすると、ココナラあたりで高評価な奴に頼むのがいいかと。
クラウドワークスは申し訳ないけど、当たり外れが酷い認識。 使ったことないのにテキトーにコメントしてるの見え見えで草
無理に話に合わさなくていいから ボタンが何らかの拍子にイラストファイルになっちゃったから何とかしてボタンに直したいんだろうなぁ そんな事が起こり得るのかの検証 こうすればボタンはイラストに出来る が事例としてあるならその逆をするだけ
ささやかなおれの知見の及ぶ限りでは、そんなことは有り得ない 無職職歴なしの糖質52歳です、、、
毎日が日曜日なので何もやる事がないです、、、
だから毎日5chに張り付く
ナマポ生活が楽なので、これからも社会人になる気はありません、、、 つまり、質問者の質問の内容に疑義があると思われる
ボタンがイラスト のように見えたからそう書いたが、実は「ボタンが反応しない」だけなのかも
クリックしても反応しない クリック出来ない これは絵に成ったのに違いない 「ボタンがイラストに成りました・・」 ←
右クリでプロパティ見て、そのオブジェクトが何なのかを解明する必要はある
そういう多角的な視点が無いと 「役に立たないこと書いた」 とかしか発想できない層に成り果てる ファイルを開いていない状態なら拡張子を .xlsm ⇔ .xlsx は自在に変えられる
都度「拡張子を変更すると、ファイルが使えなくなる云々」のダイアログが出るが「はい」で可能
m だったのに x にしてしまうと開く時に「Excelファイル"○○"を開くことができません。ファイル形式または云々」
とメッセージされ全く開けなく成る
それを元通り m にすると、開いた画面上部に新たに黄色い帯で「コンテンツの有効化」ボタンが表示される
それをクリックして有効にしないまま、いつも通りボタンを押そうとしても反応はしない
これではないかと
メールで添付する時などに m のままでは送信すら出来ないこともあるからと、圧縮するよりは一文字変えちまえ
で安直にやり取りした結果のように見える 拡張子の質問が挟まれてる段階でこれかと
zip にしたらしたで、また他の面倒が大きくなるから文字変更で済まそうとした成れの果てのトラブルではと
社内のExcelやPCリテラシーの向上が切に望まれる もうここにくるなよ？
早く時間無駄にしてることに気づけよ アンタが一番役に立ってないwww
しかももう解決してるし
>>383
＞つまり、質問者の質問の内容に疑義があると思われる
＞ボタンがイラスト のように見えたからそう書いたが、実は「ボタンが反応しない」だけなのかも
＞クリックしても反応しない クリック出来ない これは絵に成ったのに違いない 「ボタンがイラストに成りました・・」 ←
＞右クリでプロパティ見て、そのオブジェクトが何なのかを解明する必要はある
＞そういう多角的な視点が無いと 「役に立たないこと書いた」 とかしか発想できない層に成り果てる 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2019
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否（VBAなら可能、という回答であれば一旦自力で勉強してみます）
ひと月ごとにページを分けて管理している小遣い帳にpixiv fanbox等の支援金額の管理を追加しようと考えています。
例えば、
作者 支援開始日 支援終了日 金額
〇〇 2022/3/19 2022/6/3 500
△△ 2022/4/8 2022/8/28 300
と入力した場合、3月から6月の各ページに500円、4月から8月の各ページに300円が自動入力されるようにできるでしょうか。
もしくは足し算して3月に500円、4-6月に800円、7、8月に300円、という動作でもいいです。
支援開始日3/19 金額500 と入力した時点で3-12月に500円が入力され、支援終了日6/3と入力すると7-12月の500円が
削除される、という挙動であれば最適なのですが。 いくつか案があるけどできれば今のシートとフォームの構造見ながら説明したい。スクショを提供してくれる？
>>388 ttps://light.dotup.org/uploda/light.dotup.org27185.jpg.html
ありがとうございます。こんな感じです。office hackを参考に作りました。
項目のプルダウンメニューで選択して予算の行に金額を入力すると予算が積み立てられ、使用の行に金額を入力すると積み立てられた予算から引かれます。
予算の行に金額を入れると収入から減額されて残金に反映されます。使用に入力すると予算からは減額されますが残金には反映されません。
集計のページは予算と使用の1年分の集計、設定はプルダウンメニューの項目の設定、引き継ぎは前年の予算の残金を入力するページです。
予算の振替は個別予算からマイナスして残金にプラスされます。予算の振り直し用の項目です。
貯金の引き出しは貯蓄計からマイナスされます。残金は「収入計マイナス貯蓄計マイナス予算計」という計算式になっています。
左側に「Fanbox」等の項目を設けて合計金額を表示し、収入計からマイナスようかと考えています。
どこまで説明が必要かわからないので長くなりましたスイマセン。 ttps://light.dotup.org/uploda/light.dotup.org27187.jpg.html
自分の名前が残っていた…。orz 上げ直し。 >>394
一応エゴサしたけど別人やで。
>>395
表の構造が分かる程度にデータ入れたつもりだけど後何が必要？ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2021
最近エクセル2021に変更しました。以前は2007？です。
よくWindowsをスリープにするのですが、たまに間違ってシャットダウンしてしまいます。
2007の時は「ファイルが開いてますがシャットダウンしますか？」みたいな警告が
出てたのですが、2021は警告なしでシャットダウンしてしまいます。
これを警告が出るように出来ますか。 >>398
オプション調べてみましたが分りませんでした。
おｓえてください。 ピボットテーブルでファイル開くときの自動更新させた場合に空白以外を表示させるフィルターの掛け方おしえて
ピボットの参照データが増減するため >>397
知らんけど、ノートなら蓋閉じてスリープにするとか、シャットダウンとスリープの手順を変えたほうがいい。 >>379
そもそもその手順自体知らないんじゃないか
逆も然り ボタンが何らかの拍子にイラストファイルになっちゃったから何とかしてボタンに直したいんだろうなぁ ファイルを開いていない状態なら拡張子を .xlsm ⇔ .xlsx は自在に変えられる
都度「拡張子を変更すると、ファイルが使えなくなる云々」のダイアログが出るが「はい」で可能
m だったのに x にしてしまうと開く時に「Excelファイル"○○"を開くことができません。ファイル形式または云々」
とメッセージされ全く開けなく成る
それを元通り m にすると、開いた画面上部に新たに黄色い帯で「コンテンツの有効化」ボタンが表示される
それをクリックして有効にしないまま、いつも通りボタンを押そうとしても反応はしない
これではないかと
メールで添付する時などに m のままでは送信すら出来ないこともあるからと、圧縮するよりは一文字変えちまえ
で安直にやり取りした結果のように見える 拡張子の質問が挟まれてる段階でこれかと
zip にしたらしたで、また他の面倒が大きくなるから文字変更で済まそうとした成れの果てのトラブルではと
社内のExcelやPCリテラシーの向上が切に望まれる だからさｗ ExcelのSheet上に「イラストファイル」って何なん？ｗ
書いてて不自然と思わん？ 画像に変わった、とかならまだしも ファイルの意味判って使ってる？
挿入-画像 で「イラスト屋」からDLした画像を貼り付けた とかならまぁまぁ
テキストファイルからテキスト貼り付けてもテキストファイルじゃねーぞ 真性なのかふざけてるだけなのやら >>409
拡張子って何ですか？と言ってる様なレベルなので多分そんな事すら高度すぎて出来ないかと 知恵袋に同じやりとりの応酬があるんだがツッコミも含めてコピペ自演 ？ リンク貼って 自演と言い張るなら 貼れないならフェイク ざっと見だと見当たらなかった
オリジナルはこっちだと思う アッチの人間はあたまがアレな人が多いから 知恵遅れは回答するとポイントが貰えるから、何もわかってなくてもとにかく書き込もうとする人が多い 知恵袋の知恵コインだっけ？
あれ換金とか景品に変えられねーの？ そんな事が起こり得るのかの検証 こうすればボタンはイラストに出来る が事例としてあるならその逆をするだけ
ささやかなおれの知見の及ぶ限りでは、そんなことは有り得ない VBAスレの住人だが確かにボタンがシェイプになるなどあり得ないと言っていいだろう。
そうすると考えられることとしては、元々シェイプにマクロが登録されていて、それが動かなくなったと騒いでいるのではないかと思われる。
恐らく図形にロック設定がしてあった状態でシートのロックでもしたのだろう。
ならその辺のロック解除すれば終わりな話だな。 イラストだろうが図形だろうが
張り付いてりゃシェイプだろ？ 思い付いた言葉なんでも並べりゃいいってもんじゃない 専門板なんだからここはひとつ専門用語で頼む
Excel イラスト でググってもロクなもんが出てこない 図形や画像ならまだしも クリップアートですら絶滅してる 図形はshapeオブジェクトでボタンはButtonオブジェクトだからそもそも全然違うものだし 不動産の空き部屋リストで空いてる部屋と客付き部屋と改装中の部屋をソートでなく項目ごとに出せるようにする方法ってありますか？ アバウト過ぎてｗ
縦に部屋番号がズラッと入力されてて、横にその部屋の項目がいくつか並んでて、そのうちの一列に
空き・入居中・改装中 の区別が入力されてるとしたら、ドロップダウンリストで絞り込める ボタンがイラストって、誰かが違うソフトで開いちゃったんじゃないの?
Googleスプレッドシートとか。 これはもう
朝起きたらEXCELのボタンが女の子になるのをまつしかないな >>433
ざっくりですみません
ありがとうございます！ 以前に使われていた名称
クリップアート
↓
オートシェイプ
↓
シェイプ ←いまここ 自力解決したかも。
作者 開始日 終了日 金額
a 2019/1/3 2020/5/18 500
b 2020/5/30 2022/2/3 317
c 2018/10/5 2023/8/10 7
amazon 2022/1/5 2022/1/30 73
netflix 2022/8/3 2022/12/31 10001
d 2022/1/15 2022/2/11 71
というデータがあるとして、
sumifs(金額の列,開始日の列,"<=2022/1/31",終了日の列">=2022/1/1")
2022/1/31までに開始かつ2022/1/1以降に終了したものという条件なら2022年1月分の課金を取り出せる。
多分これで大丈夫だと思うんだけど何か穴があるだろうか。 ミスった。
作者 開始日 終了日 金額
a 2019/1/3 2020/5/18 500
b 2020/5/30 2022/2/3 317
c 2018/10/5 2023/8/10 7
amazon 2022/1/5 2022/1/30 73
netflix 2022/8/3 2022/12/31 10001
d 2022/1/15 2022/2/11 71
これで>>443の式なら結果は468になった。 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2021
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 否
46-ABC-25-2-67-95
これを
46
ABC
25
2
67
95
する数式はありますでしょうか。 46が4652になったりＡＢＣがＡＢになったり
桁数が変わることはありますか？ >>446
46-ABCD-25-02-6751-951 区切り記号による列の分割 = Table.ExpandListColumn(Table.TransformColumns(変更された型, {{"データ", Splitter.SplitTextByDelimiter("-", QuoteStyle.Csv), let itemType = (type nullable text) meta [Serialized.Text = true] in type {itemType}}}), "データ")
M数式でお答えしまスた。 M言語ってなんでこんなクソ面倒臭い言語仕様を採用したんだろうな 若しくは、
実務だとその図番のようなものが数十、数百と有るのだろうからウィザードでやるとしたら ：
先ず、その図番のリストをすべて選択した状態で、メニューの[データ]内にあるデータツールブロックの
[区切り位置]
するとウィザードのダイアログ1/3が出てくる、それはそのまま[次へ]
2/3の画面内で、区切り文字で[その他]を選択し、枠内に - (ハイフン) を手入力 したら[次へ]
3/3、下段のデータのプレビューを見ながら必要な列を文字列に 念のため全部の列を文字列に
しとけば 03 だの 0014 だのに分割された数値の前ゼロが消えずに済む
次に中段の表示先の枠内を選択し、変換後のデータが欲しいセル位置をクリック
デフォルトの文字が選択されたセル位置 =$D$2 とかに変わるので [完了] をクリック 一つのExcelウィンドウの内部に、各ブックが子ウィンドウとして表示する方法が知りたいです。
Windows10でExcel office365を使っています。
以下の記事のようにExcel 2007／2010の場合、エクスプローラーから複数のExcelファイルを開くと、
一つのExcelウィンドウの内部に、各ブックが子ウィンドウとして表示されました。
https://atmarkit.itmedia.co.jp/ait/articles/0708/10/news133.html
今では別々のウインドウで立ち上がるようになったのですが、
昔のように一つのExcelウィンドウの内部に各ブックが子ウィンドウとして表示するにはどうしたらよいでしょうか？ 2013以降は出来なくなりました メニュー部分が無駄ですが、メリット・デメリット比較して辞めることにしたかと Teamsなどのオンライン会議で複数のExcelファイルを画面共有する時に便利かなと思ったんですよね…。いちいち共有画面を切り替えないといけないから（でもデスクトップ全体は共有したくないとき）。 アチコチのBookから必要なSheetだけをひとつのBookに取り込むことは出来ないのか？ Teams用として？
どうせ子ウィンドウにしても何十とは表示したり互い違いに切り替えるのは大変だろうに >>463
PowerQueryで、他のbookのテーブルやクエリー以外に
定義範囲やsheetごと取り込みは出来たかと。
いちいち更新が必要なのと、
選択するときのテーブルとsheetのアイコンの違いが細かすぎて
区別が付きにくいけど。 プルダウンの中身、その時だけちょっとだけ変えたいとか出来ますか？参照元はいじらずに ありがとうございました、私も色々調べたのですがやはり無理なのですね >>445
[行方向]
=LET(対象,A1,
区切,"-",
数列,SEQUENCE(LEN(対象)),
開始,UNIQUE(IFERROR(FIND(区切,区切&対象,数列),1)),
終了,UNIQUE(IFERROR(FIND(区切,対象,数列),LEN(対象)+1)),
IFERROR(MID(対象,開始,終了-開始),"") )
[列方向]
=LET(対象,A1,
区切,"-",
数列,SEQUENCE(1,LEN(対象)),
開始,UNIQUE(IFERROR(FIND(区切,区切&対象,数列),1),TRUE),
終了,UNIQUE(IFERROR(FIND(区切,対象,数列),LEN(対象)+1),TRUE),
IFERROR(MID(対象,開始,終了-開始),"") ) 試験問題で、赤の角丸四角のヶ所だけが空欄の問題だったら10分 15分で「もっとがんばりましょう」
実務だと、左側の日付、店舗、商品、売上だけのテキスト明細がズラッと並んでいるものが渡され、
レイアウトから何から考慮する必要があるしボリュームもこの数十倍はあると思われるので30分
もっと言うなら、曜日分類は平日・土日だけの二択にまったく意味は無いので、祭日だの季節ごとの
長期休暇だのを分類するためもう少し加算していいかも
現実は電話応対や接客応対、上司同僚からの別件依頼だの無駄口要請だの横やりだのが混ざるから二時間 >>470
途中で入力ミスをしないなら15分で終わらるけど「もっと頑張りましょう」か
関数を入力するときに" "を打つのが面倒くさいんだけど簡単に打てる方法無いかな？ まだ使い始めで調べてもわからない操作方法があります
セルではなく
あるセル一帯（例えば印刷一ページ分）を
そのままコピーして１枚目の一帯に挿入する方法は
どうしたら良いのでしょうか
これがわかるとかなり効率化できるので嬉しいのですがわからずで >>473
ハローワークの職業訓練を紹介してもらい受講するとよいです。
この質問だけで終わりそうにはないですから。 >>453-458,468
ありがとうございます！ この手の今後の更新まで考えてない腐りやすい表ばかり何で紹介するのかね
>>474 の言う通りピボットテーブル1択だよ >>474
ピボットテーブルで列ラベルにフィールドが複数あって
値にも複数フィールドある場合で、
列フィールドの粒度で値が集計されるけど
総計だけ全てのフィールド表示させて、個別の特定の小計列フィールドは非表示にさせることってできる？ >>479
試してできないから
教えてもらいたいんだろ馬鹿 ハロワ職業訓練ね
身内が受講したから感想聞いてみたけど。。。
あれ、Excel講師の教え方ヤバくないか基本的に？
テーブル機能を、「テーブルというのは表をオサレにするためにあるのですよ～、ねー綺麗な色つくでしょ～笑」とか教わったらしい。
なんでウソ教えるのだ講師なのに？？ ハロワの職業訓練て本気で学ぶ人が行くところじゃなくて給付金貰うために行くとこだからそれで良いんでないの 先生もピンキリ
たまにやる気のある先生も来るけど生徒の方がやる気なさ過ぎてすぐに心が折れちゃう 逆に、クエリとかリストオブジェクトを教えて理解出来るのかね? 職業訓練のトレーナーはたかが知れている。
PC教室はトレーナーの知識の格差が激しいと聞いた。 独学で理解できる事を教室で習うのは時間とお金の無駄､無駄､無駄ァ 独学で理解できることを教室で習うのは習うのに費やす時間とか習うための環境を買っているのだ
教室に通っている期間中に講師に質問すれば何らかの答えが返ってくる、その情報料という考え方もある 君らやたらとハロワの職訓に詳しいな？ と思ってざっくりググったら
失業中ならほぼほぼ無料やんけ だっふんだよ
一般人が受講する場合は年間10万とか出てきたんだが？ 出す？そんな？
しかも一般だと中々受講資格そのものがもらえないようだし
無料の講義だとシルバーさんが古い知識で教壇に立つ可能性だって大きいだろ？
Excel2021の新機能質問したってアワアワ狼狽えっちまうんじゃないのか？ 君らそこの教員なのか？ Excelって仕事で使う範囲以外だと
モチベというか目的がないから新しい事をどんどん吸収しにくいんだよね
こういう悩みやと安くてもいいからクラウドワークスとかで色々ゴール決めるのも有効なのかね だよね
2021や365を導入している企業はまだまだ少ないみたいだし。 例えばの話だし ハロワの職訓のVerも知らんけど
とは言え、上に出てきた区切り文字"-"の対応だって LET 使ったのを古いVer使ってる
相手先に送ったりしたら機能しないじゃん？ だからっていつまでもひとつふたつ古い
Verを想定して作り続けるのもなんだかなあだし
情報戦に巻き込まれてランサムウェアで親会社工場停止とか、ついこないだ見たばかりだろ
そのためにもあれもこれも最新版で揃えようとかいう機運には成らんのかね？君らの会社は？ そもそも職業訓練でExcel学ぼうとする人のレベルもピンキリで罫線の引き方も文字色の変え方もセルの色塗りも知らない人にピボットテーブルだのVBAだの教えてもしょうがない ま、平日日中好きなこと書き込めるってことはおじーちゃんかフリーランスぐらいか
前者はどうでもいいけど、後者だったらせめて365にしときなよね
つか、後者なら本業務なんだし複数Ver揃えてなきゃダメだわな >>482
嘘ではないけどなw
構造化参照が理解できないだけで 弟が去年訓練校に通っていましたけど、Ver.は365だったみたいですわ。
だけどそんなLetだのXLOOKだのは習わなかったと。
VLOOKで終わったみたいな事言っていたっす。 XLOOKUPって言うほど使っているか？？
あんま見ないぜ使っているヤツは 周りがみんな365なxlookup使うよ
そうではないのでｉｎｄｅｘｍａｔｃｈを使い続けている 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 可
番号の自動付与の効率的な方法を教えて下さいm(_ _)m
伝票番号に対して、その取引内訳となる伝票行が複数あるものがランダムに発生します
例：
A列に伝票番号が220421，220421，220421，220422，220423，220423とあったとします
B列に伝票行の番号として1,2,3,1,1,2と自動付与していきたいです
関数を用いて、伝票番号が220421のように複数あるものは上から連番を自動付与させたたいです
ご教授のほど宜しくお願い致します 伝票番号が日付順に整列済であれば簡単だけどランダムだと面倒だな 伝票番号は並べ替えられてる前提で
セルB1を選択し =COUNTIF($A$1:A1,A1) としてEnter
再度B1を選択 フィルハンドルをダブルクリック 書きそびれたが、LibreOfficeのCalcでも同様の操作で可能 >>506-508
有難うございました！
身近な関数で簡単にできるとは・・ >>507
その式ならA列が順に並べ替えられていなくても大丈夫では ホンマや 整然好きな俺には気付かなかった ㌧
因みに Google Spreadsheet でも可能 と付加しておく 使うこと多いかな？ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel365
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
お願いします。
セルA1に1990/8/31と入力されていて、セルの書式設定を日付型とし、
表示上は「平成2年8月31日」と表示されています。
別のセルで="太郎 ( " & A1 & "生まれ)” と入力しました。
私としては、「太郎 （平成2年8月31日生まれ）」と表示させたいのに
「太郎 （33116生まれ）」と表示されてしまいます。
これを思い通りに表示させるにはどうすればいいのでしょうか？ >>512
="太郎("&TEXT(A1,"[$-ja-JP-x-gannen]ggge"&"年"&"m"&"月"&"d"&"日"&";@")&"生まれ)" >>512
>>514見たら↓でいけたわ
="太郎("&TEXT(A1,"[$-ja-JP-x-gannen]ggge年m月d日;@")&"生まれ)" A1を次の様に置き換え
TEXT(A1,"ggge""年""m""月""d""日""") 名前と生年月日を同時に1つのセルに入れるのは良くない Windows10のアニメーションをONにすると頻繁にマウスで
セルの選択ができなくなるのですが同じ人いませんか？ アニメーションをOFFにしてみる
マウスを替えてみる 無線⇔有線も試す
無線マウスなら電池を新品に替えてみる
マウスパッドを替えてみる
別のモニタでも発生するか確認する
大事なのはアニメーション、セル選択 どっち？ じゃあ、タッチパッドかキーボード操作で
タスクマネージャーでGPUのパフォーマンス見て異常が無いか とか思ったけど、外してるわな ご指導お願いいたします。
8：00 9：00 10：00・・・・・と24時間で受電デマンドを記録しています。
24時間の中で最大受電をＭＡＸで表示させるのですが、条件があります。
① ガスコージェネが運転していない日は、24時間の受電デマンド（最大）を表示させる。
② ガスコージェネを運転している日は、運転している時間帯で受電デマンド（最大）を表示させる。
計算式がわからず困っています。
お力添えを宜しくお願い致します。 【1 OSの種類 .】 Windows11
【2 Excelのバージョン 】 Excel2021
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
a1,b1,c1,d1,e1,f1
にそれぞれ数値が入ってますの。
これらの数値がすべて異なる場合に1を重複する場合には0を表示したいのです。
良い方法はありませんか？a1,b1,c1,d1,e1,f1のセルは実際にはもっと増えるため
一つ一つをCountIFなどで判定するのはつらい。 >>524
http://www.eurus.dti.ne.jp/~yoneyama/Excel/waza/max.html こちらを参考に為さってください
ガスコージェネの日には別途判断するためのフラグを付ければ楽だと思います
ただ、そのデータは数ヶ月、数年規模で蓄積されると思いますが、グラフのが見やすいような気がします
>>525
http://www.eurus.dti.ne.jp/~yoneyama/Excel/jituyou/jyufuku.htm
このページの上から1/5辺りから書かれている 単一の列データの重複をチェック・・ の辺りを参考に >>525
=IF(COLUMNS(UNIQUE(A1:F1,TRUE))=COLUMNS(A1:F1),1,0) >>525
入ってますの、で笑ったｗ
5chで一番上品な人に認定します 昔のラジオ深夜放送の投稿風味で懐かしい。
(金パで野沢那智が声色変えて読んでいた)
「アタクシは世の殿方のように、Excelに身を捧げているわけではないですの。(ﾊｰﾄ」 Excelだけやっていれば良い仕事って少ないからね 派遣は絶滅危惧種になるかも
人が入ってこない
リーマンショック経験すりゃ派遣なんか二度とやりたくないだろうね 質問です。
index matchやvlookupで指定範囲を下から検索するってことは可能ですか >>525
>>530
990 名無しさん＠そうだ選挙にいこう2020/10/06(火) 19:27:38.97
=(SUM( (A1:F1=TRANSPOSE(A1:F1)) *1) = COUNT(A1:F1))*1
で多分いいと思う
配列数式なので、Ctrl+Shift+Enterで
992 976 2020/10/06(火) 19:31:55.70
>>990
ありがとうございます。ぜひ使わせていただきます。
動作を確認いたしましたm(_ _)m
//
私からはこんな回答で
=(SUMPRODUCT(1/COUNTIF(A1:F1,A1:F1))=COUNT(A1:F1))*1 =MDETERM( (A1:F1=TRANSPOSE(A1:F1)) *1) なんだその頭の関数？？知らんぞ？？
すげーな良く知っているな同志達は 行列、固有値とか
昔高校の数学でやったのを思い出した M8に入力した年月日付を参照してAK8に90日から105日後のランダムな日数(休日を除く)関数はどのように作ればいいでしょうか？ いくつか案があるけどできれば今のシートとフォームの構造見ながら説明したい。スクショを提供してくれる？
>>542 >>545
クソみたいな仕事してんな。
その無駄な枠線を全部無くしたら10倍の速さで作れる。
カネと時間の無駄。
日本が衰退した理由がそれ。
無意味なことに心血を注ぐ。
そんな暇あるならもっと意味のある仕事しろ。 >>542
関数だと立ち上げる度にどんどん日付が変わってしまうがそれでもいいの？
候補日として別のセルに出して、手で入力する方がいいと思うけど
ＶＢＡをつかわないならね >>542
=TEXT(M8+RANDBETWEEN(90,105),"yyyy/mm/dd(aaa)")
目で結果を見て休日だったらＦ９押して再計算 >>547
VBAで日付が変わる事ないのであればVBAにしたいです >>546
ヒドイな、君は
彼がこういう仕事してくれてるお陰で君にこんな仕事が回って来ないで済む
感謝するトコだろ
これを「良し」とする上の方が居るってことだから、そ奴等がのさばってる限りは変わらん
アホの極みだと思うなら、新作こしらえて堂々と上の方に売りに行けばいいんだ
全国で一律採用されたらそれなりの小遣い稼ぎに成るだろ 目指せ厚労省！だ さすがにそれはねーよ 誘導でもやめとけ
逆におまえがbasで出せって云われて出すのか 10行強くらいで実現できるVBAなんですから貼ってください 補助金を貰うのが目的で実際には仕事してなくて、いい感じに書類を捏造したいとか？ モニタリング実施日 三ヶ月、六ヶ月、一年のそれぞれどれかに一回
つまり、ランダムで日付を作ってしまうと、その次の実施日との整合性が保たれない
このケースだと、三ヶ月に一回を想定しているようだが、105日が続くと
一年420日必要に成る 95日だとしても一年380日必要 ランダムに日付を生成する意味が無い
一回目の日付を決めたら、二回目以降は90日にして、日曜を判定する・・
ん？読み返したら(休日を除く)だな 日曜以外も休日判定必要なのか？
>>555 はそれまで勘案してるのか 見てみたいものだ こういうのは乱数じゃなくてテーブルでやっとくのが簡単だぞ
あらかじめカレンダーを見ながら法則のわかりにくい一覧表を手作業で作っといて、それを引くだけ
これなら10行もいらん 計画作成日を入力したら三ヶ月～三ヶ月半後の日付のうちどれかを入れたい
前回実施日からの日付では無い点に注意
なんでだろ わからん 三ヶ月も先の日付は予定日でしか無いわな 何故実施日
得体の知れない報告書だ この業界の慣例やら何やら
それはともかく、似たような需要がある場合は、基準日を入力したら必要日数後を
中央に前後数日のカレンダーリストがポップアップされて、そこから選ぶ
とかだとスマートだなと、ふと思った 需要が発生したら考えてみよう カレンダーがポップアップってかっこいい
すぐに実物とコードが見たいぜカモン だよな
趣味の世界じゃないんだから、Excelだけは出来ますとかじゃダメだろ
以前、そのような同僚がいたのを思い出した。 官公庁からしてExcelの使い方誤ってる日本
河野太郎の檄は無視 >>545
なんでフォーム使わずにシートで作ってるねん
シートはそういう用途を想定していない >>567
Excel VBAで解読不能のマクロの改良押し付けられた身になってみい 下で見切れてるシートの位置見てみ
こんなのが10Sheetぐらいぞろぞろ並んでるんだろうな、きっと
スマート言わんかあ じゃあ昨今はなんて言うんだ クールとか？クレバーは違うな
スマートホンはクールホンに成っちゃうな スマートフォンはあれで一つの単語
スマートな電話って意味じゃないから、ぜんぜんスマートでもなんでもない そうやってwikiとか真に受けちゃうから進歩に繋がらない
セルフォンとかモバイルフォンとかいろいろ使う
携帯電話の出始めはBring Phoneとかも言ってた 向こうでは
へそ曲がりの連中はBringじゃなくてBｒickだろ とか茶化してたし
じゃあ何故Smartをプレフィックスしたかとかにも考えを及ばせないと >>563
https://△.djuggernaut.com/excel-vba-calendar-control/ ←△はぶろぐ 英語に直して
これ辺り参考に、一ヶ月丸々要らないんだし、必要な日数分のを基準日の前後○日分だけの矩形で用意すればいい
もっとシンプルに、上下に○日分を並べたテキストボックスでもコマンドボタンでも、真ん中に基準とする日一日だけの
□□□□□□
■
□□□□□□ みたいなユーザーフォームを作ってクリックで選択でも矢印キーでもお好みで
https://tripbowl.com/excel-vba/userform-calendar/ ← こんなサイトも参考に >>576
商売の都合だよ
言葉の意味がわからないバカにも売るための単なるイメージ戦略
昔から電化製品なんてそんなんばっかなのに、まだ気付いてないのか 最初にスマートって言い出した無能の言い訳が続きます こんな底辺の人間が100円ショップを支えてくれてるのだ
数年後にはベトナム人以下の存在になってるけど 4月 A 否
5月 B 応
4月 A 応
みたいな列で4月にある否じゃないAの数を数えにはどうすればいいですか？ =SUMPRODUCT((A1:A3="4月")*(B1:B3="A")*(C1:C3<>"否")*1) =COUNTIFS(A:A,"=4月",B:B,"=A",C:C,"<>否") >>583,584
ありがとうございます！めちゃくちゃ助かりました！！ 【1 OSの種類 .】 Windows11
【2 Excelのバージョン 】 Excel 2016
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
大量の画像（数百個）を何度も読み込んで縦に並べているのですが、
セルの縦幅と合わせるのが至難です。
セルひとつに画像ひとつを当てはめることは
できないのでしょうか？ 隣のセルに番号を記入して、それでソートした時に
画像もそれに従って動いてくれるように最初から作り込みたいです。 いくつか案があるけどできれば今のシートとフォームの構造見ながら説明したい。スクショを提供してくれる？
>>586 質問のテンプレがあるんだから
リプライのテンプレがあっても問題ない >>586
自作マクロ集にあるが15年くらい前に書いた汚いマクロでメンテナンスしてないから公開するのが恥ずかしい
でも検索するといくつか出てくるよ
前に窓の杜にあったのをつかったことがあるが
これもなんかよさそうだよ（試してないけど）
https://qiita.com/saka-guti/items/5fc67c76e42fe95d9f2d テレワークでつい他の事してサボっちゃう事があるんだけど
PCのマウスやキーボードが動いてないと
Teamsのプレゼンス（在籍状態）の表示は黄色の一時退席に強制的に切りわかっちゃう？
試しに10分くらい放置してみたのだけど表示は緑色の連絡可能のままなのよね
本来なら手動で指定しても、動いてないと強制的に一時退席になるみたいだけど・・・
アプリではなくブラウザ版を使用してます スレ違いだがおれもブラウザ版使ってる
アプリだともっさりしすぎてストレス溜まるんだよな 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2019
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
【9 VBAの方が簡単で早くできる場合はVBAで回答】 可
行数760くらいの表があります。
a列は1行おきにデータが入っていて、その行は他の列にもデータが必ず入っています。
a列にデータが入っていない行は、他列にデータが入っている行もあれば無い行もあります。
a列のデータなし行だけ1行ずつグループ化したいのですが、マクロはどう書けば良いでしょうか？
a列データなし行は、他列にデータを入れる行だけ展開して、データなし行は畳んでおきたいのです。 >>592
これはすごいですね。
欲しい機能ズバリです。
ありがとうございました。 ちゃんとコード見てないけどリンク参照になってる画像だと元の画像をエクスプローラーから移動、削除、リネームしたらExcelから見れなくなると思うので注意した方が良い
当然別の人にも送れない
フルパスがセルに書かれてるから多分リンク参照してるんじゃ無いかな >>604
Excelのリンクって、縮小したビットマップがExcelファイル中に保存されるんじゃね？
ダブルクリックしてアクティベーションしようとしたら「ファイルが無え」って怒られそうだけど。 ようはPicture.InsertかShapes.AddPictureかの違いってこと
わかんないなら黙ってれば良いよ 脱マウスで入力するのを覚え中だけど慣れてないから逆に苛つく だいじだね 何なら脱キーボードもね 使うときはタッチパネルだけの時代に成ってくしね
でも、作る時はキーボードもマウスも無いと不便で必ず欲しく成るから、偏るのは良くないね 段階1 マウス派
何でもかんでもマウスクリック
キーボードは文字入力にしか使わない
段階2 キーボード派
何でもかんでもキーボードカタカタ
マウス派を馬鹿にする
段階3 マウス派
何でもかんでもスクリプト化
アイコンをダブルクリックするだけで処理を全部完結させる 段階4 口先派
仕事は他人にやらせる。
俺はやり方教えてダメ出しするだけ。 それで良いと思う
なんでもかんでも自分でやろうとする人いるけど、何だかなぁーと。 ズレてるぞ 大体が、そおゆう奴こそリストラ最前線
ダメ出しじゃなくて、ヨシ出ししなきゃ誰も着いて来ない 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel 2016
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 可
C列に入れる数式を教えて欲しいです
A列とB列に数値が入っていてC列に昨対%を表示させる際に
１行目C1の計算式を入れてしまうと２、３行目とも空欄になってしまいますが
２行目のようにB列のみ入ってる場合は#VALUE!とエラー表示させたく
３行目のように両方入っていない場合は空欄を返したいです
A1 B1 C1
100 200 50%（計算式は =iferror(sum(A1/B1）,"")
A2 B2 C2
200 （空欄ではなく#VALUE!と表示させたい）
A3 B3 C3
（空欄で表示させたい） いくつか案があるけどできれば今のシートとフォームの構造見ながら説明したい。スクショを提供してくれる？
>>621 2行目の計算ってエラーで空欄になるのではなくて0になる気がする >>621
=IF(AND(A1="",B1=""),"",IF(AND(A1="",B1<>""),1/"a",A1/B1)) 1/"a"はエラーを出すためで他に良い方法があるかもしれない =IF(A1&B1="","",
IF(A1="","value",A1)/B1)
"value"は明示するためだけど、なんだかねぇ #VALUE! って直接エラー値書くのはダメなん？ =IF(A1&B1="","",
IF(A1="",#VALUE!,A1)/B1)
マジかよこれいけるのか、知らなかった これは見やすいな
=IF(A1&B1="","",
IF(A1="",#VALUE!,
A1/B1)) よってたかって回答するのは久しぶり
最初期はそうだったよね >>622-633
遅い時間に回答してくれる人もいて有難うございました!
計算結果を表示させるためのsum(A1/B1)の部分ってどう組み込めば良いのでしょうか？
昼休みに考えてみます・・ >>634
割り算すればいいだけなんだから、sumはいらない
sum(A1/B1）
A1/B1
は同じ意味 >>636
実務的な話ですが・・
文字はValueでなくても構わないのですが、片方だけ実績がある年もフィルターで表示したいからです =IF(A1&B1="","",
IF(A1="","B列のみ",,
A1/B1))
とかでよくね =IF(A1="",
IF(B1="","",#N/A),
A1/B1)) パワークエリの質問です
https://imgur.com/ZYAcgUD
図中右側のようなフォーマットのtxtファイルが、あるフォルダに複数個格納されています。
そのフォルダに格納されているtxtデータをパワークエリで読み込み、図中左側のようなテーブルにしたいです。
調べても日付と測定者の列を盛り込む方法が分からなかったのですが、何か良い方法があればご教授願います。 >>641
クエリーを
・タイトル2行用
・データ部用
の2つに分ける。
1つのクエリー内で
後ステップの挿入/前ステップの抽出
を使って、日付、測定者もデータ部に2列追加して
一発で取り込むことも可能だけど、
ステップがちょっと長くなる。 >>641
あと、合わせ技で、
1つのフォルダーに入っている同じフォーマットの複数ファイルを
連続(縦に結合)して読込みたいときは、
フォルター指定してヘルパークエリーを使う。
https://youtu.be/uLV85sauJRw 図形の「円弧」をVBAで所定のサイズにしたいです。
半径を所定の値にするにはどこをどのように指示すれば良いでしょうか。 初歩的な質問ですみません
何か表や文書をA４サイズやa3で作成したい場合、どのような手順で作成したら良いのでしょうか？
ページレイアウトから点線つけて作成するのでしょうか？ 質問です
B列に“〇〇”という文字が含まれ、かつ、D列に“△”を含む文字列があるものを抜き出してソートしたいです
FILTERで試行錯誤してみましたが()*()で条件を繋げても、COUNTIFSやFIND、ANDやLEFTも使ってはみましたがうまくいきませんでした
複数条件の上に片方はワイルドカードを含む検索条件で抜き出して並び替えるよい方法はあるでしょうか ソート？
フィルタ？
B列とD列を結合するの？
どちらの列のどの部分(文字数、前方、後方etc.)をワイルドカード指定するの？ >>646
倍率100%、用紙を所定のサイズにして改ページプレビュー
改ページされる直前まで印刷範囲を拡大 >>645
Excelの図形は「楕円の直径」しか指定できないから、円弧の半径を変えたい時は、その半径2倍して高さと幅の両方を同じに変えてやる必要がある >>643
具体的な操作方法を教えてください。
できれば1つで完結する方法が知りたいです。
データ結合はできるのでサンプルファイル完成までの操作をお願いします。 =FILTER(B:B&D:D,
(ISNUMBER(FIND("〇〇",B:B)))*(ISNUMBER(FIND("△",D:D))) ) >>651
You should give it a try by yourself >>651
1つのtest1.txtファイルから、1つのクエリーでヘッダーとデータ部を読込む方法は、
自己流だとこんな感じ。
元のtest1ファイル
https://i.imgur.com/mcNxs27.png
読込み結果
https://i.imgur.com/i6L5Yte.png
余談だが、test1.txtのフルパスを"R_TargetFile"で定義している。
PowerQueryエディター
https://i.imgur.com/u7sHhkw.png
全てのステップをリボンから作成は出来ない。一部は詳細エディターで手打ちとコピペ。
手動で編集中の注意点は、
・最終ステップの末尾には "," を付けない
・inの後の記述は、その時の最終ステップ名(この場合は「変更された型2」)にその都度変える
詳細エディター
https://i.imgur.com/u7HqWRc.png
一度目の読込み(ソース)はヘッダー用で、
後でList.Firstで値を取得しやすくするためにタテヨコ変換した。
ここで「後ステップの挿入」を使って2値を"H_Date"、"H_Measurer"と定義してメモリーに格納？
二度目の読込み(ソース1)はデータ部用で、
カスタム列の追加で全行を
・日付=H_Date
・測定者=H_Measurer
とした。
なお、最初の「ソース」のステップで「Columns=2」にすると、
「削除された他の列」のステップは不要になる。
(詳細エディターのテキストは後述) >>654 の続き
以下、記述のテキスト
let
R_TargetFile = Excel.CurrentWorkbook(){[Name="R_TargetFile"]}[Content]{0}[Column1], // 対象ファイルフルパスをsheet上の定義名から取得
// ヘッダー部の読込み
ソース = Csv.Document(File.Contents(R_TargetFile),[Delimiter=" ", Columns=3, Encoding=932, QuoteStyle=QuoteStyle.None]),
削除された他の列 = Table.SelectColumns(ソース,{"Column1", "Column2"}),
保存された先頭行 = Table.FirstN(削除された他の列,2),
転置されたテーブル = Table.Transpose(保存された先頭行), // List.Firstで取得しやすいようにタテヨコ変換
昇格されたヘッダー数 = Table.PromoteHeaders(転置されたテーブル, [PromoteAllScalars=true]),
変更された型 = Table.TransformColumnTypes(昇格されたヘッダー数,{{"日付", type date}, {"測定者", type text}}),
// ここで「後にステップの挿入」
H_Date = List.First(変更された型[日付]), // 日付列1行目の値を取得
H_Measurer = List.First(変更された型[測定者]), // 測定者列1行目の値を取得
(まだ続く) >>655 の続き
// データ部の読込み (「ソース」行をコピペして、ステップ名重複回避のために名前を「ソース1」に変更
ソース1 = Csv.Document(File.Contents(R_TargetFile),[Delimiter=" ", Columns=3, Encoding=932, QuoteStyle=QuoteStyle.None]),
削除された最初の行 = Table.Skip(ソース1,3),
昇格されたヘッダー数1 = Table.PromoteHeaders(削除された最初の行, [PromoteAllScalars=true]),
変更された型1 = Table.TransformColumnTypes(昇格されたヘッダー数1,{{"サンプル番号", Int64.Type}, {"測定値A", Int64.Type}, {"測定値B", Int64.Type}}),
日付列の追加 = Table.AddColumn(変更された型1, "日付", each H_Date), // カスタム列の追加
測定者列の追加 = Table.AddColumn(日付列の追加, "測定者", each H_Measurer), // カスタム列の追加
変更された型2 = Table.TransformColumnTypes(測定者列の追加,{{"日付", type date}, {"測定者", type text}})
in
変更された型2
以上
sheet上のセルのどこかを"R_TargetFile"と名前定義し、そこにtest1.txtのフルパスを貼った上で、
空のクエリーに上記記述をコピペすれば、
動くと思う、多分。 余談2
>>656 の
ソース1 = Csv.Document(File.Contents(R_TargetFile),[Delimiter=" ", Columns=3, Encoding=932, QuoteStyle=QuoteStyle.None]),
を
ソース1 = ソース,
に省略することも可能。 余談3
>>655,656 のソース、ソース1で、
Delimiter=" " ・・・区切り記号
Encoding=932 ・・・文字コード
は、その.txtファイルの作りによって違うだろうから、
その辺はよしなに。 できそうでできません。
シート1に商品売上リストがあり、
シート2に抽出したい商品が入っています。
シート3に抽出したい商品を行一括で抽出したいのですが関数でありますでしょうか？ >>649
ありがとうございます
また質問すみません
それだと自分がやるとレイアウトを整える際にズレが出てきてしまいます。
A3やA4で印刷をする予定がある表を作るときに皆さんどういう手順で表作成してるのでしょうか？
まずレイアウトを考えてデータや文字の入力するのですが、文字サイズや行や列のサイズの調整感覚が全くわからなくて困ってます。
印刷予定がある場合、行や列の幅はどのような判断基準で決めてるのでしょうか？ 列幅や行幅は弄らない
インデントやフォントサイズで調整する 列や行の幅弄らないとなると表に罫線引いた時に見栄えが悪くないですか？ Excelは計算するためのアプリ
清書や印刷するための物じゃないから、見栄えを良くしようとすると余計な手間がかかる
印刷しては修正の繰り返しで地道に整えるしかないんだよ 個人的なこだわりはいいので理由がわかったら教えてください >>666
Excelの文書作成機能には限界があるから完璧な物を求めない方が良い
別シートから表を画像で貼り付けるなど工夫できる余地はあるのだから
あと殆どの人が使ってないであろうスタイルを使えば統一感が出るからお薦め 【1 OSの種類】 Windows10
【2 Excelのバージョン】 Excel2103
【3 VBAが使えるか】 いいえ
【4 VBAでの回答の可否】 否
【5 クエリが使えるか】いいえ
【6 クエリでの回答】否
【7 Accessが使えるか】いいえ
【8 Accessでの回答】否
【9 VBAの方が簡単で早くできる場合はVBAで回答】 否
1→2のように特定の文字を1行目の文字に一括で置換する方法を教えて下さい
1 https://i.imgur.com/gfqUZqq.png
2 https://i.imgur.com/U0rq3Hy.png >>>670
置換はvbaナシでは無理
sheet2!a1=IF(ROW()=1,Sheet1!A1,SUBSTITUTE(Sheet1!A1,"○",Sheet1!A$1))
あとは縦横にオーロフィル >>670
1. 別シートを作って1行目のみ全コピー
2. 別シートの2行目以降は =IF(sheet1!A2=“◯”, A$1, “”)
3. 置換出来たら別シートの全セルコピー→値のみ貼り付け
こんな感じでどうかな >>648
並び替えになります
少し文字が変わってしまって申し訳ないですが、B:Dまでの行でAに〇〇と入力されており、かつEに△を含むものを抜き出したいです
>>652
試してみます 誰か教えてほしい
写真にかいてある理想値の様に関数で
MBをKBで出したいんだけど分かる人いる？
https://i.imgur.com/1SbG5UW.png なんで数式バーが広すぎる？
普段すげー長い式組んでいると予想 >>676
1024でも1000でも大丈夫
おおよその値だしたいだけｗ
>>677
モニターでかいだけよ >>677
LET関数使うとこれぐらいが普通になる オンラインのExcelにlambda関数あったけど名前を付ける機能がなかったから中途半端な使い勝手だったわ >>679
めっちゃ助かった！thx
ちなみに1024を掛けるときとかどうするかわかる？ モニターがデカイのか納得
やっぱExcelはデスクトップの方が見やすいな >>677
数式内で改行を使いだすとこれぐらいが普通
>>680
LETいいよね 配列の結合が出来ずに困っています。
D1:D10とA1:A10を横に並べた10行x2列の配列を作りたいです。
{D1:D10, A1:A10}みたいなことをやりたい。
テーブルをBYROWで処理する前に、列の順番を並べ変えるのが最終目的です。
BYROWすると、INDEXで列要素を取り出すけど、番号が決め打ちにしないと処理が邪魔くさいので、
決め打ち番号順に列を並べ替えたい。 テーブルでindex(match)使っていても
そのくらいは広げたくなる数式バー なんか無理っぽいから、初めに
XMATCH("列の名前",テーブル[#見出し],0)
で列番号を得て、LETで定義するのが早道かなぁ。 >>685
HSTACKみたいな？
=IF({1,0},D1:D10,A1:A10) >>685
HSTACK、VSTACKのサブセットならLAMBDAで作れそうな感じやから、もう既にあったりしないのかな?
ちなみに
TOROW/COL
WRAPROWS/COL
のサブセットなら作った。
時間できたらH/VSTACKもトライしてみようと思ってるが、いつになるやら。 >>691
LAMBDAはちょい前に追加された関数
それ以外はじきに追加される予定の関数。 そうなんすね
自分、2016なんで時代遅れっす。
みんなの会話に付いていけないっす 同志達ってIF関数派？
それともSWITCH関数派？ なんだ？ロシアからの書き込みか？ それとも中国か？ >>688
IF文がこんな強力だなんて知らんかったわ。
HSTACKもどきができたよ。
=IF({1,1,1,0,0},INDEX(D1:F10,SEQUENCE(10),{1,2,3,1,2}), INDEX(A1:B10,SEQUENCE(10),{1,2,3,1,2}))
後はちょこっと汎用性持たすようにいじくってLAMBDAにすればすぐにでもHSTACKのサブセット使い放題やね。
今度やってみよ。
以前自分が作ろうと考えてたHSTACKのサブセットは、結構複雑な感じだったよ。すっごい簡単なった。 スピル以降の新機能を仕事で使える様になるのはいつの事やら
事務派遣だけど、今まで居た大手企業3社いずれもexcel旧バージョンのまま >>699
あのIFはVLOOKUPで左側の値を返すのに使われてたと思う
他にCHOOSEやINDEXでもできるらしい
=INDEX((D1:F10,A1:B10),SEQUENCE(10),{1,2,3,1,2},2-{1,1,1,0,0}) IFよくわからんがTranspose関数じゃだめなんか Ofice365のExcel等は、ライセンスが個人単位になってしまってる。
なので、要はボリュームライセンスの使用数をアバウトに管理できんなったようだ。
それで、例えば共用パソコンにボリュームライセンスのやつを入れるってのができんなってる。
そやから、会社方針によっては、なかなか新しいバージョンに移行できんやろね。 Windows11ではOffice2013は動かないとか。 どうしても質問の内容をスレに残したくないようです
解決後に削除できない状態では質問したくない理由があるのかもしれません おはずかしいのですが
エクセルの標準の線が消えて表示できません
罫線のところで色々試しましたが太くするとか点線みたいなやつしかなく
標準の線がありません
対処法をお願いします｡ 表示タブの目盛り線のチェックが外れてるか背景が白で塗られてるか 昔はエラー表示を消すにフォントを白くするやり方をみんなやっていたはず。 目盛線の表示はチェックが入ってました
背景は白ではなく色のない設定でした
どこにいった目盛線 Excelで油絵書いている人が最強だし
名前忘れた。 >>654
遅くなりましたがなんとか解読できました。
ありがとうございました。
最初letの前にイコール入れなかったらエラー出てその原因特定に手間取りました… エクセルのおまけにガムが付いてスーパーで売られる時代が来たら笑う 365ユーザー以外は来るなと言わんばかりのアレだな ネット上のデータ（表）がデータが膨大で読み込みに時間がかかるので自分用にexelにデータの取得を行いました。
フィルターを設定し、任意の順番で並び替えたかったのでユーザー設定の並び替えからレベルを追加し、任意の順序をユーザー設定リストに追加しました。
しかしうまくいきません
とある一つの列で並び替えをした後、ほかの列で並び替えをすると設定がすべてリセットされてしまいます。
任意の順番で並び替えたい列は10個くらいあり、どう設定すればよいか教えてください >>740
すみません。
無知なので少し詳しく教えてもらうことはできますか？ リレーションシップってリレーションするフィールド内に重複が無い場合にしか出来ないの？
Queryでグループ化してそのフィールドに重複が無ければリレーションできるの？ 箱ひげ図の「最大値」と「最小値」について
Excelではどう定義しているか、仕様を知りたいんだけど、
どなたか公式の当該ページをご存知の方
いらっしゃいますか？
非公式サイトの説明では
母集団の最大値/最小値そのものではなく、
中央値から75%(または25%)までの長さの1.5倍が上限(下限)
みたいな記述を見たのですが・・・
確かに最大値/最小値を超えての「外れ値」プロットもあるので
そうなのかと思っていたんだけれど、
別途、75%パーセンタイル：QUARTILE.INC(範囲,3)の関数などから
折れ線グラフで箱ひげ図もどきを作ってみたら、そうでもなさそうで、
よく分からなくなってしまいまスた。 >>743
PowerPivotのリレーションは
参照元の方が重複なし
でないとリレーションできない。 【1 OSの種類】 Windows10
【2 Excelのバージョン】 Excel2019
【3 VBAが使えるか】 はい
【4 VBAでの回答の可否】 可
【5 クエリが使えるか】 はい
【6 クエリでの回答】 可
【7 VBAの方が簡単で早くできる場合はVBAで回答】 可
複数行をグループ化していて
且つ開閉ボタンを上側に設定している状態で
ボタンがある行の1つ下の行に行挿入すると
ボタンの位置が1行下にずれてしまうのですが
これを回避する方法は無いでしょうか
行挿入じゃなくそれまでの2行目以降をコピーして
1行下にペーストすることで行挿入と同じ状況を作る
という案は浮かびました
それ以外の方法をご教示ください >>748
その案を使ってVBAでやれば良い
Range.RowHeight = 0 を検出出来れば実現出来るでしょう いくつか案があるけどできれば今のシートとフォームの構造見ながら説明したい。スクショを提供してくれる？
>>748 【1 OSの種類】 Windows10
【2 Excelのバージョン】 Excel2016
【3 VBAが使えるか】 はい
【4 VBAでの回答の可否】 可
【5 クエリが使えるか】 はい
【6 クエリでの回答】 可
【7 VBAの方が簡単で早くできる場合はVBAで回答】 可
VBAで最終行を指定する際は
LastRow = cells(rows.count,1).end(xlup).row
みたいな感じで指定できるかと思いますが
条件付き書式の範囲を指定する際に
上記みたいな最終行を指定することは可能でしょうか hlookupを使って文字列を取得したいのですがエラーになります。
考えられる原因は何かありますでしょうか？ 割と見落としがちなのは数字が文字列で入ってたりするパターン >>753
Range.SpecialCells(xlcelltypeallformatconditions)
で条件付き書式の対象セルを取得出来るからFor Eachで回しつつカウントアップ
ラストセルのRange.Rowで行数を取得する 自己レススマソ
>>745
誤) 中央値から75%(または25%)までの長さの1.5倍が上限(下限)
MSの公式仕様ページは見つからなかったものの、
別の外部説明サイトの記述
https://data-viz-lab.com/boxplot
正？)
・外れ値とみなされる値
「第3四分位数(75%)＋四分位範囲(25%～75%)×1.5」以上のデータ
「第1四分位数(25%)－四分位範囲(25%～75%)×1.5」以下のデータ
【検証】
最大値/最小値の閾値としては、まだ少し離れているようにも見えるけど・・・
閾値が「以上」「以下」なので、
「未満」(閾値よりも小さい/大きい、最初の実プロット)で
最大値/最小値の横棒(－)引いているのかしら？
https://i.imgur.com/YHyWjO8.png >>758
おお、ありがとうございます。
2つ目のリンクが正に「MS公式の仕様」ですね。
Google日本語訳
https://i.imgur.com/BkW8xxg.png
"IQR" が 「四分位範囲(25%～75%)」のことのようです。
このやり方は "the Tukey industry standard" と言うのか・・・
1.5×IQRの外側点線「閾値」の内側に
箱ひげ図の最大値/最小値が示されているから、
これは「内輪の至近の実値」にプロットしていると読めます。
※「閾値に内輪で至近の実値」と「実最大値/実最小値」のどちらか内輪が
このグラフが示す「最大値/最小値」で、その外輪が「外れ値」
wiki見ると、箱ひげ図での外れ値の判定方法は
このやり方が一般的なものの、他にもいろいろなタイプがあるようで。
例えば、生産管理やリスク管理なんかの実務では
管理範囲を「平均値±3σ(標準偏差の3倍)」
とする考え方もあるとか。
https://sigma-eye.com/2018/10/29/rule/
おかげさまで、
マーカー付折れ線グラフと積み重ね棒グラフで再現版MS仕様箱ひげ図を作り、
±3σも落とし込んで比較出来そうです。 行を選択して色付けをしたいのですが、使わないセルまで突き抜けて全て色付けされてしまいます。
表の中だけまでを色付け出来ないでしょうか？ >>761
色付けしないといけない行がたくさんあり、全てがこの列までの範囲…と決まっているので、セルを選択して限界値のようなものを決めて色付けできればとても楽なので…
色付けする度に指定範囲をドラッグしないといけないのは面倒なのですがそれしかないでしょうか 範囲が決まってるなら書式のみ貼り付けとか条件付き書式で塗りつぶすはダメなの 表がテーブルのことならShift+SPACEか左端クリック 常に横のシートの特定のセル文字を参照する方法ないでしょうか？
毎月新しいファイルにコピーするので、.xlsxファイルを参照するのではなく、毎回同ファイルの横シートを参照したいです。 >>765
シート名に法則がないならvbaしか無理
シートi名に法則があるならindirectでいける >>765
隣のシート名を上に手入力して、計算式でデータを持ってくるのが楽な気がするが。 >>766の通りINDIRECTでいいと思うけどな
月毎に更新しているのならシート名に月を示す文字列が含まれてるのではないの？ その通りです。毎月やるにはどうすればいいかわかりますか？ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016以降
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 可
以前ここでExcelからメールを作成するフォーマットを作ってもらいました
これです
Sub createMail()
CreateObject("Wscript.Shell").Run _
"mailto:" & URLEncode(Range("B4").Value) & _
"?cc=" & URLEncode(Range("B5").Value) & _
"&subject=" & URLEncode(Range("B6").Value) & _
"&body=%FF%FE" & URLEncode(Range("B7").Value)
End Sub
Function URLEncode(ByVal strOrg As String) As String
With CreateObject("ScriptControl")
.Language = "JScript"
URLEncode = .CodeObject.encodeURI(strOrg)
End With
End Function
セルB4をメールのTOに、B5をCCに、B6を件名に、B7を本文に流し込む動きをします
しかしこれは32ビット版Excel環境でしか使えないようで64ビット版Excel環境では
With CreateObject("ScriptControl”)の行がエラーになります
エラーの警告はこのスクショです
https://i.imgur.com/ZQF4XcG.jpg
これを64ビット版Excel環境で動くようにするにはどのように変更するのでしょうか >>772
即レスありがとうございます
Function URLEncode(ByVal strOrg As String) As StringとEnd Functionの間の部分を
教えていただきました記事のようにそのまんままるっと置き換えただけではエラー出て動かないようです
どのように変更しましたらよろしいでしょうか
Function URLEncode(ByVal strOrg As String) As String
Dim d As Object
Dim elm As Object
Set d = CreateObject("htmlfile")
Set elm = d.createElement("span")
elm.setAttribute "id", "result"
d.appendChild elm
d.parentWindow.execScript "document.getElementById('result').innerText = decodeURIComponent('" & uri & "');", "JScript"
DecodeURI = elm.innerText
End Function >>771
メーラー何？
OutlookならCOMから操作するのが定番だけど >>770
https://i.imgur.com/jUDSmKS.png
=INDIRECT(
MOD(SUBSTITUTE(
RIGHT(CELL("filename",A1),LEN(CELL("filename",A1))-FIND("]",CELL("filename",A1))),"月","")-2,12)+1&"月!"&"r1c1",0) >>779
スルーでいいぞ
間違った式を書くので有名な奴だから 会っているとか会っていないの話じゃないよ。それを使い回せて汎用性あるのかって話 それな。
自分の職場じゃそんな複雑な式使っていたら吊し上げ食らう。 吊るし上げる側の目的は？
お前はそれで困ることあるの？ >>765
これ書かないと誰もちゃんとした答え書かないよ
大喜利大会になる
【1 OSの種類 .】
【2 Excelのバージョン 】
【3 VBAが使えるか .】
【4 VBAでの回答の可否】
【5 クエリが使えるか】
【6 クエリでの回答】
【7 Accessが使えるか】
【8 Accessでの回答】
【9 VBAの方が簡単で早くできる場合はVBAで回答】 新しいテンプレ
【1 OSの種類】
【2 Excelのバージョン】
【3 VBAが使えるか】
【4 VBAでの回答の可否】
【5 モダンExcelが使えるか】
【6 モダンExcelでの回答】
【7 VBAの方が簡単で速くできる場合はVBAで回答】
【8 モダンExcelの方が簡単で速くできる場合はモダンExcelで回答】 モダンExcelてなに？
レガシーExcelもあるの？ ここで質問する奴はモダンExcelなんて知らないだろ
モダンExcel知ってるような意識高い奴はこんなところで聞かずに自分でググるなりして解決するよ >>765
例えば【8 モダンExcelの方が簡単で速くできる場合はモダンExcelで回答】可
だとした場合、完全にモダンExcel化しなくともパワークエリを使うだけでも簡単かつ劇的に効率アップに繋がる提案が出来るかもしれないよ 質問する側もテンプレで質問しないと>>778みたいなふざけた回答が返ってきてしまうだけだよ vbaとか時代遅れもいいところだろ
RPAテンプレ入れろよ
PowerBIとPowerAutomateもな
>>795みたいな奴はもう時代に取り残されてるからな 今までこのスレでモダンExcelやRPAの話題なんて一度も出ていませんので。
このスレの回答者のレベルも考えてください。 >>789
パワークエリやスピルとかだろ
あとパワーピボットなんてのもあったな パワークエリ使ってみるとExcel本体がいかに使いやすいかよく分かる >>796
RPAの何をどうテンプレに入れるんだ？ 新しいテンプレ
【1 OSの種類 .】 Windows**
【2 Excelのバージョン 】 Excel**
【3 VBAが使えるか .】 はい･いいえ
【4 VBAでの回答の可否】 可･否
【5 PowerQueryでの回答の可否】 可･否 PowerQueryとPowerPivotの組み合わせがModernExcelと呼ばれているのに疑問を感じる よく分からないけど
PythonでExcel操作を自動化するのも
RPAに入るのかしら？ PowerBIまでいくとモダンExcelの範疇外？ パワークエリとワークシート関数の組み合わせこそ真のモダンExcelと呼んでいいと思うんだが
パワーピボットいらない
vbaは論外 PowerPivot使わないと1,048,576行止まり。
PowerQueryでもデータモデルに突っ込めば
100万行の壁は超えられるけど、
そこから先の集計・加工は
絞り込まないのであればPowerPivotに頼らざるを得ない。
でなきゃ、AccessかなんかのRDBに放り込んで
Worksheet上限の100万行の範囲に絞り込んでからでないと、
Excel上では扱えないし、処理速度が遅いのかと。
もっとも、PowerPivotでは
散布図や箱ひげ図が作れないという地雷。 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Microsoft® Excel® for Microsoft 365 MSO (バージョン 2204 ビルド 16.0.15128.20210) 64 ビット
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 可（どうしても必要そうであれば）
入力データ：
[表1] ※実際は８つの値 [表2] ※表1と全く同じ表 [表3] ※実際は１～１０の数値
あ あ 1
い い 2
う う 3
4
5
条件：
表1+表3、表2+表3を使った組み合わせで全パターンを網羅したい
ただし、表１と表２が重複するケースを省きたい
また、表１と表２が入れ替わって重複するケースを省きたい
想定する出力の例：
あ 1 い 1
あ 1 い 2
あ 1 い 3
...(略)
あ 2 い 1
あ 2 い 2
あ 2 い 3
...(略)
省きたいケース：
あ 1 あ 1 ※”あ”同士で重複するパターン
い 1 あ 1 ※”あ 1 い 1”と同義なので省きたい 表がくずれてしまいました・・・
[表1] ※実際は８つの値
あ
い
う
[表2] ※表１と全く同じもの
[表3] ※10の値
1
2
3
4
5
ピボットテーブルを調べて使ってみて何とかそれっぽいものは出来たのですが、
省きたいケースに書いてある例外のパターンを省きたい形です。
（テーブルの組み合わせは全５万件ほどになりました）
何か手段があれば、よろしくお願いします。 >>810
コピペしながらどうやろうかなーって考えてたら終わったわ
https://jsfiddle.net/vsLgrnc5/1/
A・C列はコピペ。BDは数式で作った >>813
Script.Controlは64bitではサポートしてない
無理やり動かしても早晩また使えなくなるリスクがある
別のアプローチでやれ、以上 >>814
作って戴いたの見て気付いたんですが、結局は数字同士の組み合わせの話なんだなって思いました
自分で質問してて気付いてなかったのかという感じですが
数字の一覧出す理解が深まったので、文字の方はマンパワーな感じでやってみます
ありがとうございます >>815
分かりました
【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016以降の64ビット版
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 可
以前ここでExcelからメールを作成するフォーマットを作ってもらいました
これです
Sub createMail()
CreateObject("Wscript.Shell").Run _
"mailto:" & URLEncode(Range("B4").Value) & _
"?cc=" & URLEncode(Range("B5").Value) & _
"&subject=" & URLEncode(Range("B6").Value) & _
"&body=%FF%FE" & URLEncode(Range("B7").Value)
End Sub
Function URLEncode(ByVal strOrg As String) As String
With CreateObject("ScriptControl")
.Language = "JScript"
URLEncode = .CodeObject.encodeURI(strOrg)
End With
End Function
セルB4をメールのTOに、B5をCCに、B6を件名に、B7を本文に流し込む動きをします
しかしこれは32ビット版Excel環境でしか使えないようで64ビット版Excel環境ではWith CreateObject("ScriptControl”)の行がエラーになります
エラーの警告はこのスクショです
https://i.imgur.com/ZQF4XcG.jpg
これと同じことを64ビット版Excel環境で実現する方法を教えていただきたいです よく分からん
JScript使うなら最初からJScriptで書くのは駄目なんかい? Power BIを触ってみるとM言語でメソッドが補完表示されますが自分の2019じゃ表示されません
office365なら表示されますか？ >>820
メソッドの補完表示って、これのこと？
Microsoft 365版だけど。
https://i.imgur.com/dBX4pGK.png >>821
こんな感じのlって入力した直後から一覧表示してくれます。
その説明の表示も2019はないんですよね・・・
https://i.imgur.com/5VWt1hC.jpg >>822
2019版にあるかどうかわからんけど
エディターの - ファイル - オプションと設定 - クエリのオプション - Power Query エディター
の画面で、
"数式バー、詳細エディター、およびカスタム列ダイアログで M Intellisense を有効にします"
にチェックを入れて、エディター再起動 すいません。とても分かりづらいと思うのですが、
結合していない整理されたセルに入力したものを、
結合したセルにそのとおりに入れる方法ないでしょうか…
https://i.imgur.com/pL9nAcu.png
こちらのABCDEFの部分に曲名等を入れていきたいのですが、
結合されてしまっているせいで直接入力が出来なかったり、他へのコピーが上手くいきません。
しかし、結合せずにセルを作った場合、上の部分の123…と入れていくセルが入れられません。
別セルで結合しないセルで作ったものを結合されたセル(ABC…)に上手く入れられればいいのですが不可能でしょうか。
よろしくお願いいたします。 SQLとExcelの並べ替え昇順の結果が違うのはどうしてなんだろう
Excelでの並び替え昇順の方がデータとして扱いやすい
パワークエリも内部でSQLを使っている？からかSQLと同じ並べ替え昇順の結果になる 【1 OSの種類 .】 Windows10 21H2
【2 Excelのバージョン 】 Excel2204(365最新)
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 否
indexにindirectとmatchを使ってAのシートにあるセル名でシート名を取得し
別のシートからデータを行で引っ張ってきてるのですが365だと問題なく動きます。
A1にindexで残りのA2とA3に行で取得したデータが書き込まれるようになっています。
相手(2019環境)に渡すと動かないということでスクリーンショット見せてもらうと数式が{}で囲まれていました。
自分の環境でもxlsで保存すると数式が全部{}で囲まれてる状態になります。
結局indexで列も指定してA1～A3全部に数式を入れると問題なく動くっぽいのですけどこれを回避する方法はあるのでしょうか？ >>834
数式が{ }で囲まれているのは昔からの配列数式だな
最近のバージョンであればスピルが使用できるので{ }で囲まなくても自動で数式が拡張される
互換性の関係であえて昔からの方法を使用するならCtrl+Shift+Enterで入力すればスピルではなく配列数式が使用できる >>835
ご回答ありがとうございます
配列数式状態になるとindexで行全体を取得する(a1~a3)がなぜか頭(a1)だけ値が入力される状態になります
先程も書いたのですがこれを
a1は列1
a2は列2
a3は列3
indexでセル1マスずつ取得したら問題なく動きます
行で取得するのはバージョンの問題なのでしょうか？ もしかしてindex(範囲,行,)で範囲の3列取得してたのですがこれがスピルで入力されてるから2019より前が使えないってだけですか？
indexが前からある関数だからこのやり方大丈夫かと思ってました >>834>>838
そう、スピルが全く機能しなくなる
365でA1：A10をスピルで入力していると、2019ではA1セルにしか入力がない状態になる そりゃスピルが使えない環境にスピル前提の数式を移したら範囲指定の先頭だけしか入力されてないことにはなるだろ 試したら＞＞８３９が正解だった
すげーなこのゴミクズ＞＞８４０ >>843
ゴミクズなんて言うな！
>>840はただの在日韓国人。 フォントの太字がありますが更に太字にする方法はありますか？ 結合したセルの間に行挿入したとき、挿入したセルも結合状態にすることはできませんか
不可能ならば結合したセルを上下どちらかのセルに複製することはできないでしょうか？ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
日数を何年何ヶ月に置き換えたい
A列=入社日 B列=退職日 C列=B列-A列
C列の一番下にAVERAGE(C列)
そうすると勤続日数が日数で表示されるのを何年何ヶ月に変換したい
各行毎には入社日と退職日からDATEIF関数でできるが
日数を何年何ヶ月に変換するにはどうすれば良いだろうか １年は365.25日、1ヶ月は30.4日 で計算するのがいいのかなあ。
1ヶ月未満の日数の切り上げ/切り下げは当該団体の方針に応じて。 「DATEIF関数でできる」なら
1900/1/1とDATEIFするとか
最初の閏年を避けて1900/12/31を足して1901/1/1とDATEIFするとか 月数を求めるのなら、どうせ小数点以下は切り捨てるか四捨五入かだよね 1日ずれることで税金大幅に変わる可能性あるけど、アバウトで良いのか？ 個々の勤続日数なら重要だけどその平均値にそれ程厳密にこだわる意味があるとは思えないけどな 神経質すぎるのも良くない
雑なのはもっとNGだけどさ >>853
=+DATEDIF(0,C1,"Y")&"年"&DATEDIF(0,C1,"YM")&"ヶ月" >>867
それではdatedif以外で正確な数式をどうぞ！ｗ そんな化石みたいな関数使うんじゃなくて、勤続年数なんてシリアル値を普通に引き算して表示形式変えれば良くないか？
年ならy、月ならm 同じ日数でも、開始時期を変えれば月数は増えたり減ったりするじゃんか
平均勤務日数を出すのなら、その集計の出し方は適切じゃないと思うよ C列を、B列-A列 では無くて、（いや、まあ、あってもいいけど 検算用とかに）
=IF(A1="","",IFERROR(DATEDIF(A1,B1,"Y")& "年" & DATEDIF(A1,B1,"YM")& "ヶ月",""))
で、何年何ヶ月表示にする
AVERAGEを求めるセルに、
=DATEDIF(AVERAGE(A1:A10),AVERAGE(B1:B10),"Y") & "年" & DATEDIF(AVERAGE(A1:A10),AVERAGE(B1:B10),"YM") & "月"
たぶん、これでいける 手直しはご随意に で、何ヶ年何ヶ月何ヶ日まで出したり、それに文字列くっ付けないで三列に分けたりして(そうすればAVERAGE使える)て気付いたが
4ヶ月30ヶ日なんてのもあり得るわけで、それを4ヶ月で切り捨てていいのか とか まあ、アバウトでいいんだろうけど
つーか、C列の最下段に下の数式入れるだけでいーじゃねーか っつーのも、今更だが気付くわけで
ま、いちおーね、見た目でも揃ってるといいかな って こうか？ああか？と複数列で試してたから、レスだけでは判らん無駄もあるわな
A1:A10 B1:B10 のヶ所は見逃してくれたまえ 10行だけでテストしてた https://i.imgur.com/GVGSady.png
この「=AVERAGE(A3:A8,B3:B8)」は何を計算した数値でしょう
平均とは違うし、最頻値や中央値とも違う…
わかる人おりますか >>885
「8,995」と表示されています
これは引っ越し先候補のガス代を求めたくて作ったものです
代表値は色々あれど、私が該当しそうな金額を求めたくて試算しているところです >>887
https://imgur.com/a/wxXHZe8
Excel自体の設定が変なのでしょうか。弄ってはいないつもりなんですが… >>886
～は表示形式の設定で出るようになっているだけで
数値として5000 10000 15000 ... が入っているんじゃないか
その考えで12個の数値を平均したら8995になる >>889
そう、「～」は表示形式です。わかりにくかったですねごめんなさい
12個の数値というのは「A3:A8」の数値と「B3;B8」の数値をどうしたものでしょうか
=(A3:A8)/(B3;B8)とも違いますし、どうやったら出てくる数値ですか？ >>884
月額の列が表示形式がユーザー定義で
"～"#,##0
になっているのかしら？
で、単純に
月額の算術平均×人数の算術平均でもなさそう。
17,980×10.333333=185791.6
月額の列も数値認識すると、AVERAGE(A3:A8,B3:B8)は
確かに"8,995"にはなる。
https://i.imgur.com/pNXpLmw.png
けど、これってただの、
「平均対象の範囲が2つ以上に分かれているときの引数の取り方」
と同じだよね？
(月額の合計107,879+人数の合計62)÷(月額の値数6個+人数の値数6)
＝8,995
全く性格の異なる数値の集合なのに、なぜその単純算術平均を取る？
月額*人数の平均は、元の表にはないが"147,626"だけど、
各階級最大値に人数掛けて、それを「加重平均」とするのはムリがあるし、
意味はないのかと。
統計学的な意味は詳しくないのでわからないのだけれど、
ヒストグラムの階級の個数や幅は、
設定の仕方次第で、標準分布には似ても似つかない
全然違ったものに見えたりするので、
それを決めるための何かの指標？
・・・なんて邪推もムリがあるか。
単純に間違いなのでは？ >>891
なるほど「8,995」は
=(月額の合計107,879+人数の合計62)÷(月額の値数6個+人数の値数6)
なんですね。確かに性格の異なる数値の集合で単純に間違いですね
数学は苦手だったので、今一つ自身が求めたい数値を言葉にも数式にもできないでいるんです
引っ越し先候補のガス代を求めたくて作ったものです
代表値の種類は色々あれど、私が該当しそうな金額を求めたくて試算しているところです
月のガス代はいくらになるかな？です >>892
ヒストグラムにされる前の、
生データからやらないと、どうしようもないかと。 >>893
既に入居しているマンションなのですが、ヒストグラムを漸く貰った手前、次を頼みにくいのです
表で「人数」とした値は正確には戸数でした
今ある数値のみで導けないものでしょうか それは関数でしょうか？なんというものか教えてください 複数のブックをまとめて横につまり列に連結することはできますか?
パワークエリではまとめて行に追加できますが
列だとマージは2つのファイルをまとめることしかできないようでブックが沢山ある結構面倒です 私には単語1つ1つが知らない単語ばかりで諦めます
おとなしく平均値に該当するであろうと考えることにします
ここまでありがとうございました 人数でなくて戸数だったら、
なおさら、実使用データもらってガス代考えても、
答えは出ないように見える。
ガス代が「結果」としての従属変数 f(x) だとして、
「条件」の独立変数 x は何？
何とガス代の関係を調べようとしているの？
ワンルームマンションならいざ知らず、
家族構成(1戸あたりの入居人数)がそれぞれ異なったら、
ガスの使用量は全く異なり得る。
それで度数分布をグラフにしたり、平均値や中央値を出したところで、
なんの意味があるのか？
生活様式によってもガスの使用量は大きく違う。
自宅で調理するのか、外食が多いのか、とか。
ガスを床暖とかの暖房にも使っているのだったら
マンションの構造も影響し得るだろうけど、
それを現居住者のガス代実データだけ集めたところで
統計的に何が言えるのかさっぱりわからない。
単に自分で使うのが給湯と調理だけで変わらずだったら、
今の自分の使用量と
入居予定先のガスの種類、発熱量、料金調べて見当付けた方が
よほど参考になるのかと。
ガス焚き給湯器の効率自体は今も昔も大きくは変わらない。
むしろ大きいのは、冷めるのが早いか遅いかの
湯船や浴室の断熱。 「何の意味があるのか？」
と書いたが、
「一般的な世帯当たりの光熱費消費傾向」として
「1戸あたりのガス代平均値」の一事例
くらいだったら、意味はある。
「自分の引っ越し先候補選定のため」とかの利用目的には
全く馴染まない。 お邪魔します。
【1 OSの種類 .】 無依存、
【2 Excelのバージョン 】 Excel2016以降(?)
【3 VBAが使えるか .】 無関係事項、
【4 VBAでの回答の可否】 不可、
伺います、
以前 シート関数、
〜iF系構文、〜ifs系構文では、
直前の 手動検索時指定内容の、
・読みが検索か、・文字検索か、
此れ等に、
検索内容が 左右され。
連れて、
演算結果も 引っ張られ、
とても 実用シーンには、
余りに 低信頼性過ぎで、
到底 使用できる、
ものでは ありませんでした。
此は、
現在では 改修されて、
いるのですか？ 日本語入門者なのかも知れませんが
わかち書きしなくても大丈夫ですよ。 M言語で、列"品名1"の内容を、既に存在する列"品名2"に転記する方法って無いの?
一旦、"品名1"をコピーした”品名3"を作って、
"品名2"を削除して、
"品名3"を"品名2"に名前変更
って、今はしているけど、もう少しスマートな方法は無いのかなと。 >>903
こういう 風に 文節毎に 空白を 入れる 書き方。
小学低学年以下向け P.1、
申し訳ない、
他スレッドの 話で、
恐縮なのですが、
一度 管理者様に、
〉テーマ外話題に のらず、
投じるな、
と、
既に、厳に、
禁じられている 身故。
此方では、
エクセル外話題には、
お答えできない 事を、
お許し 願えますか？ P.2、
後、
此の 文体は、
弊者が 独自に、
文献を 調べ、
研究し 編み上げた、
もの。
よもや、
既に 認知され始め、
用途規定され 剰え、
名前まで 頂いていたとは、
知りませんでした、
光栄ですね。 P.3、
ですが、
元祖だからこそ、
申しますし、申せますが、
決して 小学生向けでは、
ありませんよ。
努々、
お間違いなきよう 願いますね。
後、
此方 個人情報開示は、
ご法度ですよね？
爺とか、子ともとか、性別とか、肌色とか、職歴とか、
想像を 振るわれても、
対応に 困りますよ。 >>908
P.4、
併せ、
抑もから ネイディブスピーカーでなければ、
使わないような 語が、
散々 ふんだんに、
散りばめられて いながら、
国籍を 疑われては、
其の辺りを 何故、
気付けないのか？
逆に … ？
と 見られ兼ねません故、
御身に 傷を、
ご自身自らで 儲けられる、
事に なりますよ？
お控えを 願いますね。
最後に、
弊者 質問に付いては、
如何ですか？
ご答申を お待ちしていますね。 >>904
「値の置換」のReplacer.ReplaceTextとかは
検索対象範囲も検索値も同じ列内だもんね。
[品名2]の全行に既に何か入っていて、
[品名1]に、ある特定の"A"という値が入っている時だけ[品名2]を置換えたい
ということなら、
[品名2新]の列作って
= if [品名1]="A" then [品名1] else [品名2]
として、元の[品名2]列を削除して
[品名2新]の名前を[品名2]に変更する
ことくらいしか思いつかない。 >>904
Table.ReplaceValue(ソース, each [品名2], each [品名1], Replacer.ReplaceText, {"品名2"}) Replacer.ReplaceTextとReplacer.ReplaceValue、どちらが適切か解らない >>911
[品名2]が全て[品名1]に置き換わってしまわない？
後半のReplacer.ReplaceTextの引数はどこ？ >>904は値を転記したいって質問だからこれでいいかと
条件指定したいなら[品名1]をif含んだものに変える
Table.ReplaceValueの4つめの引数は関数自体を指定する 構文
Table.ReplaceValue(table as table, oldValue as any, newValue as any, replacer as function, columnsToSearch as list) as table >>850です。
>>851さんは挿入しても結合状態のセルが挿入されると言っていますが自分の環境ではなりません。
https://i.imgur.com/AN7gVaE.gif
結合状態の行を挿入したいのですが、分解された状態で挿入されるので再度全て結合し直しになります。
なにか良い方法ないでしょうか？お願いします。 何をどうやってるのかこちらでは計り知れない もしかして挿入の意味を間違えてる？
結合された部分を選択して「書式のコピー/貼り付け」をしても、ちゃんと結合されたまま貼り付けられるんだが？ 空のセルを挿入なのか、切り取ったセルの挿入かで動作が変わるってことよ 教えて下さい
例えばセミコロン区切りで100列分の数値が1列に入ったデータがあるとします
これを区切り位置機能で100列に分解する際100列全てを文字列で指定したいのですが、区切り位置のウィザードで表示形式を文字列に選択しようとしてもデータプレビュー上では9列しか選択出来ないため10列目から標準形式で設定されてしまいます
100列全てを文字列で開く方法はありませんでしょうか？ >>925
ありがとうございます
私の手元だとデータプレビューを一番右までスクロールしても途中の列までしか表示されていないので列数の制限があるのかと思ったのですが、普通は全ての列が表示されるのですね
もう少しいじってみます >>918
行の挿入 とか書くから、素直にその操作しちゃうじゃないか
その >>919 の下段の方式でもいいし、結合されたセル選択してフィルハンドルを上なり下なりへドラッグでもいけるだろ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2019
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
セルA1に「1」を入力すると特定の位置に画像「A」が挿入され
「2」を入力すると画像「B」、
「3」を入力すると画像「C」が挿入される
といったことがしたいのですが、
関数の組み合わせかVBAでできませんか？ >>928
ワークシートのイベントプロシージャを使うのが一番楽だと思う >>928
https://www.y-shinno.com/excel-img-switch/
これと
https://www.helpaso.net/archives/46/
これの合わせ技でVBA不要 画像がどっかのシートに貼られてて参照できるなら
フォルダに放り込まれてる画像から引っ張るならVBAのが楽かも(後々のメンテの意味で) >>933
これで正解出たね
「画像の挿入」がワークシートの別の場所からなのかフォルダからなのかで最適解が変わる 回答者は神
質問者はゴミ
煽るだけのガヤは在日韓国人
それがこのスレじゃ >>936
ここは、ドヤ顔で回答して承認欲求を満たす、俺達の大切な場所 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2003
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
【5 クエリが使えるか】いいえ
【6 クエリでの回答】否
【7 Accessが使えるか】いいえ
【8 Accessでの回答】否
【9 VBAの方が簡単で早くできる場合はVBAで回答】 否
質問です
「飛び飛びセルの値でグラフが書きたい」です。
散布図グラフを書いていますが、上から下まで連続して埋まったセルのデータでグラフを書きました。
しかし途中で、1行毎に別データを挿入することになり、
セルの上から、データ、空白、データ、空白・・・となったら、グラフから線が消え「点」だけになってしまいました。
泣く泣く、別のセルに詰め詰めのデータとしてcopyして、それをグラフのデータとして使用して描いています。
飛び飛びセルの値ではグラフに線は書けないでしょうか? 数学の教科書に載ってるような立体図形を書きたいんですねど、
エクセルのオートシェイプの円柱とか立方体で、見えない部分の辺を点線にする方法てある？
環境はWin11でExcel2013でVBA可です >>941
ありがとうございます。
2021ならできるのでしょうか? >>943
自動では無理
例えば円柱なら底面だけ別の楕円を手作業で追加 図形なんてオマケみたいなもんだろう
わざわざExcelで無理してやる事か？ >>946
手作業では面倒なのでマクロ化したんだが・・・・・・、挙動がおかしい。
VBAスレで聞いてみます。
https://i.imgur.com/oKs1K0l.jpg Excelとワードで同じVBAを流してみたんですが、挙動が異なる。
これってバグ？
office2013です。
Set myDocument = ActiveDocument
'Set myDocument = ActiveSheet
x = 110: y = 10: r = 100: h = 100
a = 0.3
Set shp = myDocument.Shapes.AddShape(msoShapeArc, x, y + r * (1 - a), r, r * a)
With shp
.Adjustments.Item(1) = -180
.Adjustments.Item(2) = 180
.Line.DashStyle = msoLineDash
.Line.Weight = 2
End With
Set shp = myDocument.Shapes.AddShape(msoShapeArc, x, y, r, r)
With shp
.Adjustments.Item(1) = -180
.Adjustments.Item(2) = 180
.Line.DashStyle = msoLineSolid
.Line.Weight = 2
End With >>919
空のセルを挿入です！
>>927
>>919さんの方法ですと
空セル挿入→別セルを選択してコピー→ペースト
と3つ手順が必要ですし、
>結合されたセル選択してフィルハンドルを上なり下なりへドラッグでもいけるだろ
も一度セル選択＋ドラッグの手間が必要です。
普通のセル挿入のようにショートカット1つで上下と同じような結合されたセルを挿入したいのですが不可能なのでしょうか？ CELL(セル）の意味わかってる？
VBAでCells使ってじぶんのお好みでコード書いてマクロで走らせてもいいけどさ そんな需要が頻繁にあるなら
そこらじゅうで、ショートカットひとつであれもこれもやれ って言われて、microsoftがいちいち応じてたらとんでもないものに仕上がるんだが？
大体が、結合されたセルが上下行に亘って存在してる場所に、なんでセル挿入なんだ？ セル挿入したっていっこズレるだけだろ？
ヘタすりゃ「結合されたセルが解除されるが、いいのか？」とかまで聞かれるだろ？
提示のｇｉｆが真っ白のセルだらけだから何をどうしたいかさっぱりわからん せめてＡＢＣだのいろはだの文字埋めてセルの変化が分かるようにしてくれ https://imgur.com/a/E8jz6mu.jpg
画像のsheet1のようなデータをsheet3のようなデータに加工したいです。
具体的な加工ポイントは、「空セルの場合は上の数字で埋める」と「転置」の２つです。
現状作業用シートとしてsheet2を使用しています。
質問としては、一発でsheet1→sheet3の加工することはできるのかを教えてほしいです。
できる場合はやり方も教えてください。
sheet1は編集不可、回答は関数でお願いします。 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
ピボットテーブルで、列ラベルに「日にち」、行ラベルに「担当者」、値エリアに「個数/担当者」が入っている状態で作成した棒グラフを
担当者一つ一つの棒グラフに「カテゴリ」の比率も入れたいです。
行ラベルに「カテゴリ」を追加すると、一人ひとりの担当者に対して各カテゴリの棒グラフが表示されますが、
これを一人に対して一つの棒グラフでその一人の棒グラフの中で比率を表示させたいのです。
わかりづらい説明ですみませんがよろしくおねがいします。 >>957
こうなってるグラフを、一人ひとり積み上げ縦棒にして一つの棒にしたいです。
https://i.imgur.com/AxTiR1F.png >>954
単純に以下ではどうすか？
ただし、スピルって別シートに鬼門があるようなので、
隣のシートのデータを色々いじくる時には細工が必要になることがあるかも？
今は治ってるのかな？
LET(a,A1:A25,b,B1:B25,TRANSPOSE(IF(b="",a,b))) さっきは失礼、正しくはこんな感じ？
TRANSPOSE(SCAN(,B1:B25,LAMBDA(a,b,IF(b="",a,b)))) >>958
行ラベル、列ラベルが指定通りだとうまく行かなかったで入れ替えて、
ひとまず、日にちごと・担当者ごとのカテゴリ積み上げ棒グラフは出来たけど、
https://i.imgur.com/onXCZRL.png
(もう一つ同じピボットテーブル作って、値の「計算の種類」を「行集計に対する比率」にしたもの)
> 一人に対して一つの棒グラフでその一人の棒グラフの中で比率を表示させたい
というのは、
個数のラベルに比率も付け足す
または
個数表示を比率に置換えたい
ということ？
だとすれば、ピボットテーブルで可能かどうかは
俺にはわからない。 >>963
これです！やりたかったのはまさにこれです。比率じゃなくて個数表示で大丈夫です
でも値エリアを「合計/個数」にするやり方がわからないです。
すみません、基本的なことなんでしょうけどどうやったんでしょう？ >>964
列：カテゴリ
行：日にち、担当者
としておいて。
Σ値のフィールドを「個数」にするだけで、集計方法のデフォルトは「合計」 Σ値のフィールドを「個数」（←フィールドにない）にするってとこがよくわからなかったですけど
Σ値に「担当者」で同じ結果になったのでこれでいいかって感じです。
どうもありがとうございました。 久しぶりにここ覗いたらみんな動的配列の扱い劇的に上手くなってるな
1年くらい前に見たときは俺が教えることもあったけど今は俺が習わなきゃだBYROWが実装されたのに気づくの遅れたのはイタいｗ VBAのSpillRangeプロパティは最初俺が使ったときバグあってVBA内でも#アドレスで逃げてたけど、もう治ってるんかな >>956
>>962
ありがとうございました。
ラムダ関数使えば出来ることを確認しました。
できればラムダ関数でやりたかったのですが会社のExcelが半期チャネルにつきクエリのやり方検討してみます。 >>853
>>854
>>855
いやいや、
そんな 無駄な、
事は、
excelに 任せておけば、
いいのですよ。
其れって、
こういう 事ですよね？
https://1drv.ms/x/s!AjviygfJDgV_gYYLIwZQFTXafV3M-g
excelでは、
一日を 1、
１時間を 1/24、
１分を 1/(24×60)、
こう 管理しています。
又、
表示と、内部値は、
別管理です。 >>853 >>854
>>855 >>971
P.2、
例えば、
2022/5/27日なら 44708、
2020/11/6日なら 44141、
なので 普通に、
退社日から 入社日を、
単純に 引けば、
勤務通算日数に なるのです。
では、
此を 日付表記に、
変える 方法ですが、
表示形式を 日付にすれば、
日付で 表示されますし、
セルの 設定→表示形式
内の ユーザー表示書式で、
yy"年"mm"ヶ月間"
と 設定すれば、
お望みは 其れで、
済む 話しなのですよ。 >>853 >>854
>>855 >>972
P.3、
又は、
入社日、退社日、
共に 何月までしか、
換算しない 方が、
いいなら、
=DATE(YEAR(退社日,MONTH(退社日),1)-DATE(YEAR(入社日),MONTH(入社日),1)
こう 換算してから、
計算するだけですよ。 >>954
=IF(INDEX(Sheet1!$B$1:$B$25,COLUMN()-1)="",A2,INDEX(Sheet1!$B$1:$B$25,COLUMN()-1)) >>884
P.1、
ザックリとだけ いうと、
3σ域傾向でしょうね。
元表ですが、
区間を ６つに、
別けてますよね？
最頻値は 中央付近ですから、
両翼3σの 正規分布を、
取っている ものと、
思われます。
詰まり、
行５、６、
が １σ、
行４、７、
が ２σ、
行３、８、
が ３σ。 >>884
P.2、
さて、
ご質問の 式では、
ザックリといえば、
行３、８、
此れ等の 傾向を、
取ってますよね？
私では、
１列目見出し項が 読めないのですが、
其の 項名に、
当たる ものの、
３σ区間平均が、
中央値や、最頻値と、
如何 ズレているか、
裾野と 全体の、
傾向差を 取っていると、
思われますが。 >>976
>>884
P.2、
此、
企業内の 最も、
極秘Classのノウハウと 思われますよ？
貴方 危険な、
事 してますよ？
バレたら 賠償、
とんでもない 額、
請求兼ねませんので、
早めに 会社、
辞めて、
消息 経ちませんか？
こんなにも、
不用意に 危険行為して、
迂闊にも 人生、
捨てては いけませんよ？ 20年ぐらい2chやってるけどここまで読む気にならないレスは始めてみた
凄い才能だ AVERAGEで標準偏差が計算出来る
という珍説現る 品質管理なんかで使う3σはこういうこと。
> 正規分布の場合、
>
> 1σ 区間におさまる確率→ 約 68.27%
> 2σ 区間におさまる確率→ 約 95.45%
> 3σ 区間におさまる確率→ 約 99.73%
>
> であることが知られています。
1σ、2σ、3σの意味と正規分布の場合の確率
https://mathwords.net/sigumakukan >>954
基本式、
A1=OFFSET(Sheet1!$A$1,COLUMN(A1)-1,0,1,1)
B2=IF(OFFSET(Sheet1!$A$1,COLUMN(B6)-1,1,1,1)="",A6,OFFSET(Sheet1!$A$1,COLUMN(B6)-1,1,1,1))
実現手順、
B1=IF(OFFSET(Sheet1!$A$1,COLUMN(B1)-1,0,1,1)=0,"",OFFSET(Sheet1!$A$1,COLUMN(B1)-1,0,1,1))
B2=IF(B1="","",IFERROR(IF(OFFSET(Sheet1!$A$1,COLUMN(B2)-1,1,1,1)="",A2,OFFSET(Sheet1!$A$1,COLUMN(B2)-1,1,1,1)),OFFSET(Sheet1!$A$1,COLUMN(B2)-1,1,1,1)))
B1:B2を コピー、
1:2を 選択、
選択範囲に 貼り付け。 >>985
失礼、
作成済み検証ファイルと、実証映像を、
添付し忘れていました。
ファイル、
https://1drv.ms/x/s!AjviygfJDgV_gYYTB33H2cSlXYmmXA
映像、
https://1drv.ms/u/s!AjviygfJDgV_gYYV7WxgjRMRY2kKMQ
尚、
ファイルは 1度、
ローカルに 別名保存して、
其の 保存ファイルを、
扱うように してくださいね、
別名保存でないと、
意味が 無いですよ。
さすれば、
閲覧も、編集も、
叶うものと 思いますよ。 >>983
記載読みに、
誤認識が あるようなので、
訂正しておきましょう。
私は、
敢えて 気を付けて、
「標準偏差、」「正規分布、」「歪度、」
等とは 書かず、
「傾向、」としか 書いてません。
勿論 平均では、
標準偏差は 出なくとも、
傾向は 出ますよね、
詰まり 全くの、
思い込み変換からの 誤認いいかがかりですよ？
脳内誤変換で、
書いている 事を、
よめてもない 内に、
不実を 元に、
誤認から 誹謗されては、
困りますね。 初動ミスですよ
構ってくれる人が居るから嬉しかったのでしょう >>955
FILTER関数とTRASPOSE関数でいけんじゃね
たしかFILTER関数は空白が0になったから >>976
P.1、
失礼、
記載AVERAGE構文の 読み方を、
見間違えて いましたね、
此では 改竄者と、
同列でしょうね、
お詫びします。
さて、
他の 方も、
触れられているようですが、
解らない 人が、
馴れと、誤認思い込みから、
間違いと 勘違い断定して、
過去 改竄して、
しまったのでしょうね。 >>993 >>976
P.2、
excel365で、
色々 確認した、
結果も 踏まえ、
区間区切りと 集計値が、
変わらない限り、
分布が 変わるだけでは、
同じ 結果になりますから、
計算する 意味は、
ないでしょう。
又、
= AVERAGE(セル範囲1,セル範囲2)
仮に こう、
式を 置いた場合、
セル範囲1と、セル範囲2が、
提示票のように 隣接してるなら、
別けても、別けなくても、
結果が 一致するので、
（,）の 存在意味も、
ありません。 >>994 >>976
P.3、
以上より、
〉本来は（,）では、
なかった、
誰かが 誤改竄した、
と、
確定的に 判定できるでしょう。
受けて、
平均の 種類内で、
平均の 関数に、
近くなる ものを、
探してみてみましたが、
元は 加重平均なのでしょね、 ※1、
此だと 分布により、
価が 変化しますからね。 >>976
P.4、
サンプル、
正規表記寄りデータ、
3 10
8 20
20 30
20 40
8 50
3 60
62 361.7
大区間側寄りデータ、
1 10
4.72 20
8.44 30
12.16 40
15.88 50
19.6 60
61.8 469
小区間側方寄りデータ、
16 10
20 20
15 30
6 40
4 50
1 60
62 251.7 >>976
P.5、
此の様に、
何れも 合計値は、
ほぼ同じなので、
平均に 差は、
でない ものの。
加重平均値には、
・361.7
・469
・251.7
と、
価差が 見られますからね。
加重平均計算式は、
= AVERAGE(セル範囲1*セル範囲2)
でしょうから、
式中から 思い込みで、
見慣れない 形態だからと
（*）を、(,)に、
書き換えちゃったのでしょうね、 >>997 >>976
P.6、
思い込みや、馴れで、
確認も 調べも、
せず、
私感を ねじ込むと、
此の様な 事に、
なるのでしょうね。
確実に、
・中央値、・最頻値、・分布、・歪度、・尖度、
等を、
同時に 求めるので、
正規分布との 異差を、
見る 票でしょう、
又全体が標準偏差ではなく、
当該項が 別途、
求められてますよね、
あからさまに 標準偏差では、
ないでしょうね。 このスレッドは１０００を超えました。
新しいスレッドを立ててください。
life time: 81日 12時間 38分 54秒 5ちゃんねるの運営はプレミアム会員の皆さまに支えられています。
運営にご協力お願いいたします。
───────────────────
《プレミアム会員の主な特典》
★ 5ちゃんねる専用ブラウザからの広告除去
★ 5ちゃんねるの過去ログを取得
★ 書き込み規制の緩和
───────────────────
会員登録には個人情報は一切必要ありません。
月300円から匿名でご購入いただけます。
▼ プレミアム会員登録はこちら ▼
https://premium.5ch.net/
▼ 浪人ログインはこちら ▼
https://login.5ch.net/login.php レス数が1000を超えています。これ以上書き込みはできません。
