Excel総合相談所 130
レス数が1000を超えています。これ以上書き込みはできません。
試しに、で、2007で試したんですが、
L列が空のときはなんも反応しなかったんですよ その名前ボックス使ったりしても
で、マウス・ドラッグで二十行ぐらいてきとーに試したりしてて、もっかい名前ボックスを
試したらそこだけ勝手に上書きされたんで もしや?と、ダミーデータ埋めてみたらいっきに
最下行までできたと お礼し忘れてました ありがとうございました
手順としては 数式入ってる五行を選択 → 名前ボックスに範囲記入 → フィル →
連続データの作成 → 列 → オートフィル → OK ですよね?
明日仕事PCの2010 や 2013、2016とかで試してみますけど、アッパー・バージョンなら空でも
いけるのかな >>339
オートフィルというかフィル機能は最初のデータを参考にして後のセルを埋めていくので
完全に空だとうまくいかない
5行ごとの繰り返しだと、最初の5行は何らかの方法で入力されていないとダメ >>327 さんの 1 フィルハンドルをD Click で呆気無く出来てしまいました 2010
2007 だと、うんともすんとも反応しなかったんですけどね
列の下方向ぜんぶから状態でも無問題 隣の列から離れていてもおk L列とばしてM列でもという意味
今までのだらだらマウスドラッグは何だったんだ ほんとうにありがとう
で、むしろ下方向にダミーデータがある状態だと体感で五倍ぐらい時間が掛かってしまった
ちゃんと上書きする挙動は同じだけど、途中で(応答なし)が出るほど時間が掛かった
そのまま放置してればちゃんと処理が終わるんだけど 因みに84,000行のデータで試した 一応報告でした おそまつ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 否
【4 VBAでの回答の可否】 可
A列に時間があります
下に行くほど後の時間(時間順)に並んでいます
B列に予定の内容がテキスト形式であります
A列の時間が過ぎたら
ABともに背景をグレーにしたいのですがどうすれば良いでしょうか
情報の更新はリアルタイムが望ましいですが、
難しければ、さいあく5分刻みで更新でも大丈夫です
VBA環境はありますが文法やプログラムが全くわからないので
VBAの場合はコピペでできるレベルまで書いていただければ幸いです 自分でf9押すたびに更新されるとかなら簡単(たぶん)。
でなきゃvbaになると思うけど、時刻の部分をどう入力してて、どう処理するかによる。
0:00から23:59までの、1分刻みのデータ(シリアル値)なのか、
それとも日付まで入っているのか(この場合もシリアル値)。
後者なら「過ぎた」か、そうでないかの判断は簡単だけど、前者だと何をもって「過ぎた」と考えるのか。 ググったんですがわからないので質問します。
場違いな場合は誘導してくれると助かる。
データを作っていて1行に対して、ABCDEをセル内に持つ列項目があったとして
どれか1つに当てはまる場合(例:A)
復数に当てはまる場合(例:BDE)もあるとする。
今現在は一つの列に書いているのでドロップダウンリストで全ての組み合わせ
(a-e.ab-de.abc-cde.abcd-bcde.abcdeの15種?)から選ぶことになる。
これだとaを含むものを探す時にフィルターした時にa単独で当てはまるものは出るが、acのように復数当てはまるものが同時にフィルターに掛けられない。
解決策としては、1列で済ませずに列abcdeを足せば出来るけどそれだと見た目がよろしくないし入力が手間。(実際は50以上に渡るので。)
なので一列にこれらをいれて、フィルターで復数検索をできるようにはならないんですか? 自分で検索条件表を作って、フィルターの詳細設定で検索範囲に設定すればいい >>344
問題のシートを、データだけ架空のものにして、画面イメージ(PrintScreenからペイントに
貼り付けて必要な範囲だけにして)をアプロダにて示してもらえば、誰か力を貸してくれるかも。
ブックそのものをアップするのはやめた方がいいです。どこかに個人情報(会社のPCなら会社の
情報)が残ってるかもしれないので。 >>346調べてみます、ありがとうございます
>>347既に結構めんどくさい状況ですので差し控えますがありがとうございます>>345
>>345するーでおk >>345
おそらくロングスパゲティ作っちゃう思考なんだろう
どういう思考の者がどういう式などを書くか参考になっていいじゃないか >>350同意!まさに>>350が典型例
ぶっちぎりの無能だね
>>344
フィルターでaを含む
or
cをふくむ
じゃ駄目なのか 大体 >>344 の説明だと
その1行にABCDEを含む列も含まれているのか
1行は何列かだけで、そこにABCDEを含む列は含まれていないのか。
それも文章からじゃわからない >>351
同意!そして更にそこに並んで入るんですね!かっこいい無脳です! office2010
新しくブックを作ると標準のスタイルとして何かの設定が最初から入ってるけど、
このデフォルト値を変更するにはどうすればいい? Excel開いて左上のファイル→オプション→基本設定→新しいブックの作成時 それだとフォントくらいしか設定できないような
配置とかの初期値も気に入らない
セルのスタイルのワンセットのテンプレートを作って、
それを設定できればいいんだけど Excel 起動時に特定のブックまたはテンプレートを自動的に開く
で ぐぐる なるほど
もう初期値を変更することは諦めて、何かで上書きしてしまえばいいという方針
なんだろうこの押しつけの強さ (音源1)
トラック1 50:40 トラック2 50:40
トラック3 50:40 トラック4 50:40
トラック5 50:40 トラック6 50:40
(音源2)
トラック1 31:02 トラック2 31:02
トラック3 31:02 トラック4 31:02
トラック5 31:02 トラック6 31:02
音源1のトラック3 20:22と入力して瞬時に
音源2ではどこの時間になるのかとういうのを
エクセルの計算でやりたいのですがどうすればよいのでしょうか?
音源1のどこのトラックの時間指定しても瞬時に入力して音源2ではどこのトラックの
時間なのかを知りたいのです。
音源1と音源2は、00:00:00から同時スタートです。
トラック間の終了時間が違うだけです。 例と文章が合ってないのと、なんで横に二つ並べるのかというのと、
そもそもやりたいことがよく判らないけど、
時間なんてただの数値だから、秒数で計算できるならあとは表示の問題 >>359
(音源1)
トラック1 50:40:00
トラック2 50:40:00 101:20:00
トラック3 50:40:00 152:00:00
こんな風な表を作って目視で探すとか >>359
テンプレもないし、どの文字列がどの列や行かも書いてないし、少なくともスマホで見てる分には左に詰まってるから推測でしかないけど下記の状態?
A列
(音源1) 、トラック1 、3、5 (音源2) 、トラック1 、3、5
B列
50:40 ×3、31:02×3
C列
(音源1) 、トラック2、4、6(音源2) 、トラック2、4、6
D列
50:40 ×3、31:02×3
これさ、せめて下記状態にする事は可能?
A列
(音源1) 、トラック1 〜6
B列
50:40 ×6
C列
(音源2) 、トラック1 〜6
31:02 ×6
あと、作業列使ってもいい? >>361
それは流石にExcel使ってる意味ないかと >>363
数式組んでもいいんだけど、
その手間より目視の方が早いパターンのような気がする。なんとなく =hyperlink("url","■")
みたいにして、クリックする場所を示したりするけど、
セルの中のどこクリックしてもリンクになるような、セルの幅変更に追従するような
リンクの張り方ってできる?
urlは別のセルの内容から計算するので固定にはできない >>365
無理
文字列をクリックさせる方式だと、どうしてもセルの壁と文字の間に隙間ができる
マクロを使ってセルの選択から処理させるしかない >>365
フォントを巨大にするか、
フォームのボタンでも貼り付けるしか無いんじゃないかな >>344
フィルターにそこまでの機能はない
関数で組めばリストの抽出は可能 元々は、「ハイパーリンクを開く」のメニューが =HYPERLINKのセルに対して出てこないから、
マウスでクリックする羽目になってるんだけど
=HYPERLINKのリンク先をキーボードから開く方法は無い? エクセル2016で縦撮りの写真を貼るときなんだけど
撮る人によって右手を上にする人と左手を上にする人がいて
それをリサイズして写真を縦に起こしてから貼るんだけど
写真の回転補助がそれぞれ右と左に出るんだよね
貼るときはいいんだけど図の変更で写真を差し替えるときこの方向が違う写真を差し替えると上下逆に出てしまう
2010の時はそんなことなかったのに >>371
今までと同じデジカメで撮った写真ならば(Exifの仕様が同じなら)
2016の写真のExifの読み込み方法が変わったかバグだろうね win10ってそもそもexifを読み込んで写真を勝手に縦にするんだよな
たまに横の写真が縦だったりするわ
で、付属の写真アプリで開いても縦なんだけどフリーソフトとかで開くと横だったりする
フォルダ内で回転させたのとフリーソフト等で回転させた向きが合わずにフォルダ内がカオスになったことあった 写真撮影時に写真の縦横がExifに記録されないデジカメもあるしね
そんな画像ファイルはExifデータを修正しておかないと後々面倒だ
まあ切り分けていかないと原因は判りにくい 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2013
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
指定したシートを、入れたい文字でPDF形式で保存したいと考えています。
具体的には、a-見積書-20180220-20180228.pdfのような感じで
aは参照するセルの内容によって可変。
20180220と20180228は参照するセルによって可変で、当該セルは和暦表示(例:平成30年2月20日)としています。
また、保存先は作業ブックと同じディレクトリをデフォルトととし、
重複する名前のファイルがあった場合の確認ダイアログを表示させたいと考えています。
ExportAsFixedFormat Type:=xlTypePDF、Application.DisplayAlertsの使用と
FilenameをString宣言するまでは、調べてわかったのですがファイル名の日付への反映がうまくいきません
よろしくお願いします。 >>376
こんなんでいけるんじゃない
Sub Macro1()
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
ThisWorkbook.Path & Format(Cells(1, 1), "yyyymmdd"), Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
True
End Sub 最近は-pdfの保存がデフォルトで用意されてるのね
便利 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
オートフィルタで絞ったまま可視セルのみでセル移動をし、さらに移動した可視セルに入力した内容を可視セルの一番下までペーストするため引っ張りたい
オートフィルタで絞る列はもちろんデータが入ってますが、他に空白の列がありその列の可視セルだけにデータを入力しそのまま下までペーストしたいのがやりたいことです
普通にoffsetでセル移動すると非表示セルへ移動しデータを記載してしまいます
検索しましたが解決できていません
宜しくお願いします >>379
vbaにおいてのことのみ書きました
もちろん手入力時は上記内容は簡単にできますがvbaで実現したいです 手作業だと出来ても、それを記録したマクロはダメってこともあるよね
俺は印刷設定の改ページを変更したくて、
それをマクロの記録でコードにしたけど、
そのコードを実行しても改ページは変更できなかった
具体的な記録内容としては
ファイル開いて、改ページプレビューにして、改ページ位置の点線を動かした
でも手作業では上手くいくのに、そのマクロでは何にも変わらなかった >>379
どこまで自動化するのかわからないけど、オートフィルタしてあると仮定して
Dim ftable As Range 'オートフィルタの選択範囲
Dim target As Range 'それぞれの抽出セル
'A1にオートフィルタデータがあるとして
Set ftable = Range("A1").CurrentRegion.SpecialCells(xlCellTypeVisible)
For Each target In ftable
'この辺で好きにしたらいいと思う
Debug.Print "セル位置" & target.Address
Next target offsetで解決できました
ありがとうございました >>382,>>383
レスくださった方々ありがとうございます。
>>384が379になりすまして書いてますが自分が>>379を書いた者です
>>383を試しまたレスするようにします
ありがとうございます
>>381
記録だと具体的なセル番地を読み込んでしまうだけでした。。 >>383
まだ試す前ですが、入力する値はA1には元々入っている…ことはなく、
例えばオートフィルタして1行目はそれぞれカラムの項目名として
A2,A3が非表示となりA4が1番上にあるとするとしたら、A4にバナナと記載しそれをオートフィルで下まで引っ張る
でまずバナナと入力するセルをA4にしたいのに非表示のA2になってしまうのだ!という事なのです。。。 >>383
>どこまで自動化するのかわからないけど、
>オートフィルタしてあると仮定して
前後は他にもあるけど、オートフィルタ設定、絞る、絞った可視セルに単語記載→下まで引っ張る
このオートフィルタ絞り記載引っ張るの一連を12種類繰り返すので自動化したいという訳なのです うぉおおおおおおおおおおおおおおおおおおおおおおおおおおおおおお shift-spaceで1行選択して、
ctrl-d で上の行をコピー
をすると、行コピーとか挿入とかいろいろ苦労してやらないといけない、
数式や書式をキープしたまま行が増やせて便利 >>389
それは普通にみんな使ってる
それをVBAで書いてあげればいい 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2013
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
シート1に数字の表があり、シート2でシート1のA5+A8+A10の計算をしているとき、
シート3で同じくシート1のB5+B8+B10のように列をずらして計算させたいのですが、数が多く手作業では負担が大きいため関数で解決できるとありがたいです。
offsetとindirectの組み合わせでできないか試してみたのですがやり方がよく分からず断念しました
宜しくお願いします 391の追記ですが、
シート1のデータは毎回変化するので予めセル指定することができないため、
1か所に入力したものを元に計算できないかと思い質問させていただきました >>393
違うシートの同じセルに列をずらして計算させたいのですが相対指定でずらせるものなのでしょうか? >>391
Sheet1が左端にあって、Sheet1のB3:K12に10行10列のデータがあり
M列に5, 8, 10行目のデータを抽出するために作業列{0;0;0;0;1;0;0;1;0;1} を加える
=SUM(OFFSET(Sheet1!$B$3, 0, SHEET()-2, 10, 1)*Sheet1!$M$3:$M$12)
と入力して shift + ctrl + enter
シートが目的の順に並んでいる限り目的行の和が得られるけど
正直お勧めしない >>391
もっと具体的にどういう構成なのか教えて
例えば
https://dotup.org/uploda/dotup.org1470913.txt
みたいに、関数で式を生成するという手もあるけど
コード直接書いたらエラーで弾かれたのでアップロードにしている >>394
元の計算式の入ったシートをコピーして
ズラす分だけ行削除か挿入で調整。
必要なら後から書式のみコピーで整えて終わり。 一度作って終わりでいいのかメンテを続ける必要があるのかだな
ちゃんとしたデータ構造になってれば、計算も楽なのが普通
計算が大変なのはちゃんとしてないからで、それでも一度限りなら残業して仕上げればいいけど、
その後誰かが使うなら、その人が可哀想 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
年月日を入力したところ全く異なる生年月日に変換されてしまいます
オリジナルの年月日より数十年前の年月日になっています(月日も異なる)
こうなる理由とオリジナルに戻す方法をご存知でしたらお願いします >>399
具体例を一つ書いてみて
キーボードから「18/2」と入力すると、「30年2月1日」と表示される、みたいな感じで >>401
1975/6/6と入力されたセルは1941/9/16と表示されます
既に変換された生年月日が入力されているため
オリジナルの年月日に直したいのです >>403
原因や法則がわからんことには直しようがないんだよなあ
そのブックを作ったのは誰で、その時に使ったExcelのバージョンはわかる?
日本以外の国で作られた物だとカレンダーの計算がまったく違ってることもあるんだけど >>402
そのセルには数式は入ってない?
そのブックにマクロは登録されてない?
本当にシリアル値になってるかどうか確認したいので、どれか一つ、日付とシリアル値の数字を正確に書き写して >>404
ブックを作ったのは他部署の人
なのでバージョンも同じ2010だと思います
>>405
1975/6/6は1941/9/16と表示されますが
書式設定を標準にすると15235になります 15235って事は1941/9/16が入ってる
1975/6/6と入力していないはず >>408
他部署の人間の話では197566と入力したらしいんです
なのでどうなっているのかと 197566と入れると2440/11/29になるけどね 409
それって1975/6/6って意味じゃなくて、単純に6桁の数字を入れたら勝手に日付に変わったってこと?
まだ法則が見えてこない Bookにマクロなくても他にマクロが在ったんだろうな 空のセルで ctrl-; を押して今日の日付を入れて、
表示形式を標準にしたら 43155 になるのかがまず怪しいな >>409
無い
恐らく書式設定が日付のところに
19756辺りを打って、シリアル値が日付に変換されたのだろう
1941/9/16も間違っているはず
19756だと1954/2/1になるからこの辺の日付だろう ロケールの問題だったりして?
あと、そのセルの現在の表示形式ってまだこのスレには書いてもらってないよね
標準に変更する前にちゃんと確認したのかな 2017/1/11 も 2017/11/1 も 2017111 なのか知りたい
因みに、桐からもらったフォーマットだと 2017/ 1/11 とか 2017/11/ 1 とかが有って「を?」と思ったことはある
その時はインポートした後に 確かに変な日付に成ってた
CSVにエクスポートした相手の担当が無頓着だっただけだろうが >>409
新規のブックだけ開いて入力してどうか
それでも正しい日付にならないならエクセル側の問題
該当のブックやシートのみなら一回書式をクリアするなりでやり直してどうか 質問してる人は入力してないんだよな
こういう風に入力したと聞いてるのに、そうなってない
何でだ
実はそう入力してないからという単純な話な気がする 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 否
ピボットテーブルで、全てユニークなデータの場合、
「Σ:値」に入れる項目は何が良いでしょうか >>422
求人の集計です。タウンワーク、バイトルなどの媒体に求人を出していて、
どの求人媒体が効果的か・・・と言った感じです
他には最終的な合格率なども求めます
データは以下のような感じです
日時は同じセルに入っています
日時 媒体 結果
1/1 9:00 タウンワーク 合格
1/1 10:00: バイトル 辞退
1/2 10:00 タウンワーク 不合格
1/3 10:00 バイトル 辞退 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 否
ピボットテーブルで、「行ラベル」「列ラベル」の文字列を非表示にすることはできますか? >>423
行に媒体、列に結果、シグマに結果の個数、表示を比率にすれば合格率は出るな >>425
個数だったらどの項目でも同じデータになりますが、
「結果」が良いでしょうか 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2003
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 否
リンク先に飛びたい時、マウスでクリックするのではなく
リンクのところまでセルを動かして、キーボードのボタンだけで
移動するのってどうすればよいのでしょうか? 【1 OSの種類 .】 Windows 10
【2 Excelのバージョン 】 Excel 2016
【3 VBAが使えるか .】 いいえ(コピペして貼り付ける程度です)
【4 VBAでの回答の可否】 否
あるセルに文字列と数字が混ざっていて、そこから他のセルに数字だけ抽出する場合はどうすれば良いでしょうか
また数字も全角の場合は文字列扱いとなりますが、これを数字に変換して抽出する事は可能ですか?
WebクリエからGoogle為替レートのドル円為替相場のデータから数字だけを抽出したいと考えています
円/ドルだと、例ですが「1JPY/USD =0.00133」と表示されます
このうち、0.00133を抽出したいのです
全角数字の場合は文字列になってしまいますが…外国の友達に送るものなので、できれば半角英数字に変換できるのが1番好ましいです >>428
= 以降の文字列を抽出するなら
MID(A1,FIND("=", A1,1)+1, 100)
全角数字ってほとんど見ないけど
VALUE(ASC(B1)) エクセル2010です。
一つのエクセルで複数のブックを開き、表示を標準(最大、最小以外)にしたときに、
ブックの上部がエクセルリボンの下に入ってしまい、ブックをエクセル上で移動できない状況になるときがあります。
この状況を打開するにはどうしたらよいでしょうか?
回答お願いいたします。 >>424
文字色を白や背景と同じ色にする ではダメですか? >>428
規則性が無いと難しそうだ
あとアポストロフィ付きの数字があると面倒だな
ISNUMBER関数だと文字列と判定される
VALUE関数なら数値になるけど 以前下記のExcelでメールを作成してメールソフトに流し込むVBAを教えてもらいました
件名と本文が中国語等日本語以外だとメールソフトに流し込まれた時に文字化けします
メールソフト側でUTF-8のメールを作成するようVBAでコントロールできないでしょうか
Sub createMail()
CreateObject("Wscript.Shell").Run _
"mailto:" & URLEncode(Range("B4").Value) & _
"?cc=" & URLEncode(Range("B5").Value) & _
"&subject=" & URLEncode(Range("B6").Value) & _
"&body=" & 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 逆に質問だけど、そのメールソフトであらかじめ設定できないのか? >>439
メールソフト側で設定すると全てのメールがUTF-8になりますよね
それはしたくないので 【1 OSの種類 .】 Windows 10
【2 Excelのバージョン 】 Excel 2016
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
セルに計算結果が表示され、その計算結果が1未満であれば1、1以上であればその数字を表示させるにはどうしたら良いでしょうか。
例えばC1が=A1×B1となっており、
A1×B1が0や-1であれば、C1に1と表示され、
A1×B1が1であればC1に1、2であればC1に2と表示されると言った感じです。
よろしくお願い致します。 >>436
ありがとうございます
とりあえずそれで行きます
もし何らかの設定などで>>424を達成する方法があれば、お願いします >>442
どちらでも
C1=IF(A1*B1>=1,A1*B1,1)
C1=MAX(A1*B1,1) 391です
返事が遅くなって申し訳ない
>>395
この例だと毎回作業列に手を加えないといけなさそうですね…
知識として参考にさせていただきます
ありがとうございました
>>396
txtファイルはウイルスバスターで弾かれて見れておりません…
一応具体的な構成ですが、
・システムから出力される毎月の営業成績データから個人別に各項目の売上小計及び合計を出したい
・個人別のシートが既に作成されており、営業データから各項目を足して小計を出していく
・営業成績データの項目数が毎月変化するので小計部分の位置がその月によって変化する
・営業成績シートの構成としては、A列項目名、B列項目詳細、C〜J列個人別売上金額
分かりづらくてすみませんがこのような状態です
>>397
毎回調整作業をする必要はありますが作業量の減少はできそうですね
目的の式が作れなかった場合はこの方法でやっていこうと思います
ありがとうございました 表示されてない行があって、再表示では表示されず、オートフィルターを解除してもダメ
で結局、VBAで行高さを確認したところ2000行ぐらいのデータのうち高さ0が十数行もあった。
高さ変更して解決したと言えばしたんだけど、なんで高さ0になっちゃったんだろ?
知らず知らずのうちマウス操作ミスって高さ変更ドラッグとかやってしまってるんだろか?
どうも納得がいかない 複数シート選択してるのに気付かずに、
高さ変更とかした影響がよそに及ぶことがある
複数シート同時編集とかやることは希なんだから、
明示的に有効にしない限りoffになってて欲しい 10が100になり5が10になる時に7はどうなるかみたいな関数ってどうすればいいのでしょう? >>448
複数シート選択してるとそういうこともあるんですね
でもそんなことしてるとは到底思えないんです。
たまたま操作ミスで高さゼロにしてしまうことがあるのなら、
行高さをが5だったり、時には20だっりとかあると思う。
でもなぜか高さ0ばかり。
人為的なミスで高さ0が連発ってありえないような気がするんだけど、
人為的ミス以外に高さ0が発生する要因ってあるんですかね? 高さゼロって非表示と同じでしょ
Ctrl-9 押すだけでそんなことは起きる 式が判ってて収束値を求める、みたいなのなら、
反復計算でできちゃうな
解析的に解けない式でも答えが出せてしまう vbaマクロで、ヘッダーにシート名を付けるにはどう記述スレば良いでしょうか?
マクロの記録だと以下のようになります
With ActiveSheet.PageSetup
.CenterHeader = "ヘッダータイトル &A"
End With 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
ピボットテーブルで質問です
以下のデータがあるとして、
ピボット一発で集計する方法はありますか
id 項目
1 りんご
2 みかん,りんご
3 ばなな >>451
Ctrl+9で行非表示って初めて知りました
でも行非表示と行高さ0って同じなんですかね?
Ctrl+9で例えば30行目を非表示にすると29、31と行番号が飛んでるけど
29,31行を選択右クリック再表示で30行目が表示されるはずだけど
>>447にも書きましたが、このときには再表示でも表示されなかったんですよ・・・ 高さ0や非表示は再表示で表示される
高さ1みたいな、カーソルは止まるけど見えないようなのは、
再表示してもそのまま 高さ0と非表示は違うと思ってたけど、同じみたいね。
どちらも0(非表示)にする前の高さ情報持ってるし、同じ操作で再表示できるし。
subtotal関数の引数にしても、同じ結果になるし。 行に対して高さ情報と表示フラグがあって、
高さを変える処理は高さだけ変えてフラグはそのままの筈なんだけど、
0の時だけ例外的に高さ情報はそのままでフラグの方を変える あれ、一緒になったのか?
昔はsubtotatlの結果が変わってた気がしてたけど、気のせいか どこかのバージョンで変わったなら、
>>447の使ってるのは、高さ0が再表示できない高さ0だったのかも
office 2003あたり? vbaでhiddenプロパティ取得しても、どちらもtrueになってる。
高さ0にしても、非表示にしても、hiddenはtrueになる。
verは2016(365)。
知らなかったな、というか以前は違った気がする。 多分違ってたと思う
何かで挙動が変わったと思うんだけど、なんだっけなぁ 非表示にしたのと高さ0にしたのと、xlsxファイルを展開して比較しても、
時刻以外に差分は無いので完全に同一だと思っていい 2003あたりで既に高さ0とhiddenは同じになってたような記憶があるけど >>462
>>447です。エクセルのバージョンは2010です。 それだと高さ0が原因で再表示されないということにはならない
多分フィルターとかが原因 カンだけど、98形式の時に設定した高さ0などが悪さをしていた可能性も >>468 フィルタは解除したんですが再表示されなかったんです。
>>469 確認できる最も古いデータは2015年。自分の記憶を辿ってもOffice2010を買って以降のものと思われます。 フィルターは解除したつもりが解除できてないことが多いからなあ
全解除ボタンがあるのに隠しコマンドみたいになってるし 「クリア」ね
あれすごい使うんだからもっと見えるようにしてほしい おれもショートカット設定するかなー
規定ショートカットはちと面倒で ctrl-2とかctrl-3とか、アクセスいいのに使わないキーを再定義したい
あと、F2の機能を別のキーにもアサインしたい この前入った新人に手元ガン見されて、ショートカット設定やらを真似しようと思ってるらしく、参った
だったら普通に教えて欲しいと言われた方が100倍マシ フィルターのクリアのボタンは、押すとクリアできるのは当然として、
あれがグレーになってるとフィルターがかかってないというインジケーターを兼ねてるから、
常に見えるとこに出しとかないと価値が半減なんだよな ショートカット設定は基本いじらないな。
ほかのパソコン触る時に戸惑うし、人に教える時に困るので。 同じく
再インストールした後の設定がめんどくさくて次第にやらなくなった いじりたくても殆どいじれないがな
読み取り専用設定は登録する
あれ無いと、ネットワークで共有とかできないし
その上、リボンからは辿れないという 今の環境は人とPC共有することもなければ、コマンドの使い方から説明しなければならないこともないからショートカット設定しても問題ないな 読み取り専用の解除でしょ
あれたまーに使う。本当にたまにしか使わないからいつも検索してやり方探してるワ ADOの仕様変わった?
便利にSQL文でSheetをTable代わりにして読み込んでたんだけど、
いつしか読めなくなってた。
connectionのopenでエラーが出る。
色々調べてみたところ、自分自身のBookに対しては、Openでエラーが出るが、
開いていない他のBookではエラーにならずOpenできる。 【1 OSの種類 .】 Windows 7 64bit
【2 Excelのバージョン 】 Excel 2003
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 できるだけ否
A1の[ ' 1 - 20 ]これを隣のB1にコピーすると[ ' 1 - 20 ]とコピーされます。
A2の[ ' 2 - 20 ]これを隣のB2にコピーすると[ 2 - 20 ]となります。
B2は最初の[ ' ]が消えてしまうのですが何故なのでしょうか?
A1もA2も表示形式の分類は「標準」となっているのですが… さすがに2003は古くて環境が用意できない。
2016では再現しない。 ' を付けて逃げるのは多分相当なオールドスタイルだから、
素直に文字列にするのが望ましいんだろうな セル内1文字目のアポストロフィだけ消す方法ありますか? 0をコピーして加算で貼り付けるという方法を見つけた
なるほどなー アポストロフィは強制文字列じゃなくて、左寄せを指定する為の文字なんだよな
まだセル毎の属性とか無かったlotus1-2-3とかの頃の仕様 >>493
だけでもないけどな
csvとかでもあるし 複数のアクティブセルの行を一括で選択する方法ありますか?
単一セルだとsfift+spaceで出来ますか、複数だとできません >>498
範囲に名前をつけて、その後は名前を選んでdel グラフを使ったアニメーションが作りたいのですがボタンでコマを送るプログラムが出来ません
読ませるセルは決まってますので一つ下のセルを読ませたいです。
何かヒントでも良いのでわからないでしょうか? >>498
複数セルを選択
右クリック、削除
行全体を選択
エクセルぶっこわれたから試してないけど、多分こんな感じで行けたと思う 選択と削除見間違えたわ
こええことしてしまった、すまぬ マウスでしかできない操作って結構多いよな
マウスしか使わない人は全く気にしてないだろうけど、
極力キーボードを使う派はまたかよーと出来の悪さを嘆く >>508
外資系投資銀行の新人はまずマウス取り上げられてショートカットやらキーボードのみで仕事することを仕込まれるらしいけど、実質マウス使わない縛りをすると逆に手間増えることもあるよね
やっぱ合わせ技にしとかないと効率悪い excelでの作業をプロジェクターでみんなで見ながら、
会議とかレビューとかすると、キーボードで操作しちゃうと何してるか判らないんだよな
逆にマウスしか使わない方が歓迎されてしまう
右のシートに移動とか、ctrl-pgdnだろ、と思っても、
ぐっとこらえてタブをクリックする >>498
アクティブセルは常に1つ。複数あることはない。
(Excel複数起動とかの場合は除く)
多分選択範囲か、選択セルのことだと思うけど。 いやいや
縦に連続した複数のセルを選択して、
shift-spaceを押すと、複数の行が同時に選択される
それをそのまま演繹して、選択されたセル全体に対して行選択されても、
何の違和感も無いけど、実際にはそうならない
それは単に、そういうモードをソフトが持ってないからに過ぎない >>513
誰へのレス?
誰も「できないのはおかしい」とか言ってないと思うけど。 「Microsoft Office 互換機能パック」が4月で引退 〜11年間以上もの長い間ありがとう!|窓の社
ttps://forest.watch.impress.co.jp/docs/serial/yajiuma/1110841.html 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 ? 2010年蚊も
【3 VBAが使えるか .】 いいえ コピペ程度。開発環境いれてない
【4 VBAでの回答の可否】 不明
エクセルの表。行の文字を入力したり更新したとき、その日付と時刻を入れたい
PC上で表を作成は可能。マウスとキーボード操作離れてるから。
スマホの端末で表をつくることは難しいですか?
どうやってドラックしてみたいなのがわからないわすまほわ >>516
自動的に何かのデータを入れるのはVBA使わないと無理
VBAはメニューに出てこないだけで勝手に入ってる可能性がある
Excelを起動してAlt+F11押してみ PCのExcelなら[ctrl]+[;]と[ctrl]+[:]で日付と時刻はいるからそれ押す癖付けとけばいいんじゃない >>519
ありがとう
しかしこれはまず大変かもw
年〜秒で一遍出だせないんですか? オフィスを買ってPCにいれてプロダクトキーをいれて
別PCにオフィスをいれてプロダクトキーいれると
認証されなかったりしますか?認証される? 2台までつかえるんじゃなかったっけ Office365Businessは15台までだけど >>521
簡単なマクロで出来るから組んで見ればいいんじゃない? 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2007
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】否
A列に任意の数値を入力して、(B数値+2)のマスに+1していく
という式をお願いします Aランク入力 B品番出力 C品番 Dランク E在庫
Cには品番が上から下へ行くほど大きく(0、1、2、3と抜けなし)
Dのランクは上から順に下へ行くほど大きく(同数有)
Eの在庫は0〜
Aにランクを入力すると、Bに在庫があって(0ではなくて)一番ランクが低い(上にある)ものの品番を出力したいのです
よろしくお願いします 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2007
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】否 Aに入力したランク以上で、一番低く、在庫があるもの
です 【1 Windows10】
【2 Excel2007】
【3 いいえ】
【4 否】
上から順に0の連続した数を数える式を教えてください。
空白は処理せず、0以外があるといったん連続を0としてまた数え直したいです。
A
0
0
0
1
0
0
の場合は2です。 2002のエクセルはどうなんでしょう?
表計算程度しか使わない。表でソートと、入力制限?みたいなリストから選ぶやつの機能しか使ってない
今2010つかっててほぼ直感でいろいろ作れて便利ではある。
古いのは直感が使えなかった気がした >>532
作業列ですか
連続した0の数を出力する、そのあと下のものを選ぶ、とかでしょうか? >>533
今さら2002デビュー?
やめとけ!
オレは逆に2000で十分なんだが仕方なく2010使ってる >>530
作業列を使っていいなら簡単
F列辺りに条件が合致するかの式を作って、合致した行のC列をVLOOKUPで参照 >>536
ありがとうございます、VLOOKUP調べ中です。 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2013
【3 VBAが使えるか .】 はい・
【4 VBAでの回答の可否】 可・
マクロボタンを押して日付を取得して、特定の場所に保存するときに、ブックサイズが200KB以上では保存できないマクロを作成したいのですが、
「日付の取得」「リネーム」「特定の場所に保存」「サイズの取得」まではできましたが、「200KB以上は保存しない」ができません。わかる人がいましたら、ご教授願います。 =COUNTIF(C2:C40,I2,E2:E40,0)
C2~ C40がI2で、且つ、E2〜E40が0を数えたい
「多すぎる引数が入力されています」とはどういうことですか?
【1 Windows10】
【2 Excel2007】
【3 いいえ】
【4 否】 COUNTIFSを使えばよかったのですね、自己解決しました 【1 OSの種類 .】 Windows 10
【2 Excelのバージョン 】 Excel2013
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否※VBAの方法しかない場合は可です。
300個の改行がされている文字列のテキストファイルをExcelの1セル内毎に読み込みたいのですがやり方を教えていただけないでしょうか。
例)「あ.txt い.txt」
A1にあ.txtの文字列
B1にい.txtの文字列
上記のように1セルに収めたいです。
普通に読み込みと、あ.txtの場合は、
A1〜H1列までにまたがって、一行1セルとなってしまいます。 =hyperlink で張られているリンク先にキーボード操作で飛びたい
何か手段はある? セルの入力欄のところで直接貼り付けしてもダメなの? 全部手動でやるのがめんどくさいので…
何かいい方法があればと思い質問しました 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
A列に日時、B列に人の名前、C列に業務内容が入った表があります。
【例】
2018/3/17 10:00 佐藤 会議
2018/3/17 10:20 山田 買い出し
2018/3/17 10:40 鈴木 掃除
2018/3/17 10:50 佐藤 休憩
2018/3/17 10:50 山田 面接
2018/3/17 11:00 佐藤 書類整理
2018/3/17 11:20 鈴木 接客
2018/3/17 11:40 佐藤 会議
この場合、D列には10時の会議のところから00:50、00:30、00:40、00:10…という感じで
次の業務までの時間を表示させたいです。
A列の日時は他のシステムで連携使用しているため、名前ごとにソートなど配列変更はできません。
B列の名前を条件にA列の時間の差分が出せれば良いのですがどうすれば良いでしょうか。 あ.txtのファイルの選択とA1のセルの選択は、一意には決まらないんだから、
どうやっても自動化は無理なのでは >>512
選択セルでした、すみません
文字列検索後、該当セルの行を選択したいんです >>503
行を削除じゃなくて色つけたりしたいときはどうやればいいでしょうか? 自分でできました。
ここの人たちは無能ということだけ分かりました(笑) ネットですごい安いオフィスが大量に売ってたりするけど
あれは何かやばいんですか? Excel2010のVBAについて質問です
手でコピーしたWebページを取り込むマクロは作っていたのですが
手のコピー自体を省略するために QueryTables.Add で取り込むと
スペースの全角・半角で不一致が起きています
おそらく区切り文字関連の連続なども不安です
CSV取り込みなどの設定が効いてるようなのですが、うまく制御できません
QueryTables.Addでそのまま取り込む設定を教えていただけないでしょうか エクセルで勤務シフトを作ろうとしています。
どんな関数を使えば良いかが分かりません。
運送業なのですが、シフトを組む際に、勤務時間帯と併せて配達するコースの割振りも必要です。
コースはAコース、Bコースと言う具合にあらかじめ名前がついて決められています。
このコースの割振り漏れ防止のために、割振り漏れのコースがあった場合、どこかのセルに漏れたコース名を表示したいです。
既に勤務時間帯とコースはそれぞれプルダウンリストから選択出来るようにしてあります。
イメージとしては、
田中さんの4月1日のシフトは、A1に勤務時間帯、A2にコース。4月2日ののシフトは、B 1に勤務時間帯、B2にコース。
佐藤さんの4月1日のシフトは、A3に勤務時間帯、A4にコース。4月2日のシフトは、B3に勤務時間帯、B4にコース。
鈴木さんの4月1日のシフトは、A5に勤務時間帯、A6にコース。4月2日のシフトは、B5に勤務時間帯、B6にコース。
と、言った具合で勤務時間帯とコースのワンセットで日々のシフトが一覧出来るようにしています。
どういった関数を使えば解決出来ますでしょうか? なんでエクセルやワードはこんなに高いんですか?
ただの文書ソフトで10年前と特に変化もない。
グラフィックの最新ゲームと比べて値段がおかしいです >>554
いってる意味がよくわからんw
もうちょっとくわしく短時間で理解できる文でないと
時間を凝らして内容を理解してくれる人はいるのかどうか
エクセルの表の入力制限でできるじゃないの >>556
コースが5こあって4個しか選択してないと1コースは配送しないからだめってことじゃないかな コースがABCの3つだとして、プルダウンでABCが選べて、
どこか(日別だろうから上か下)に、まだ未選択のものが表示されてる
ということかな
3つなら見れば判るけど、10個だともう判らない
理想を言えば、プルダウンで未選択のものだけが選べて、
プルダウンが空になれば全部選択完了、みたいなUIが良さそうだけど A=1, B=2, C=4みたいに2進数を割り振って、
sumを7から引く
0なら割り振り完了
みたいな基本アイディアはどうだろう >>552
やばい:
海賊版
やばくない:
倒産した会社の転売
確率は1/2だ >>554
プルダウンで表示ってことはどこかにコース一覧を作ってあるだろうから
それを再利用して、シフト表のコース列をCOUNTIFで検索するだけでいいんじゃないかなあ
出力されるのはコース名じゃなく対応人数だけど >>561
海賊版でも正規のキー入力して使える状態の場合は? >>563
そんなこともわからないのに使おうとするのはやめといたほうがいい
知識を得るか金払ったほうが良い >>547
D1=IFERROR(INDEX(OFFSET(A1,1,0,COUNTA(A:A)-ROW(),1),MATCH(B1,OFFSET(B1,1,0,COUNTA(A:A)-ROW(),1),0))-A1,"予定なし")
あとは、オートフィルで下までコピーしてね。
ちなみに、一行目に項目名が入るのかどうか書いてなかったのと
リストが何行目まであるのかわからなかったからこうなった。
あと、次の予定がない場合についてどうするか書かれてなかったから"予定なし"にしてる。
・・・確定していることがもう少しあったら、もっと短くできたかも。
とはいえ、もうちょっとスマートな方法ありそうだけど・・・
ごめんね、こんなもんしか考えつかなった。精進せねば。 会社で使うからそのバージョンに細かく合わせて対応する必要があるだけで、
個人で使うなら、わざわざ金払わずにOpenOfficeとかでいいのでは offceXPなら500円で売ってたな
ウィルスにかかるかもしれんけど 2003のサポートが終了したからみんな乗り換えてるけど、
それがなければ2003に留まりたい事業所は多かっただろうな
2010で必要十分なので、2013とか2016はまだ触ったことがない >>541
fileLenでファイルサイズを取得後の扱いがわからず困っています。IF関数にしても変数の指定方法がわかりません。 >>561
ID送ってもらってそれをウインドウズで入力するとDLしてつかえるみたいなのとか
よくあるやつだよ? >>570
何言ってるのかわからんがよくあるって理由で安全と思うなら買えば良いんじゃないかな 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
Excelで重複しない乱数(整数)を発生させたいのですが、
ググってもRANDとRANKを使えという情報しか出てきません。。。。
RANKで乱数を振ってRANKの順位を使うという方法です。
これって、RANDの数値が重複したら使えませんよね?
確率的にはかなり低いですが。。。
どうすれば解決できるのでしょうか? >>572
重複しない RANKを追加でググればいい >>572
RANK()とrow()を使う
乱数 順位 row 作業列 最終的な順位
0.2 2 1/1000 2.001 2
0.5 1 2/1000 1.002 1
0.2 2 3/1000 2.003 3
0.1 4 4/1000 4.004 4
こうすれば重複しない1-4の整数の乱数が生成できる >>571
IDパスもらって
360?でDLというやつはなかった? >>575
いやだから安全と思えば使えばいいじゃん
それだけの事だよ >>574
横レスだけど、その場合小さい数字が先に出やすくなるのでは?
ほぼ無視できる確率だし、後先は関係ないなら問題ないけど。 RAND関数にでたらめな数を要求する場合は引数に負数(マイナスの数)を指定するというのが常識
昔のBASICの時代は、RAND(-TIME)とかがよく使われた(TIME関数はシステム時刻で同じ値を2度返すことはない) >>577
指摘についてはそのとおり
問題ないから問題ない >>579
わりーなのび太、エクセルのRANDは乱数じゃないんだ 配列数式の参考書を買ったら、RANDBETWEENの配列数式で今回のみたいなやつの解決法がかいてあったな VBAのRND関数は疑似乱数
実用上問題ない程度の長い周期で同じ数字列がループしてる
初期化というのはループのどこから始めるかを指定するだけなので、ヘタに初期化すると同じ数字が出る可能性が高まる
MSDNにも「所定の初期シードの場合、同じ番号シーケンスが生成されます」と書いてある
https://msdn.microsoft.com/ja-jp/vba/language-reference-vba/articles/rnd-function
同じ数字が出て欲しくないなら、いちいちチェックして取り除くか、別の方法を使った関数を用意するかどちらか >>573様 >>574様
ご回答ありがとうございます。
早速使わせていただきます。 lookupで、列数を絶対値(5列目とか)で指定する人間は滅びて欲しい
後から挿入した途端に破綻するんだよ… column(A10)-column(A1)+1
みたいに書くのも不格好 よろしくお願いします
【1 OSの種類 .】 Windows7pro-64bit
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
VBAではなく、関数の組み合わせで実現したいことがあります。
ある列に、200行くらいにわたって、ゼロを含む数値か空白が入力されています。
この列の、「空白でもゼロでもない数値」のあるセルの、もっとも上の行番号と、
もっとも下の行番号を、それぞれ取得したいです。数値の大きさは関係なく、
とにかくゼロより大きい値の存在する最上位行と最下位行を知りたいです。
途中で作業用のセルを使ってもいいので、何か関数を組み合わせてできないでしょうか? >>590
https://i.imgur.com/EBxSQ8E.jpg
これでいいかな
IF セル<>0、の条件で0と空白両方判定されて、真ならROW()で行番号が作業列に表示
偽のときは指定しないと0が表示されちゃうからとりあえずFALSEにしたけど任意
これらの結果の範囲に対して、最上位行でMIN、最下位行でMAXの関数を使う >>591訂正
あ、>ゼロより大きい値、か
マイナスはありえないのか(訂正不要)、マイナスがある場合は無視すべきなのか(訂正必要)
それとも最上位最下位の対象にしていいのか(訂正不要)で、ちょっと修正いるな >>591
どうもありがとうございました!!!!
他の人はどういうか知らないけど、すくなくとも世界で私だけは、
あなたのことを大天才と認定します。
助かりました!!!! 【1 OSの種類 .】 Windows8
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
A列に開始時間、B列に終了時間、C列に人の名前(毎回7人がデータにある)、D列に「業務中」もしくは「空き時間」が入った表があります。
このパターンでデータが縦並びになっています。
このとき、7人全員が業務中になっている時間と7人全員が空き時間になっている時間をそれぞれ合計で出したいのですがどうすれば良いでしょうか?
6人が業務中で1人が空き時間の場合などは集計対象外です。
あくまでも7人全員で被った範囲の時間の合計を出したいです。 【1 OSの種類 】 Windows10
【2 Excelのバージョン 】 Excel 2016
【3 VBAが使えるか 】 いいえ
【4 VBAでの回答の可否 】 否
ビルドを前に戻したくて
officec2rclient.exe /update user updatetoversion=16.0.8730.2122
を実行しました。
すると、
>Suggestion [3,General]: コマンド officec2rclient.exe は見つかりませんでしたが、現在の場所に存在します。
エラーが出てきます。
どうしたら解消できますか? vlookupの列番号はどう書くのが一番スマートなんだろうな
表自体に番号を仕込んだ方が良さそうな気がする >>597
意味不明なエラーメッセージに悩みましたが、解決したので質問を取り下げますm(_ _)m オフィス365
上の列?を3つぐらい選択して表を挿入すると
先頭の列しか表にならない
また角をドラッグしてしたにのばしてオートフィルで123456・・・みたいなのもできない
オフィス365はもしかして機能が大幅に劣るダメそふとなんですか? >>598
index,matchへ切り替えるのがスマート >>600
機能が劣るのではなく元々そういう仕様
気に入らないのならExcel2016にしましょう 素直にテーブルにして構造化参照使えやジジイがテーブル毛嫌いしてクソブック量産し続けるの本当にクソ >>602
もともとにするいみあいがわからんわ
オフィスで使ってた人が移行しずらいし。 indexもmatchも使ったことないな
これは縦方向の話で、それはvlookupでも別に困ってなかった
横方向の列指定を、3じゃなくてA3とか使って書ければ済むだけの話で、
indexの為に範囲指定したから登場したけど、同様に「A3を含む列」みたいな
指定ができれば後はvlookupの方がシンプルなのに >>604
Excel2010でも
A1に1を入れて、右下角の黒ぽちでしたにコピーした
だけだと1,2,3とはなってくれないよ1,1,1ですよ。
ctrlキー押しながらコピーするか。
右下の選択肢選ぶか。
1,2と打ってから2セル選んでフィルするか。
ま、この辺でしょうね。 >>604
あ、ごめん
3つくらいえらんでと言うのを見逃した
>>606は無視して エクセルで2つのファイルひらいているのに1窓で表示されます
どうやったら2つのブラウザみたいにできますか?
ウインドウズ10でdesktopを5ぐらい作っていて1つで
エクセルを開くと
すべてのデスクトップでエクセルが見えてしまいます
1つだけのdesktopで見えるようにしたいんですが >>605
そのa3に入れた数値が役に立たなくなるだろって言ってんのよ 2つのウインドウで表示はなんとかできましたが
ウインドウズ10で田薄のデスクトップを作成すると
他のデスクトップに表示され続けてしまうのがわかりません。 VLOOKUP(値,A1:C3,COLUMNS(A1:C3),TRUE) なんか変
COLUMNS(A1:C3) の A1:C3 とは言葉で言うとどういう領域なのか、説明できない
A1もC3も両方書いちゃうなら、
COLUMN(A3) - COLUMN(A1) + 1
の方が直感的に判る 【1 OSの種類 .】 Windows10 64bit
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
ファイルサーバに置いたExcelのファイルを「ブックの共有」で複数人が同時に
アクセスして編集するんだけど、ときどき上書き保存できない場合がある。
編集した内容を確実に保存する方法ってあるんでしょうか? 共有を止めて、編集する人以外は読み取り専用にしておく方法もある
うっかり読み取り専用なのに編集してしまって、編集内容を失う悲劇も起きる >>611
COLUMNSにすると列の増減に対応できるって事?
a::cとかの方が良い気がする
>>615
他の人が保存してる時は保存できない
確実に保存する方法は多分、ない
ってかエクセルの共有はウンコすぎるので、共有使うならスプレッドシートの方がいいよ 1 OSの種類 .】 Windows 7
【2 Excelのバージョン 】 Excel 2007
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
(A9−A1)/8の解をB2〜9に表示がしたいです。
下記の条件で、B2〜9に入る数式を教えていただきたいです。
A1及びA9の数字は予め確定しています。
B1は空白です。
A2にはA1+B2を表示します。(以降A9まで同条件)
条件
(A9−A1)/8の解が、少数第二位以降
125と続く場合は、B2のみ少数第二位切上げ、B3以降は少数第二位切捨て
250と続く場合は、B3まで少数第二位切上げ、B4以降は少数第二位切捨て
375と続く場合は、B4まで少数第二位切上げ、B5以降は少数第二位切捨て
500と続く場合は、B5まで少数第二位切上げ、B6以降は少数第二位切捨て
625と続く場合は、B6まで少数第二位切上げ、B7以降は少数第二位切捨て
750と続く場合は、B7まで少数第二位切上げ、B8以降は少数第二位切捨て
875と続く場合は、B8まで少数第二位切上げ、B9以降は少数第二位切捨て
0と続く場合は、(A9−A1)/8の解をB1〜9にそのまま表示
つづく つづき
例
(A9−A1)/8の解が11.0375の場合
A B
1 100 -
2 111.1 11.1
3 122.2 11.1
4 133.3 11.1
5 144.3 11.0
6 155.3 11.0
7 166.3 11.0
8 177.3 11.0
9 188.3 11.0
よろしくおねがいします。 つづき
例
(A9−A1)/8の解が11.0375の場合
A B
1 100 -
2 111.1 11.1
3 122.2 11.1
4 133.3 11.1
5 144.3 11.0
6 155.3 11.0
7 166.3 11.0
8 177.3 11.0
9 188.3 11.0
よろしくおねがいします。 >>611
columns関数を使うならそりゃ大丈夫だけどね >>595
作業列使う上に、やたら長くなっちゃったけど。
あまりデバッグ時間とれてないから、何かおかしくなるパターンあったり
状況が違う場合はまた教えて。
1行目からデータが始まっていて(1行目に項目名がない状態)
E列を作業列とし、G1:H2 に結果をだしてる。
E1=IF(AND(COUNTIFS($A$1:$A1,$A1,$D$1:$D1,$D1)=1,COUNTIFS($A:$A,"<="&$A1,$B:$B,">"&$A1,$D:$D,$D1)=7),LARGE($A:$B,RANK($A1,$A:$B)-1)-$A1,0)
⇒以下オートフィルで下までコピー
G1=業務中
G2=SUMIF($D:$D,G1,$E:$E)
H1=空き時間
H2=SUMIF($D:$D,H1,$E:$E) >>618
作業列・・・というか一覧あったほうがやりやすかったから
D列(別にほかの列に変えてもいい)に条件の数字いれちゃったけどいい?
これまた長くてごめん。何かおかしかったら教えて。
D2=125
D3=250
D4=375
D5=500
D6=625
D7=750
D8=875
B2=IF(COUNTIF($D2:$D$8,MOD(INT(($A$9-$A$1)/8*10000),1000))<>0,ROUNDUP(($A$9-$A$1)/8,1),ROUNDDOWN(($A$9-$A$1)/8,1))
⇒以下B8までオートフィルで下までコピー
B9=ROUNDDOWN(($A$9-$A$1)/8,1) >>623
まずは、ありがとうございます。
例題は教えていただいた数式で求めていた結果が出ました。
次に模擬値で試してみたのですが、下記の場合に違う解が表示されます。
なぜこのようになるのか、お手数ですが教えていただけると助かります。
A9 38639.7
A1 38618.1
この場合B2〜9に表示したい結果は2.7なのですが、何故か2.6で表示されます。
A9 28639.7
A1 28618.1
この場合は、正しく2.7と表示されます。 >>616 617
さんくすこ。2chでこんなに親切なレスがついたのは初めてだ。(> <) >>624
あーでちゃったかー
それね、小数点の計算によるエクセル・・・というかプログラム的な問題なんだよね。
2進数での計算と10進数での表示による丸め問題。
問題が出たほうの数字をA1とA9に入れて、B9の数式を検証かけてもらうと、分かりやすく見えると思うけど、
A9-A1の、単純な少数計算の時点でおかしくなってるね。
解決方法としては・・・もし、A1とA9に入れる数字が、小数第一までしか入れないのなら
単純に10倍して整数計算させればどうにかなるかも。
第二まで入れる事もあるなら100倍ね。以下略。
(その後の処理も綺麗に直せよと他の回答者メンツから突っ込まれそうだけど、今ちょっとExcel触れなくてスマホから書き込んでるから許してw)
B2=IF(COUNTIF($D2:$D$8,MOD(INT(($A$9*10-$A$1*10)/80*10000),1000))<>0,ROUNDUP(($A$9*10-$A$1*10)/80,1),ROUNDDOWN(($A$9*10-$A$1*10)/80,1))
⇒以下B8までオートフィルで下までコピー
B9=ROUNDDOWN(($A$9*10-$A$1*10)/80,1) 100倍するんじゃなくて、この場合は8倍するのが正解
要は整数値で処理する いや100倍でいい
後は書式設定で小数っぽく見せれば良い >>628
プログラムは、ちゃんと勉強した訳じゃないから教えてほしいんだけど、
小数の結果が欲しい場合って、途中を全部整数で計算しても、
最後に10やら100やら1,000で割っちゃったら結局ダメ? >>630
それは目的による
途中を整数で処理するんなら、例えば結果を表示する時も数字はそのままで小数点を文字列処理した方がいい場合もある Excel2016でセルに0.1を10個入れて足したらちゃんと1.0000以下略になった
書式は数値で少数以下を15桁にした
昔とは内部処理が変わった?確かめ方が悪い? vbaだとこれだけでfalseになる
2013で確認
?(0.1 + 0.2 = 0.3)
False 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
前年比を知る表作成で質問があります。
https://prau-pc.jp/excel/growth-rate/#i-3
上記ページのC4の猫缶は
前年14,000から今年13,200に減り-6%でした。
この計算は理解できるのですが、
同じ表に、プラス成長とマイナス成長が混在する下記の様な状態の場合
http://www.kepco.co.jp/ir/financial/graph/images/graph_17.jpg
例えば
(A)14,000から13,200に減った値
(B)-14,000から-13,200に増えた値
が混在する場合、どのようにすれば良いのでしょうか?
(A)(B)共に-6%になってしまい困っております。 分母(基準値)は常に正にとる=>分母を絶対値にする
例えば
=(A1-A2)/abs(A2) -100が0になった場合、100%としていいんだろうか
100が0になった時に-100%なのは判るけど、それは最低が0という前提がある 2010と2016はずいぶんちがいますか?
2010はまだまだ安泰ですか? >>638
それは間隔尺度か比例尺度かを考えないといけない
上記の例は間隔尺度を前提。
比例尺度の場合は、温度で言えば分母に絶対0度(-273℃)のような
値の絶対値(abs(-273))が入る。
問題は分母が0の時だね。
この場合は"-"とかあるいはそのままエラー出しておく
しかないんじゃないかな。 -50 が 50になったら200%
-0.1が100になったら100000%
何かの役に立つ値が出ると思えない 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
1つのセルにtcp 80,81,90-101 udp 1000,1001とかあったとして(a1)
tcp 80 81 90 - 101 udp 1000 1001とそれぞれ別個のセル(a2〜a9)に入れる方法あったら教えて下さい
a1の 加工若干ならありです [データ]-[区切り位置]でスペースとカンマとマイナスを区切り文字にすれば行けそうだけどマイナスは消えるかなあ >>643
2段階にして、90-101だけもう一度"-"をデリミタにしてやるといいような。 >>639
見た目(雰囲気)がちょっと違う。平べったい感じ。
一番わかりやすい違いは、複数のブックを開いて”整列”で並べたときに「それぞれのブックにリボンが表示される」ので
「縦に並べて表示」は、縦長ディスプレイ必須ってとこでしょうか。[Ctrl]+[F1]でリボンを非表示にすればいいだけですが。
自分としては、2010の方が使いやすい。でもサポート終了まであと2年半ぐらいしかありません。 >>639
複数のエクセルファイル開いたとき複数のウィンドウで開けるから便利 >>647
ウィルスに感染する可能性が高まる
お金を出すか、ケチって個人情報ばらまくか、お好きに 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 まあまあ
【4 VBAでの回答の可否】 可
数年ぶりにエクセルとVBAをいじっている者です。
フォームのボタンクリックで、他のファイルから情報とってきたり集計したりと忙しく働く
システム(ってほどでもない)を作ったんだけど、ちょっとした時間が待てずにやたら
その辺をクリックしたりガチャガチャキーボード押すバカのせいで動作が不安定になる。
これを何とかしたいです。
たしか、マクロ実行時に、「この件の実行が終了するまではユーザーの操作受付停止」
「っていうか、ユーザー無視して、PC資源をこのマクロ実行に集中させる」
というVBAの常套句があった記憶があるんだけど、わかる人いますか? >>650
イベント禁止のこと?
Application.EnableEvents = False
ユーザーの誤操作をすべて無視するように作るのは、それなりに面倒だった記憶が >>651-652
勘違いだったかも。
お騒がせしました。
どうもすみませんでした。 Windows7、 Excel2010、VBA少しできます、できればVBAを使わない方法がしりたい
助けて下さい!!
あるセルに、
あいうえお(改行) かきくけこ(改行) さしすせそ(改行) たちつてと(改行)
なにぬねの(改行) はひふへほ(改行) まみむめも(改行)
なにぬねの(改行) はひふへほ(改行) まみむめも(改行)
と入力されたとします。そして別のセルが選択され、入力受付状態じゃなくなったとき
そのセルのサイズが高さ3文字、幅10文字分だったとして、下の行の方の3行を表示、つまり
----------------|-------------
なにぬねの |
はひふへほ | (となりのセル)
まみむめも |
------------------------------
と表示されるようにすることって可能ですか?
どうしても行が足りないときは上の方から表示されることしかできませんか? >>655
下揃えにして高さ決めればいけるんじゃ? >>656
いっぺん自分でやってみ
書式設定では無理だったよ
方法があるかどうか俺にはわからない >>655
Won10のoffice2016(365)だと、「下詰め」でいけるっぽい。
2010だと分からない。 1行からはみでる時に、はみ出さずにセル内だけで諦めさせる方法も知りたい
右のセルに空白か何か入れれば出来るけど、書式で >>655>>657
>>656だけどすまん、無理だった
下揃えってこんな挙動になるのね 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 使えない(抽出印刷のみコピペしながら使っている)
【4 VBAでの回答の可否】 可
入力規則のプルダウンリストについて
シート1
工事番号
1
1
2
2 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 使えない(抽出印刷のみコピペしながら使っている)
【4 VBAでの回答の可否】 可
入力規則のプルダウンリストについて
シート1
工事番号 工種
1 掘削
1 埋戻し
2 溶接
2 研磨
シート2に日報として、A1セルに工事番号1を入力した場合、B1のリストを
掘削、埋戻しにしたいです。
名前の定義ではシート1で工種が追加になることもあるので避けたいです。
シート1の列の配置はそのまま工事番号、工種で並べておきたいのですが、よい方法ございますか? ドロップダウンリストって結局は入力規則の一種に過ぎなくて、
入力した後はただの文字列だし、入力後に規則が変更されても何の反映もない
リスト化されているなら、それぞれにコードを振って、
コードで管理すればいろいろデータ活用できるのに ソートを末尾の文字(半角英数字)で行う方法を教えてください (1)一行目をセルに入れてドラッグするだけで↓のようにしたいのですが
=VLOOKUP(D3,D3:F100,3,0)
=VLOOKUP(D4,D3:F100,3,0)
=VLOOKUP(D5,D3:F100,3,0)
=VLOOKUP(D6,D3:F100,3,0)
=VLOOKUP(D7,D3:F100,3,0)
=VLOOKUP(D8,D3:F100,3,0)
=VLOOKUP(D9,D3:F100,3,0)
(2)ドラッグすると↓のようになってしまします
=VLOOKUP(D3,D3:F100,3,0)
=VLOOKUP(D4,D4:F101,3,0)
=VLOOKUP(D5,D5:F102,3,0)
=VLOOKUP(D6,D6:F103,3,0)
=VLOOKUP(D7,D7:F104,3,0)
=VLOOKUP(D8,D8:F105,3,0)
=VLOOKUP(D9,D9:F106,3,0)
(1)のようにする方法教えていただけないでしょうか >>669
相対アドレス、絶対アドレスを勉強すると良いよ >>670
ありがとうございます。できました。
=VLOOKUP(D3,$D$3:$F$100,3,0) >>668
A列に数字が入っているとしてB列に=MOD(A1,10)を入れて
B列でソートすればいいかと >>668
すみません英字もあるんだね
>>672は数字だけで考えた >>668
B列に
=RIGHT(A2,1)
でどうでしょう 普通に考えるとそれだろうな
1文字でいいのかという気はするけど 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 可
https://i.imgur.com/BAJQU34.png
昨日の行動を名前の隣に表示させていのですが、良い方法はありますでしょうか?
Vlookupを試そうとしたのですが、こういった表示だと出来ませんでした。 >>678
できました!ありがとうございます。
ただ1行目以降連続して計算するにはどうすればよいでしょうか? >>680
範囲の前半(コロンの前の部分のみ)絶対参照にして、行番号をrow()-1とかにすればよいのでは?
もっとよい方法もありそうだけど。 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Office365
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 否
A B C D
1 鈴木 鈴木
2 佐藤 佐藤
3 山田 山田
4 五十嵐
5 乾
6 鈴木部長 ○ ○
7 佐藤課長 ○ ○
8 山田主任 ○ ○
9 五十嵐 ○
10 乾 ○
こんな感じの表で、関数の組み合わせで○を自動で埋めたいのですが可能でしょうか。
B-D列の1-5行までには、役職なしの名前が入っています。
A6-A10には、役職ありの名前が入っています。
1-5行までの名前がA列に存在すれば、該当する箇所に○を入れたいのです。
役職はあったりなかったりなので、LENやRIGHT等で機械的に文字列を取り出すことが
できませんし、名前も1文字から3文字まであるので、最初2文字という取り出し方も
できません。
VLOOKPUとかCOUNTIFとかいろいろ考えたのですが、どうにもうまくいきませんでした。 >>682
まず役職のリストを作ればうまくいくような気がする。 >>681
助かりました。
本当にありがとうございます。 >>683
別のセルに役職のリストを作っておいて、if文でネストを作ってVLOOKUPということでしょうか?
できれば余計な情報を書いたセルやシートは作りたくないのですが 役職の数次第だけど。
パッと思いつくのは、substitute関数使って役職名を削除する。
リスト作らなくもできるけど。 >>686
なるほど、substituteで役職部分を消した文字列を作ってvlookupするんですね https://goo.gl/xnKHDt
この請求書の真中の表みたいに
バックをグレーと白の交互にするのは背景色変更すればいいだけなので楽なのですが
数量単価の間の白い表の枠ってどうやってるのでしょうか? >>660
その列のアルファベットの右線をダブルクリック 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 2010
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
条件付き書式で数値が奇数の場合のみ背景を青にする方法を教えてください。
条件適用の範囲はB2:B101です。よろしくお願いします。 >>682
B6に
=IF(COUNTIF(B$1:B$5,"鈴木"),"○","")
B7に
=IF(COUNTIF(B$1:B$5,"佐藤"),"○","")
…
と入れていき、B6:B10の範囲を選択してフィルハンドルで右に伸ばせば簡単 >>694
実際はもっと色んな人がいて、役職も色々あるんだろうな・・・と勝手に推測したw >>695
E列かどこかにA列のデータをコピーして置換でまとめて削ればいいんじゃね? >>694
それだと、鈴木や佐藤を手打ちしてるわけだから、少しやりたいことと違うと思う。
ようは鈴木や佐藤を自動(関数を使って)取り出したいということなので(多分)。
別シートにでも役職リスト作って、substitute関数で名前を取り出すのが、一般的な方法かと。
ただし、役職の数だけネストする必要がある。 >>692
mod関数を使って、奇数か偶数か判定する。 >>692
奇数かどうか判定するには、整数かつ1の位が奇数(1,3,5,7,9)かどうかを調べればいいので
=AND((B2=INT(B2),OR(B2-INT(B2/10)*10=1,B2-INT(B2/10)*10=3,B2-INT(B2/10)*10=5,B2-INT(B2/10)*10=7,B2-INT(B2/10)*10=9))
俺の頭ではこれが限界だ
誰か、もっと難しい式をたのむ >>697
そのとおりで、これを何に使っているかと言うと、大型連休の出勤当番を割り当てるのに使います
該当者は毎回変わるし、異動があれば役職も色んな人が入ってくるので、鈴木や佐藤を自動で
取り出してチェックしたいのです
別シートに役職リストを作る、というのは、内容的には式中に役職リストを作るのと変わりません
よね? 役職の数が増えたら、式中のネストは手作業で増やす必要がありますよね?
他の人がメンテする可能性を考えたら、式中に直接打ち込むほうがいいのかな
>>694のやり方だと確かにできますが、A列の人の名前が変わるたびにB列の式を変える必要が
出ますし、結果は「○」が出るかどうかだけなので、B列の修正忘れに気づきにくいのを心配して
います >>701
自分なら役職リストを作る。
そのリストをもとに面倒だけど、substitute関数で役職の数だけネストする。
スマートではないけど、役職を少し多めに作っておけば、毎回関数を直す必要がない。
そんなに役職数増えたりしないでしょう?
現在ある役職が10なら、13くらいで作っておくとか。
リストを参照することで、役職名の変更には対応しやすい(例えば班長という役職が廃止されて主任になるとか)。 >>682
これでどう?
B6:=IF(SUMPRODUCT(COUNTIF($A6,B$1:B$5&"*")*ISTEXT(B$1:B$5)),"○","") >>702
読みながら、たしかにそうだろうな、想定できる役職を一通り書いておいて、さらに将来的な
空白セルの分まで参照して式をつくるべきかな、と考えていたら
>>703
これでバッチリできました!
どういう仕組で機能しているのかはわからないので、これから詳しく解析してみます
ありがとうございます >>704
この式は「前方一致」だから、例えば"久保田部長"で検索するとして、
"大久保"はスルーするけど、"久保"はヒットしちゃうので注意が必要。 >>705
それはもう仕方ないですね
役職を除外して参照するという処理をする以上、役職リスト等を参照しない限りは、参照したい
文字が含まれていればすべてカウントするという処理をするしかないでしょうし 1日目 朝昼夜
2日目 朝昼夜
:
こういうデータシートから
朝昼夜朝昼夜…という並びでグラフ化するにはどうしたらよいですか? 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
セルA1に1をセルB1に2を入力して印刷
セルA1に3をセルB1に4を入力して印刷
セルA1に5をセルB1に6を入力して印刷
これをA1が99、B1が100になるまで繰り返してるのですがVBAでできないでしょうか? >>709
簡潔に纏められ、分かりやすい解答だと思います。 いや、悪気はないです。
今PCが手元にないので。スマホでも書けそうだけど。
この場合、もしプリンターが複数あるなら、その辺もマクロで書いておく方がいいと思う。
プリンターの設定間違えてほかのプリンターで処理してしまうと50枚印刷されてしまうことになるので。 プリンターは1台しか接続していない場合だとどういったマクロになりますか? dim i as integer
for i = 1 to 50
cells(i,1)=(i * 2)-1
cells(i,2)=(i * 2)
activesheet.printout
next i
こんな感じでは?
loop until の方がいいような気もするけど、とりあえず。 >>708
vba使わなくても予め50シート作っておいてまとめて印刷するのはどう?
マクロわからない人でも保守できるよ どうでも良いけど印刷関係のマクロ作るなら、既定のプリンタをpdf,xdw,xpsあたりに変えておかないと、満足にデバッグ出来ない気がする エクセルは、モッサリ感が半端ないのに、
50シート作ったら、仕事にならない感じがする。 このスレでそれはなしな
いわゆる普通の事務員でAccessを使える香具師はそう多くない accessを少しでも知ってたら、こんな作業をやらせようとは思わんわ Accessは知ってるけど>>708の作業ごときでAccessはないわ "Excel VBA 連続印刷 差込印刷"
あたりでググると、サンプル結構ありそうだ。 一時的にでも50シート作って印刷1回にした方がいいんじゃないの
VBAで50回印刷とか酷い時間になる 別に、事務員ならどうせ日中暇なんだからぽちぽちやっときゃええやろ そもそも、>>708の作業に意味があるように見えないっていう
穴を掘らせて埋めさせる的な刑罰の一種? データと出力を別けてればよくあるパターンだと思うよ。
1人一枚の出力で50人分とか。
VLOOKUPで社員コード引っ掛けて、データ拾って出力。 ほかのセルにはA1とB1を使った数式がいくつも入ってんじゃないの?
まあ番号札とかアンケート用紙みたいなのを印刷するだけの簡単なお仕事でも別におかしくはないけど 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2013
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
以下の条件に合致する場合、3列目にOKの文字を出力したいです
条件:1列目の数字が同じかつ2列目の数字がひとつ上の2倍
例)
1 1500
1 4000
2 20000
2 22000
↓(関数結果)
1 1500
1 4000 OK
2 20000
2 22000
どなたか方法を教えてもらえませんでしょうか >>728
C2にこの式を入れて下にコピペ
=IF(AND(A1=A2,B2/B1=2),"OK","")
でも、その例で4000は1500の2倍じゃないよね
条件が「2倍」じゃなくて「2倍以上」じゃないの? >>729
こんなに早くありがとうございます
2倍以上が正しいです
本当にありがとうございます
早速試してみます >>730
2倍「以上」ならこうね
=IF(AND(A1=A2,B2>=B1*2),"OK","") >>731
できました!
ありがとうございます!!
このご恩は一生忘れません!!! >>725
出荷する荷物に貼る用紙を作成するためです
入力する番号は荷物の通し番号になります Accessがドストライクな案件だけに惜しいな
テーブルに番号の組み合わせを入れて(扱う番号の拡張性も高い)
レポートに欄を作って印刷するだけ 俺もシリアル番号の印刷とか片手間仕事でたまにやるわ
エーワンのラベル用紙に末尾を1から30まで変えながら印刷とか
以前はサインペンでせっせと書いてたらしい しょーもない仕事はクレバーに一瞬で解決できるのに、
しょーもない仕事が発生する場所にクレバーな人材はいない シート50枚作って、プリントは手作業で一括というのを
批判覚悟でPowerShellで書いてみたVBAよく知らないもので。
$excel=new-object -ComObject Excel.Application
$excel.Visible=$true
$wb=$excel.workbooks.add()
$ws=$wb.ActiveSheet();
for($i=0;$i -lt 50;$i++){
$n=$i*2+1
$left=$ws.Cells.Item(1,1)="$n"
$right=$ws.Cells.Item(1,2)="$($n+1)"
$ws=$wb.Sheets.Add()
}
$ws.Delete() その程度の処理をpowershellで書けてVBAで書けない上にVBAスレを見ていると言う謎 >>739
$left, $rightが意味不明
セルへの代入で文字列化する必要もないし
foreach($i in 0..49){
$ws.Cells.Item(1,1).value()=2*$i+1
$ws.Cells.Item(1,2).value()=2*$i+2
} perlが変数にいちいち$付けるの嫌だああってrubyでは無くしたのに、
また同じようなことしとる 中学生が頑張って書いてる姿を想像するとキュンと来る >>708
ごめん間違ってた。直しました。
activeprinterのところはプリンター名直すか、削ってもオーケーです。
最大値100じゃなくて4にしてます。
Sub test()
Const START_NUM As Integer = 1 '数値の開始値
Const FINISH_NUM As Integer = 4 '数値の終了値
Const PRINTER_NAME As String = "Microsoft Print to PDF" 'プリンター
Dim i As Integer
i = START_NUM
Do Until i = FINISH_NUM - 1
Cells(1, 1) = (i * 2) - 1
Cells(1, 2) = Cells(1, 1) + 1
ActiveSheet.PrintOut Copies:=1, Collate:=True, _
IgnorePrintAreas:=False, ActivePrinter:=PRINTER_NAME
i = i + 1
Loop
End Sub >>741
VBAスレッドじゃなくExcelスレッドなんでVBA関係なく参考になるから
(VBA使わないのはシートとプログラムは完全分離したい、中に埋め込みたく
ないという思考あるもので)。
>>742
あたまに0入れたいとかあるかな〜と思って
left,right は質問のかたが何やってるかわかりやすいかなと思った次第。 >>742
考えてみたら、
あたまの0、これは計算時に省かれちゃうな。
ってことは、私のこの部分意味なかったってことやな。あちゃ。 まだ間違ってるわ。
do loop until i > FINISH_NUM \ 2
に直してください。
細かいこと言えばまだいろいろあると思うけど。 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2010
pngファイルをwindowsフォトビューアーで開いた後、エクセルにコピーアンドペーストで貼り付けたいのですが、貼り付けることができません。
PowerPointには貼り付けれるのですが…
excelでは挿入機能を使うしかないのでしょうか。
いい方法があれば教えていただきたいです。よろしくお願いします。 Wordやパワポと違ってExcelは挿入からしかできませんね。 フォトビューアーのメニューにわざわざペイントあるんだから
それ使うんじゃまずい?
それ以外ならSnipping Toolではいかが? >>749
前提を覆して申し訳ないが、
フォトビューワーは使わない。何故なら、同じ用な点でめんどくさいから
常にペイントで開くようにしてみては・ >>753
フォトビューワーのメニューにペイントがあるから
直接でもフォトビューワー経由でもそれほど変わら
ないはずなんだけどね。 >>750-754
ありがとうございます。ペイントを経由して貼り付けようと思います。 順番が逆のような気がしないでもない
たぶん画像にデータを付加、またはデータに画像を添付したい
ってのが本来の目的な気がする 回り道して余計な仕事増やしているだけのような いや、ひとりごと 【1 OSの種類 .】 職場環境:Windows7 自宅環境:Windows10
【2 Excelのバージョン 】 職場環境:Excel2016 自宅環境:Excel2010
※質問用のエクセルファイルは自宅環境で作成しましたが、実際に使用するのは職場環境です
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
https://dotup.org/uploda/dotup.org1500173.xlsx
上記のように、エクセルにてパレード図を作成しようとしています。
ピボットテーブルにて件数ごと降順で並び替え、かつ件数が1件のものはグループ化しその他として一番下にしたいです。
しかし、降順でソートしたあと、その他を一番下に持っていこうとすると、
降順ソートが解除され、その他以外順番がばらばらになってしまいます。
全部手動で並び替えるのはかなり手間なので、ピボットテーブルの機能で並び替える方法があったら教えてください。
ピボットテーブルを値として貼り付け、普通の表にすれば並び替えられますが、
ブックがごちゃつくし、あとでデータを追記する際煩雑になるので、可能ならピボットテーブルのまま並び替えたいです。 みなさんフォントって何使ってますか?
最近だと遊ゴシック?
でも古い資料とかとの整合性とか考えると…セルの幅とか勝手に変わっちゃうし
でもMSPゴシックもなぁ… >>758
excel 2016
グループ化した後、列ラベル欄で手動並び替えにして自動並び替えを外す
件数の欄で降順に並び替え
その他ラベルで移動を選択して末尾へ移動 >>759
そのまま
古いファイル開いてコロコロ変わるのが一番ウザい >>759
游ゴシックは全く使わないようにしてるな
文字の高さがずれるのか見ててイライラする
エクセルだとひとつ前のメイリオUIにしてる
整合性は全く考えていないのでMS Pゴシックにはしていない >>762
メイリオの方が行間広くないです?
もうちょいまともな標準フォント用意して欲しい。
>>700
「もっと難しいのを」って書いてるから、多分冗談なんだろうけど。
この式、エラー出るよ。 >>763
なんで >>700 はわざわざあんなに難しくしたのかが
これが意味不明なんだわ〜〜〜
真面目に書けば
奇数の判断なんて mod(n,2) が1なら奇数0なら偶数ってだけの話なのに。
わざとなんだろな >>761
>>762
ありがとう
フォントだけ変わってくれればいいのに行間が変わるからめんどくさい
この辺の対策しないところをみると、メイリオ以降の行間が正常で旧フォントが行間が妙に狭いという形にしたいのかな
meiryoKeConsoleだとセル幅も変わらずフォントだけ変更できるんだけど他人に渡すとバグっちゃうのかな?
あと、明朝は遊明朝にするとセル内の表示高さがバグるというか逆になっちゃうんですね
何かとややこしいなぁ… 英語と日本語と混在だから、MeiryoUIくらいしか選択肢が無いんだよな
かなが正方形でなくなって、英字がちょっと広くなっちゃうけど
自分しか使わないファイルは、meiryoKeGothicにしてる >>766
meiryoKeGothicなんて今知った 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2013
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
Excelて各セル(行)の高さを表示する機能や関数はありますでしょうか?
表形式の文書を作っていて、各行の高さをセル内の行数にあわせて調整するものの、それを一目で見たいのです
例えば、A1セルには1行目の高さ、A2セルには2行目の高さ(以下繰り返し)のような感じで。 セルの表示形式で、例えば文字列の場合に赤字で表示するとき、
[赤]@
で出来るけど、この「赤」を英語にすることってできます?
要は、英語版のExcelだとどう設定すれば良いのか知りたいです。 >>773
ありがとうございます。
日本語版ではRedが使えないということは、英語版からカスタマイズされてて、Redは省かれてるですね。 フォントをms pごしっくにしない理由ってなんかあんの?デフォルトでよくね? 見苦しいのか
理系で論文書いてたら当たり前のフォントだから何の違和感もないけど >>775
非常識だからだよ
書体以外でも変なことしてるんじゃ? >>766
meiryoUIに1票
ke知らないから見てみるわ
でもたぶん使い分けめんどいから結局UIな気がする
>>775
MS Pゴシック
なんであんな汚いフォント使うのか、まったく理解に苦しむ meiryoUI >= MS P(UI) >>> 游UI
現行デフォルトの游ゴシックは、文字がかすれたり上下余白がおかしくなるからダメ メイリオから続く狂った行間は何を押し付けようとしてるんだろう MSPゴシックは解像度低くても読める事が優先のフォントだから高解像度だと煩すぎて駄目だな
逆に游ゴシックは高解像度特化だから低解像度だと読めん
メイリオはガキ臭くて仕事で使う気になれん
結局は游ゴシックにしてるわ 游ゴシックは、昔からの帳票類がどれもこれもレイアウト総崩れで論外 そおゆう四角四面でガチガチなガラパゴスビジネスリテラシーにうんざりしてんじゃね
「こうでなければならない」だの「これしかない」みたいなのをぶっ壊したいんだ
たかだか数十年の「当たり前」ってのはこれからの数十年もおんなじ
なんてのを否定しちまえばいいんだ 個人的な感想ですけど >>775
今はデフォルトが遊ゴシックだよ
>>780
keはメイリオ改みたいなもの
パッチで改造するものだから普及はしてないので
自分で使うくらいにしかならない
>>784
結局それなんだよね
新しい環境でやろうにもレイアウトが全部崩れるってのが
まぁ全言語共通行間?みたいに変更したいようだけど 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 否
=TODAY()を使用するとなぜか昨日の日付になってしまいます。
やろうとしていることはカレンダーを作成し当日のみ条件書式でハイライトすることです。
途中何度か関数を入れ直すと過去の日付をハイライトしたり変な挙動をしつつ最終的には昨日で止まっています。
ちなみに計算は自動にしてます。
真新しいファイルで作成しました。
どなたか御存知でしたら教えてください。 >>787
数式うp
そもそもワークシートに並んでるカレンダーの数字はどうやって入力した? >>792
now関数はどうなりますか?
あと、vbaで、date関数は? >>790
日付はctlr+で入力しオーフィルハンドルで下にひっぱっただけの極々単純な入力方法です
条件書式は=($A3=TODAY())
=$A3=TODAY()
両方試して変わりなかったので上を入れてあります >>793
nowは明日試します
vbaでdate関数、
そのカレンダーの日付をdateにしてみるという意味でしょうか?
vbaでやる意味を教えていただけると有り難いです ワークシート関数の戻り値と、vba関数(now、time、date)の戻り値が同じか試してみる。
通常は同じだろうけど、違えばそれが原因を探る手がかりになるでしょ。 >>796
解説有難うございます
試したらまた報告します >>795
更新は当然してますよね?
F9押すか、再計算するか。 >>798
>>787で最初に書いた通り自動計算です。
しかも手動で再計算も何度もしました。 時計がずれてるかロケールが変わっている
now()は多分9:00ずれていると思う >>800
>>791,>>792ご覧ください。
=nowも普段使ってますがずれていません。 まずシンプルにどこかのセルに
=todat()
だけ入れてみてください。
それでもおかしいですか? 失礼、today()です。
それがきちんと表示されるなら、「条件付き書式」の設定がおかしいか、「条件付き書式」の不具合があると考えられます。 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 はい・
【4 VBAでの回答の可否】 可
リネームして保存前にファイルサイズが400kb以上なら「ファイルサイズ超過」とメッセージボックスを出して、リネームをキャンセルする方法があればご教授願います。リネーム前にFilelenを使うとリネーム前のファイルサイズしか出ません。 >>805
保存する前にファイルサイズを測定するのは不可能 リネーム後にファイルサイズ400kb以上でファイル名先頭に「サイズオーバー」
を追加は可能でしょうか?
リネーム後のファイル名を取得できないので、先に進めません。
1.yyyymmdd_hhmm(”D3")で保存。
2.1で保存したときにファイルサイズをチェック。
3.ファイルサイズをチェックして400kb以上なら、ファイル名先頭に「サイズオーバー」
を追加。
ご指導いただきますよう、お願いします。
https://u3.getuploader.com/taka1024/download/99 >>805
素直に行ったほうがいいかもな
別名で保存
自分自身のファイルサイズを計測
サイズオーバーならメッセージ出して閉じるとか
というかどういう状況?フロッピーでも使ってるの? 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
あるセルの値が、常に、
空白/ひらがな文字列/全角カタカナ文字列/半角カタカナ文字列
のいずれかです。また、文字列にはスペースが混じっています。
これを、どんな場合でも、スペースなしの半角カタカナ(空白は空白のまま)に変更したいです。
どのようにVBAコードを書けばいいのか教えてください。
よろしくお願いします。 >>809
replace() で空白を削除
strconv()で変換
https://www.tipsfound.com/vba/05strconv
今日は眠いから寝る
明日出来てなかったらまた会おう >>809
ワークシート関数でできるのでは?
まず、phonetic関数で全角カタカナに変換、substitute関数でスペース削除、asc関数で半角に。 ありがとうございます。
ひとつではなく、複数の変換作業を通じて実現するんですね。
勉強になりました。 >>812
どちらの場合もネスト(入れ子)して一気にやるより、段階踏んでやる方が簡単だしあとで修正しやすいです。
ワークシート関数でやるなら、
A列に元の文字列、B列にphonetic(A1)、C列にsubstitute(B1,略)、D列にasc(略)
VBAでやるなら変数myStringなどにして、
myString=replace(cells(i,1), 略)
myString=strconv(myString, 16 + 8)
cells(i,2)=myString
なお、どちらの場合もスペースが半角と全角の両方あるなら、削除を2回する必要がある。 >>813
vbNarrow + vbKatakana を即値で書くのは感心しない そうですね、たしかに足し算みたいだし分かりにくいですね。 >>808
修理依頼票として使うのですが、メールフォルダが200MBしかないので、
PDFを添付されると、メールフォルダがいっぱいになってしまうのです。 >>817
googleフォームでも使ったら?
あれなら実質無限に耐えられるだろう >>786
あ、そうなんだ
excel2010だから知らないやmspゴシックとmsp明朝で困らないからいいけど >>816
昨日「nowは明日試します」って書いてたから
今職場じゃないの? ▼━質問テンプレ (出来れば使ってね) ━━━
【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
セルにシート名を表示するシンプルな方法はないですか?
セルにシート名を表示させようと思ったんですが
ググるとCELL関数を使うものしか出て来なくて
そしてその方法がRIGHT関数とかLEN関数とかを組み合わせたりしてて
なんというか冗長に見えてしまうんです
もっとシンプルにシート名を取り出せないものでしょうか! >>821
諦めろ
そんな都合のよい方法があったら
冗長な方法が検索の上位に来るはずがないではないか 検索で見つかるのは確かに冗長で、もう少しましなのはある >>787です
結果ご報告です
=A7から下に向かってカレンダーを引っぱってました
条件書式は=$A7=TODAY()
しかしなぜか昨日の日付がハイライトされるのが困ってることでしたが、今日ファイルを開けてみると
条件書式が=$A8=TODAY()
になってました
結果的には条件書式が即時反映してなかったことが原因のようです
フォーマットを整えるなかでグループ化を沢山したり行挿入などをましたが、途中メモリ不足で一度強制終了しました
そういったなかで条件書式の表記は=A7~と見えるのに実際は=A8~で条件を取っていたという結果と思います
条件書式を=$A7=TODAY()にして解決
グループ化を沢山してExcelの挙動がおかしくなったのも初めてでした クソオペして何もしてないって言い張るウンコだったのか >>821
超単純なのでできた気がするんだけど、、いま手元にファイルないからわかんないや
そこだけvba使ったかな…
わかったら書くわ そんなに単純にはならんよ
なるほどねーという工夫はあるけど
そういう例題
今月は何日まであるか、最もエレガントに示せ >>829
>>830
こいつらは何に対して言ってんだ
アンカーくらいつけろ 例題2
別のシートのセルに対してリンクを張るエレガントな方法 CELL が嫌なら -CELL 付けてググればいい 一発目で出るだろ VBA使うけど
にしてもその書き方・使い方まで指導してる 簡単明瞭しかも早い
質問文書いてる間に結果が出てるぐらい簡単
サイトの主がアクセス数稼ぐために質問したんじゃねーのか?と、疑うぐらいどストライク CELL関数で2番目のパラメータA1は省略できる
作業セルにCELL関数だけ置いとけば数式の文字数は減らせるけどアルゴリズムがシンプルになるわけじゃない
A1=CELL("filename")
A2=RIGHT(A1,LEN(A1)-FIND("]",A1)) 省略したらでRフォルトはA1だろ
と思ったら血がてた
>この引数を省略した場合、最後に変更されたセルについて、
>"検査の種類" 引数に指定した情報が返されます。
>対象範囲がセル範囲の場合、その範囲の左上隅のセルに関する情報だけが返されます。
特に
>最後に変更されたセルについて、
に関しては、普通に別ブックも対象となるので絶対に省略しない方がいい
エライことになるぞ 省略したらデフォルトはA1だろ
と思ったら違ってた 試したら本当に別ブックのフルパスとシート名が出たわ
自分が普段使わん機能は注意せんとあかんな
しかし、これってなんのための機能なんだろう? 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
シートに3000行くらいのデータがあって、A列が日付、B列が名前、C列が得点です。
VBAで、以下のことを一気にやりたいのですが、どう書けばいいのか教えてください。
・B列で名前が空白の行を削除
・B列で名字と名前の間にスペースがある人がいるので、そのスペースを削除
表のいちばん下から、上に向かってループしながら、
削除とreplaceをやっていくしかないんでしょうか? >>842
だいたい思ってるとおりで大丈夫だよ
3000行なら工夫してもしなくても1秒で終わるから、マクロの記録してちょっと修正すればいい
1.画面の書き換えを止める
2.データ範囲を調べて下からループ
3.名前が空白なら行削除、そうでなければスペース置換
4.ループ終了したら画面書き換え再開 >>842
どうしてもループせずに一気にやりたいならワークシート関数を使うといいかも
B列だけ範囲指定してスペースを何も無しに置換も1行で書けるし、オートフィルターを使えば空白セルをまとめて削除できる 3000行くらいなら一発で削除できるんじゃないの
columns("B").specialcells(xlcelltypeblanks).entirerow.delete
スペースの削除はマクロ使わんでも置換機能でいけるんじゃない
マクロでやるならreplace
columns("B").replace " ","" >>840
びびるよな
元々はデバッグ用か何かだと思う。変な機能を詰めた関数ってとこじゃないかな
>>847
こういうレス見るとんっほおおおおおおってなる」 つまり、半角SP削除、全角SP削除、空白セル削除
の3行で済むってことか >>842
スペースの種類は半角、全角、それ以上とかバリエーション多いの? WEBからコピペとかすると文字コード0xA0のスペースがたまに混じっててぐぬぬとなることがある
あとはTABに注意しとけばだいたいなんとかなるんでは replaceメソッドは引数のMatchByteをtrueにして実行すれば全半角区別せずに置換できるよ
たぶん空白も行けるはず cell関数とかはマクロシートの頃の名残じゃないかな ブックAのセルからブックBのセルに関数をコピーペーストすると
ブックAのブック名まで一緒にペーストされてしまうのですが
ブック名はなしで関数のみペーストする方法はないでしょうか 計算式部分だけコピーしたらええんちゃう?
ドラッグとかしてな >>855
一度に大量にコピペするならShift+Ctrl+@で数式表示にしてメモ帳経由でコピペ
あるいはブック名を置換で消す >>855
方法は2つ
1つめは元のファイル名とシート名までを置換して削除する方法
!や'までちゃんと置換しないと失敗する
2つめはリンクの編集
データ→リンクの編集から変更する
けどバージョンによって違うだろうから自分の使用のExcelバージョンでググってくれ
excelxxxx 外部参照 関数 変更
こんくらいはわざわざ2ちゃん来なくてもググれるさー >>855
方法は2つ
1つめは元のファイル名とシート名までを置換して削除する方法
!や'までちゃんと置換しないと失敗する
2つめはリンクの編集
データ→リンクの編集から変更する
けどバージョンによって違うだろうから自分の使用のExcelバージョンでググってくれ
excelxxxx 外部参照 関数 変更
こんくらいはわざわざ2ちゃん来なくてもググれるさー >>855
シートごとコピーとかじゃなくてセル1つコピペなら、メモ帳経由がいいかもな
数式バーからまんまコピペすりゃいい 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2013
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
A1からA5000くらいまで人名が入力されてるシートで、
人名の重複がある行はぜんぶ削除したいです。
複数応募は全無効なので、重複のうち1行だけを残すのではなく、
重複があった人名はぜんぶ削除したいのです。
VBAでなんとかできないでしょうか? >>861
vbaじゃなきゃだめなの?
ワークシート関数、countifとif(countifのカラム2列ですぐできる >>861
B列をcountif、値化、降順で並び替え、2以上を削除
vbaならfornextで下から見ていって、2以上の列を削除 >>861
ピボットテーブルなら一発でデータの個数が出せるから2以上を削除 質問
【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
4月10日 朝
4月15日 昼
4月20日 朝
5月10日 昼
5月15日 夕
5月25日 朝
6月05日 朝
……
となっているデータから、5月分だけの一覧表を作るようにするにはどういう関数組めば良いんでしょう?
VLOOKUPでも最初の一つしか表示されないので困っています。
あと、可能であれば、元データの隣の列にある朝、昼、夕のデータを参照して、
抽出した表に、朝なら赤、昼なら黄、夕なら紫といったふうに、条件付き書式で表が色分け出来るようにしたいのですが…
うまく説明できているか解りませんが、宜しくお願いします。 >>867
データは昇順に並んでますか?
VBAなら簡単だけど、関数でもできそうな気はする。 >>867
俺ならシート毎コピーして、フィルタで「5月」選ぶかな >>868
データは昇順で並んでいます
>>869
できれば関数で解決したいです >>871
元の表に作業列いれてもいいならできそう。
countifsかsumproductと、vlookup組み合わせでできないかな。 >>867
http://fast-uploader.com/file/7078669358886/
>抽出した表に、朝なら赤、昼なら黄、夕なら紫といったふうに、条件付き書式で表が色分け
これは自分でやってくれ
F:Gに設定すりゃ終わりだ >>873
ありがとうございます。頂いたデータを参考にチャレンジしてみます。 =VLOOKUP(C3, $P$2:$Q$47, 2, FALSE)
という数式があります
C3と同じ数字の右二つ隣を表示
これにC3が空白なら空白
を加えるにはどうしたらいいですか? 見てないから違ってるかもしれないけど、
=if(c3=“”,””,vlookup 以下略
ということ? >>877
=if(c3=“”,””,vlookup(C2, $P$2:$Q$47, 2, FALSE))
だと、入力した数式は正しくありません、と言われるのです >>878
ごめん、スマホで打ったのでダブルクォーテーションがおかしかった。
パソコンのキーボードからだと、Shihtキー押しながら上段数字の2を押したら入力されるのが正しいダブルクォーテーションです。 >>879
=if(c2="","",vlookup(C2, $P$2:$Q$47, 2, FALSE))
これでできました、ありがとうございます Excelの関数について質問があります。
○の数を=COUNTIF(A3:A20,"○")でカウントしてC、FをカウントしたいけどB,Dはカウントしたくないときはどうしたらよいでしょうか >>884
横にドラッグしたいけどするとB,Dにも0がでて消すのがだるいのでどうにかならないかと思って。
かと言ってC,Fでもカウントするのも嫌なので。 A21, C21, F21にそれぞれの合計が出るようにしておいて、
sum(A21, C21, F21)を計算する 質問
【1 OSの種類 .】 Windows10home
【2 Excelのバージョン 】 Excel2013
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 否
F1キーで出てくるハズのオンラインヘルプに繋がらなくなってしまった(接続しています...から動かない)ので直したい
ネットサーフィンは出来るのでインターネット接続はちゃんとある
手始めにどこを見ればいいでしょうか? おねがいします
【1 OSの種類 .】 Windows7→10
【2 Excelのバージョン 】 Excel2003
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
機材は1年程度です
エクセルはその当時からの付属で
最近まで不自由がありませんでしたが先月ごろから
@ A1=B1+C1 で、B1に数字を入力した
A A1=B1 で、そのA1をC1にコピーしようとした
など計算に関する操作をしたときに
(文字列入力のときは無症状)
エクセルは動作しなくなりました
のメッセージが出て、強制終了
となっています
すべてのファイルでその症状が出ます
新規ファイルで計算をやり直そうとしますが
計算操作をした時点で、エラーが出て停止するところまではわかりました
ディスク再インストールしましたが、症状は変化しません
この時点で、では何がおかしいと見るべきでしょうか
機材自体まで、さかのぼっておかしいと見るべきでしょうか
エクセルのエラー以外、おかしいところは今のところありません 889ですが
もしかしてExcel2013のサポート期限切れでオンラインヘルプが参照出来なくなったのかな…自決しました >>891
セキュリティソフト入ってます?
ノートンとか。それ一時的に切ってやってみてください。
それでダメならレジストリ削除で。
それでもダメなら2003なので古すぎるということで諦めてください。 初歩的な質問させてください
列の範囲指定で一行目のタイトル行を覗いてA:A相当の範囲指定ってできますか? >>894
補足するとoffice2016だと
A2:A1048576
をもっとスマートに書けないか、ということです >>894
途中に空白行があるかないか。
最終行が数値と決まっているか否か。
などで変わってくる。 >>894
え?
A2からshift+ctrl+↓で下に下がって、shift+ctrl押したままで今度は矢印を→
これでええんじゃないの? >>898
関数内に列範囲をスマートに書きたいのです。
将来的にExcelが100万行対応した場合のことを考えて絶対参照は避けたくて あれか? プラモデル組み立てるのにヤマト糊でくっ付けようとしてる みたいなもんか
腕時計の修理で木ねじ使ってる ようなもんか >>897
最終行は数値だけど途中に空白はあります >>899
文字列なら
"A2:A" & Rows.Count 889ですが今試したらオンラインヘルプ参照出来ました2台で試してダメだったから諦めてたのになんか一時的な物だったみたい… columns("A").resize(cells.rows.count-1).offset(1).address
とかでいけるだろうけど微妙。何するか知らんけどちょくちょくオーバーフローしそう。 >>893
ありがとうございます
やってみて様子をみましたが、いまひとつ改善がきませんので
お話のバージョンの問題なのかという感じで
こんどは手を打ってみようと思います >>906
regeditでエクセル関連のレジストリ削除してもダメですか?
以前知人のPCで同じような症状でしたが、その時はウィルスバスターが原因でした。 ○歳○ヶ月や○歳○○ヵ月など、
この年齢から○ヵ月の○の部分を取り出す関数わかるかたいますでしょうか…
年齢はすべて2桁です
midとfindとlenを組み合わせても○だけにならず○ヵ月と表示されてしまいます… 以前は依然、現在は現在
以前とおなじ動作を望むなら、ネットを切ってスタンドアロンで
当時の状況に復元して使うことが肝要
毎月毎月望みもしないアプデで微妙に肝心なところを改変されてるんだから
今朝電源入れたら起動しない 変なメッセージ出たまま先に進まん
〇〇アプリが起動しない 運用中唐突にフリーズする 等々
このところ増えてる気がする
一定レベルの性能を持つハード、Win10が要求する仕様に合致するソフト
しか動かないように、どんどん改善してまっせ というMS側の企みを つとに感じる今日この頃、皆様いかがお過ごしでしょうか。 〇ヶ月まで出てるならそこから右2文字消せばいんじゃないの >>910
ありがとうございます
=mid(a1,find("歳",a1)+1,len(a1)-2)
です 簡単なのはsubstituteでヶ月を削除するか。
右から2文字削除するか。 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
Sheet1のH列にアンケートのフリー回答欄(テキスト形式)が並んでいます。
Sheet2のB列にはあらかじめ指定しておいたキーワードが並んでいます。
Sheet1のI列は○×を表示する欄となっており、
Sheet2のキーワードがSheet1のフリー解答欄内にあれば○、なければ×を表示させたいです。
どのようにすればできるでしょうか? >>908
=SUBSTITUTE(MID(A1,FIND("歳",A1)+1,LEN(A1)-2),"ヵ月","")
でどうよ エクセルのセル色付けについて
58000
58000
24569
24569
8000
8000
8000
条件付き書式で、数値が変わる毎にセルを別の色に設定する良い方法ありますでしょうか?
(上の場合3種に色分けしたいです) なんかさ、最近思うけどこれとこれ使えばできるから、みたいな回答
そういうんじゃなくてちゃんと書いてあげれば?って思う 目の前にパソコンがあればちゃんと回答する
電車の中とかスマホで見てる時は数式を正確に入力するのが面倒なんだよ
動作確認もやりにくいし せっかく回答しても、質問する側だって今は試せないとかよく書いてるし >>915
ありがとうございます…!
助かりました
mid(a1,find("歳",a1)+1,len(a1)-2) の-2を-5にするとなぜか○ヵ月の○部分が取り出せ、全くわけがわからなかったのですが、
綺麗な式を教えてくださってありがとうございました
レスくださった方もありがとうございました >>919
ヒントやるからググって調べろ
ってことだろ
いちいち細かいやり方までこんなところに書かれても困るし >>923
じゃあ無視するかパソコン操作ができるようになってから書けよ >>923
自分の場合は、今エクセルいじれない事を一応書くようにしてるー あーそっか年齢二けた固定(3文字固定)、ヶ月/ヵ月が2文字固定だから、先に後ろ2文字取ってから頭3文字取ればいいのか
=RIGHT(LEFT(A1,LEN(A1)-2),LEN(A1)-5)
こうか ヒントでももらえればずいぶん助かりますよ
ひどい時にはあきらめもつく
で、>>824さんの回答を今も待ち続けています >>824は、無理でしょ。
そのあとにvba使ったかもとか書いてるし。
>>919
スマホで数式打つと間違えが多いので。
ダブルクォーテーションなんかも入力しにくいし。
あとは元の数式分かれば書くこともあるけど、そうでないと書いても二度手間になることがある。
同じシートに書きたいのか別シートに書くのか、作業列使ってもいいのか、文字列や数値を直接数式に書くのか参照するのかなどなど。 スマホで数式ってネタじゃなくマジなのか?
+や(すらうつのめんどくさいのに それはさすがに爺いすぎるだろ w
機種によって違うけど英数字モードなら ()+-*/ とかは普通に入力できるし
$%"; とかが地味に面倒だったりする >>933
基本PCと音声入力だからな
記号打たないからどれが面倒とかもよーわからんし、
エクセルの数式を、モバイルでテキパキ打てても役に立つのがこのスレだけ
だ >>935
知り合いがメールで質問してくるんで
そも記号を使うのはエクセルの数式だけじゃないし、むしろ記号がまったく必要ない人の方が
スマホをいったい何に使ってるのか不思議だわ
ちょっと前のパソコン並に色々出来るのに、せっかくの性能を活かしてないとしか CPUや表示はPC並かもしれんけど、入力が致命的にお粗末だからなあ
ネットラジオ聞くのにしか使ってないな
極稀に録音したり写真撮ったりする
あとは、amazonの荷物をコンビニに取りに行く時に番号を転送したり
夏場は帰る時にエアコンの電源を入れたり
思い出せる限りでそんなもん 今の学生はスマホで論文書いてコンビニ印刷で提出してるらしいぜ? 【1 OSの種類 .】 Windows 7
【2 Excelのバージョン 】 Excel 2007
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
日付の表示で年月日の位置を揃える表示形式はありますか
平成_1年_1月_8日 (便宜上 _ を入れています)
平成30年12月31日
eemmdd だと 010108 となるので数値の ?0 に倣って ?e?m?d を試みたが巧く行かず >>941
FAQです
書式でスペースを入れるのは不可能です >>941
直接そのセルの表示をいじるんじゃなくてよいなら、text関数使ってできるかな。
例えばa1に日付データ、それを元にb1に=text(A1,〜)みたいに。
少し強引でシンプルではないけど。
あと元号を平成に限るとかにしないと結構面倒。 こういうのは一桁の時は全角にするのが定番じゃないの? >>944
初耳だけど悪くない対処法だと思う
ただ、想像するだけだと絶対にやりたくない 新聞とか書籍とか出版関係はそういう活字の組み方が普通だよ
アルファベットに全角を使う人も、大抵そっち方面の影響 表示形式で桁数によって、全角半角を自動的に変えられるっけ? テーブルを用意しとくんだよ
1から31まであれば足りる Excel2007以降ならできる
作業列もVBAも使ってないし、中身はちゃんとシリアル値
https://i.imgur.com/t5pGpT4.png 数字が一つだけなら桁数で全角に出来るけど、年月日の月だけ全角とかは書式では無理
TEXT関数あたりを組み合わせるしかない
いや、シートがめちゃくちゃ重くなってもいい方法なら1つ思いついた
実際に出来るかどうか試すのが面倒だけど、たぶんハングしそう >>941
普通に
yy m d
って書式でいけたけど >>953
質問者の意図は、元旦と大晦日で一番左と一番右が同じ位置になるようにしたいって話じゃなかろうか
官公庁に提出する書類は日付位置がずれているだけで不備と返されれことあるし
俺は条件つき書式は、重くなるから使わないでIFで条件分岐するけど >>954
あぁそうか、二桁になってもスペース消えないんだった、アホなこといってすまん
>>953は取り消しで シートAのA1セルをシートBのB1セルで参照しているとします。
シートBのC1セルに、シートAのA2セルの内容を表示させたい場合、
シートBのC1セルに入れる式を
=offset(indirect(A1),1,0)
としましたが、エラーになります。
どのようにすればよいのでしょう? indirectの中身は下をダブルクォーテーションで囲む
sheet1!a2
仕事中なので試してませんが・・・ ピボットテーブルで空白の列を追加できますか?行見出しで。
空白という文字が入ったところを空白にできますか? 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
vbaでオートフィルターを設定し絞り込む場合、選択するものを指定しますが、そうではなく◯◯以外を条件とし、またその除外条件が5項目ある場合の方法はありますか?
2項目までしか除外はできないとの情報もあり
a列に何らかの種類があるとして
除外したいのはa,b,c,d,e
これは毎回必ず含まれている
しかしそれ以外のf,g,h,i,......これは毎回種類が不特定に入ってくるため選択要素を指定することができない
フィルターしたい列の情報が毎回同じではありません
しかしそこに除外したい5項目は必ず入っており、それ以外の要素が毎回不特定に存在します
5項目を除いた条件がオートフィルターで取ることが希望です
よろしくお願いします >>962
ないんだな、これが
作業列を使うしかない フィルターの詳細設定使えばできるんじゃない
vbaならadvancedfilter
毎回同じなら1回条件範囲作れば使いまわせるでしょ
見出 見出 見出 見出 見出
<>a <>b <>c <>d <>e
こんな感じのパッと見アホみたいな範囲指定になるけど 年月日に空白を入れる方法で俺が思いついたやつ
2007以降で条件付き書式が無制限になったから、1-1-1桁から2-2-2桁まで8通り設定すれば出来る
たとえばこんな感じ
セルの表示形式 gggee年mm月dd日
条件1 =and(text(a1,"e")*1<10,month(a1)<10,day(a1)<10)
条件2 =and(text(a1,"e")*1<10,month(a1)<10)
条件3 =and(text(a1,"e")*1<10,day(a1)<10)
条件4 =and(text(a1,"e")*1<10)
条件5 =and(month(a1)<10,day(a1)<10)
条件6 =and(month(a1)<10)
条件7 =and(day(a1)<10)
書式1 ggg_0e年_0m月_0d日
書式2 ggg_0e年_0m月dd日
書式3 ggg_0e年mm月_0d日
書式4 ggg_0e年mm月dd日
書式5 gggee年_0m月_0d日
書式6 gggee年_0m月dd日
書式7 gggee年mm月_0d日
すべて「条件を満たす場合は停止」にチェック
1年を元年にしたければ、条件を16通り(15通り)並べればいい 桁数の多い方から並べた方がシートが少しだけ軽くなるように思う ググったらセルごとに手作業で書式を変えて対応するってのがあって、
それならVBAですぐできるよなと思ったり思わなかったり >>964
具体的なコードで教えていただけるとありがたたいです 具体的って言われてもadvancedfilterは半分以上セルの上の値で決まるから、
一般機能のフィルターの詳細設定の使い方調べてちょうだい
いちおうコード書くけどセル範囲A1:C100が対象データで、5条件のクエリがE1:I2に書いてある場合なら
range("A1:C100"),advancedfilter xlFilterInPlace, range("E1:I2")
ってなる。これだけじゃわからんでしょ >>970
すみません、
>5条件のクエリがE1:I2に書いてある場合なら
ここの意味がわかりません だから調べて
ながくなるし面倒だからここに書く気はないよ >>972
いや、調べられるなら調べるのですが、上記の意味はまったくわからないので調べようがなく 前にも誰か書いてたけどもうすこし説明つけてやってもいんじゃね?
自分の興味あると回答から逸れても延々長く書く癖にw
こう書けばじゃお前がやれよ、だしな
そういうもんじゃねーだろ
あと俺スゲーしたいだけの奴とかな 「クエリ」の意味がわからないんじゃないかと予想するけど
聞く方も聞き方考えないと…聞き方ひとつでこのバイトダメだなとか思われちゃうよ すみません、説明を求めたばかりに
>>975
誤解されてるようですが基本的なフィルターの使い方はわかってますし、2条件除外までならすでにコードも書けています
すみません、理解力が足りないのか未だに>>971の内容はわかっていません
>>963
ありがとうございます
それも考えたのですが今回は作業列ではなくフィルター除外で実現しようと思いまして
あと今回のフィルター対象は日付ではないので日付の考え方は飛ばして読ませていただきました
もう一度ググったところ、とてもシンプルに複数条件除外するコードを書いてくださってる方の記事を見つけました
試したところそれでうまく動きました
それをヒントに自分でも更に内容を理解したいと思います
理解力足らずお騒がせし申し訳ございませんでした >>976
クエリはわかっています
ですが今回なぜE1:L2が出てくるのか全くわかりませんでした
そしてそこでなぜクエリ?とは思いました >>971
いや自分もわからんな、これ
単にフィルターするのになぜ違う場所にクエリなん? >>980
責任転嫁か
だいたいにおいてとかじゃなく、今回の>>962のどこが間違ってるか書いてやれば?
あ、あとスレ立てよろしくー 結局、平成 1年 1月 8日や平成30年12月31日をはじめ任意の日付を
「平」から「日」までを等幅で表示するのに一つの書式では無理なのか。 >>962です
>>964は別の作業列を5列×2行を設けるということだったのですね
でしたらば、今回作業列を設けずフィルターだけで実現する前提で考えていましたので頭から排除しており気がつきませんでした
また最初のご回答だけではやはり理解は難しかったです
フィルター自体で数に制限なく除外条件を判断する方法が見つかりましたのでそちらを使用したいと思いますが、また今後の参考にさせていただきたく思います
また客観的に人に説明する場合どのように書いたら親切かという観点でも勉強になりました
ありがとうございました ほいよ次スレ
質問スレってのが現行スレなかったけど
テンプレこんな感じでよかったんかな
Excel総合相談所 131
https://mevius.5ch.net/test/read.cgi/bsoft/1523701626/ >>984
和暦でひとセル、年の十の位でひとセル、一の位でひとセル・・以下、月、日まで同様
元年の場合は十の位、一の位を結合してひとセル 当然セル幅は4と8とか倍数
そんなに日付の位置揃えにこだわるなら、これで解決
そうまでしてこだわる重要書類のヒントだけでも教えて欲しい
本文側はさぞかし高尚な内容なんだろうな、と
目的はなんだろ? そんな(くだらない)ことにこだわる理由って
上司の受け狙いかな 解決方法はいくらでもあるけど、書式でやらないといけないという縛りが無茶な部分
ここから東京駅まで行く方法を示せ。但し、息は止めたままで
みたいな このスレの一部の回答者ってのは、自分が感じ悪いのわかってんのかね まぁでも最近荒っぽい答え方でそれじゃあってのはあるし
単純に感じ悪いコメントは確かにあるからな
昔は答える方がエスパーだったけど今は回答もらった方がエスパーにならなきゃならんかね 次スレは中途半端な説明でわかりにくい回答が減りますように いやそもそもわかりやすいスマートな回答してりゃそうならない…だったら1000 このスレッドは1000を超えました。
新しいスレッドを立ててください。
life time: 112日 18時間 43分 56秒 5ちゃんねるの運営はプレミアム会員の皆さまに支えられています。
運営にご協力お願いいたします。
───────────────────
《プレミアム会員の主な特典》
★ 5ちゃんねる専用ブラウザからの広告除去
★ 5ちゃんねるの過去ログを取得
★ 書き込み規制の緩和
───────────────────
会員登録には個人情報は一切必要ありません。
月300円から匿名でご購入いただけます。
▼ プレミアム会員登録はこちら ▼
https://premium.5ch.net/
▼ 浪人ログインはこちら ▼
https://login.5ch.net/login.php レス数が1000を超えています。これ以上書き込みはできません。