[過去ﾛｸﾞ] Excel総合相談所 136 (1002ﾚｽ)
上下前次1-新
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
481(2): 2019/08/31(土)00:05 AAS
>>465です
普通の関数だけではできないんですね
ユーザー定義関数ならできそうですか よろしくお願いします
482: 2019/08/31(土)00:28 AAS
>>481
Range(置換する範囲).Replace "(*)",""
483(1): 471 [saage] 2019/08/31(土)00:57 AAS
>>477
・フォルダ内のＣＳＶ全てです
・ＣＳＶファイルは手動でフォルダに入れます
・重複チェックは必要ありません
・順番は不順です
484: 2019/08/31(土)03:40 AAS
>>483
処理速度は考慮してない
--------------------
Const PATH = "フォルダパス\"
Dim cnt As Long
Dim fname As String
Dim buf As string
cnt = Cells(Rows.Count, 1).End(xlUp).Row
fname = Dir(PATH & "*.csv")
Do While fname <> ""
省14
485(1): 2019/08/31(土)12:32 AAS
【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2007
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
列
A B
1 3
2 1
3 5
4 2
省5
486: 2019/08/31(土)12:55 AAS
>>481
作業列5列ぐらい使ったらできると思うよ
487(1): 2019/08/31(土)13:39 AAS
>>485
同じ行同士比較するんであれば、条件付き書式（数式利用）で、作業列使わずにできますよ。
1行目からデータがあるのであれば、A1:A5(実際にはデータがあるところまで)のセル範囲を選択しておいて
ア リボン → ホーム → 条件付き書式 → 新しいルール → 数式を使用して、書式設定するセルを決定
イ 数式を入れる欄に =A1<=B1-2 と入力
ウ [書式]ボタンをクリック
エ 塗りつぶしのタブをクリック → 塗りつぶす色を指定 → [ＯＫ]をクリック
オ [ＯＫ]をクリック
Ａ列の値 ＜＝ Ｂ列の値から２を引いた数字 が成り立てば「２以上順位が上がった」としています。
Ａ列の値にゼロがありうる場合は、 =AND(A1>0A1<=B1-2) でいいかも（試してません）
488: 2019/08/31(土)14:15 AAS
>>487
ありがとございます
チャレンジしてみます
489(1): 2019/09/01(日)02:15 AAS
このソフトを快適に動かせるPCのスペックってどこを重視すればいいんでしょうか？
IEとかも動作させたりするせいか
結構重いのです
490: 2019/09/01(日)06:31 AAS
>>489
メモリー
CPUは基本的に食わない。VBA使ってて消費量が多ければコードを見直す方がいい
491: 2019/09/01(日)07:17 AAS
Excel＋IEは
・CPU 2コア4スレッド以上
・メモリ 12GB〜
あればほぼ大丈夫
8GBだとたまにスワッピング起こって重くなる感じ
492: 2019/09/01(日)23:53 AAS
それメモリ関係ねぇだろ
493(2): 2019/09/02(月)00:44 AAS
https://moripro.net/vbaie-gethtml/
こちら検索して出てきたもので、これをそのまま使って起動済み画面のHTMLを取得しています
しかし、目的の画面のHTMLを読み込んだ後、処理?〜?（リンクをクリックする、テキストボックスに記入するなど）を入れると、
?を飛ばして??と遷移するときと?~?とうまく遷移することがあります
この違いはなんでしょうか？回避方法ありませんか？
494(1): 2019/09/02(月)13:16 AAS
あるけどお前には教える気しねぇな
495: 2019/09/02(月)17:06 AAS
>>494
なんだこのウンコマン
496(2): 2019/09/02(月)18:49 AAS
380で質問した者です。
質問に対し、フィルタオプションを使用してみては？
とご回答くださり、その場は対応できたのですが、質問に大事な事を書き忘れました。
売上表は複数シートからの抽出された、昇順並び替えをしている可変データになります。
そのため、フィルタオプションだと、データが変わるとフィルタオプションでは
設定した時の抽出状態なので、やはり式の修正が良いのではと思っています。
再度質問して申し訳ありませんが、式の修正で良い方法があったらご教示くださるとありがたいです。
497(1): 2019/09/02(月)19:36 AAS
>>496
IFに条件追加するだけじゃ無理なん？
498(1): 2019/09/02(月)20:15 AAS
>>496
{=SMALL(IF((A$1:A$100<>"A店舗夜間")*(A$1:A$100<>"B店舗夜間"),B$1:B$100),ROW(A1))}
499(2): 2019/09/02(月)20:49 AAS
>>401 >>404 >>466です。
>>468
フォームを使う方法でかまいません。
>>404に追記する形でも，まるっきり0からでもよいので教えてください。
500: 2019/09/02(月)21:30 AAS
>>497
>>498
496です。498さんの式でできました。ありがとうございました。
上下前次1-新書関写板覧索設栞歴
あと 502 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.421s*