[過去ﾛｸﾞ]
VBAなんでも質問スレ Part2 [転載禁止]©2ch.net (1002ﾚｽ)
VBAなんでも質問スレ Part2 [転載禁止]©2ch.net http://mevius.5ch.net/test/read.cgi/tech/1432173164/
上
下
前
次
1-
新
通常表示
512ﾊﾞｲﾄ分割
ﾚｽ栞
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索
歴削→次ｽﾚ
栞削→次ｽﾚ
過去ﾛｸﾞﾒﾆｭｰ
330: デフォルトの名無しさん [sage] 2017/06/05(月) 21:31:47.51 ID:tRFV5HQ5 >>328 とりあえず、複数行を選択するところをマクロの記録で見てみたら？ ｃｔｒｌキー押しながら選択するのとshiftキーを押しながらのとで。 http://mevius.5ch.net/test/read.cgi/tech/1432173164/330
331: デフォルトの名無しさん [sage] 2017/06/05(月) 21:41:12.12 ID:jKyX/qwq 検索対象のセル範囲でForループを回す セル値に特定文字を含むセルが見つかる度にEntireRowを取得して変数に入れるかUnionで選択対象の範囲をマージしていく ループ終了後にSelectする 以上 http://mevius.5ch.net/test/read.cgi/tech/1432173164/331
332: デフォルトの名無しさん [] 2017/06/05(月) 21:45:35.27 ID:epzJZZwH >>327 Ctrl+Fで検索しろやボケナス ちゃんと行選択までしてくれるぜ http://mevius.5ch.net/test/read.cgi/tech/1432173164/332
333: デフォルトの名無しさん [] 2017/06/05(月) 22:37:03.17 ID:bd1ggU41 ごめんなさい、質問者です。 ここじゃなかったのですね。上に上がったやり方でできそうなのでやってみます。ありがとうございます http://mevius.5ch.net/test/read.cgi/tech/1432173164/333
334: デフォルトの名無しさん [sage] 2017/06/06(火) 05:49:03.11 ID:tznXutzN 色々細かい条件でどんなコードが効率いいか、変わってくるでしょ。 例えばそのセルがあるのは、特定の行だけとか、検索文字列はセルに完全一致なのか含まれるのか、など。 http://mevius.5ch.net/test/read.cgi/tech/1432173164/334
335: デフォルトの名無しさん [sage] 2017/06/06(火) 09:11:47.41 ID:YhE+Nuz8 331だが、同じ行に該当セルが複数ある場合は無駄が生じるな 実現したい機能次第だが、工夫が必要かもな http://mevius.5ch.net/test/read.cgi/tech/1432173164/335
336: デフォルトの名無しさん [] 2017/06/07(水) 19:31:10.77 ID:e13xfCG0 はじめまして。以下2点、教えていただけると幸いです。 環境は、OS:Windows7, Excel2010です。よろしくお願いします。 1.プルダウンの初期値設定 セルA1にりんご、A2にバナナ、・・・のようにA列にある項目をプルダウンで選択したいです。 このとき、「A列のj行目（パラメータ選択可能）を初期値にしたプルダウンをB1に設置する」VBAのコマンドを教えていただきたいです。 2.ファイル名の変更 aaa.txtというファイルをデスクトップに出力するマクロを作れました。 このマクロ実行後、再度実行するとaaa(2).txtのファイルを、再度実行するとaaa(3).txtのファイルを出力・・・ このようなVBAのコマンドを教えていただきたいです。 http://mevius.5ch.net/test/read.cgi/tech/1432173164/336
337: デフォルトの名無しさん [sage] 2017/06/07(水) 21:49:32.12 ID:nqbSOdK9 >>336 コマンドはありません http://mevius.5ch.net/test/read.cgi/tech/1432173164/337
338: デフォルトの名無しさん [sage] 2017/06/07(水) 22:23:27.64 ID:L3ua+fDn >>336 txtファイルをデスクトップに出力っていう日本語の破壊力がやべぇ http://mevius.5ch.net/test/read.cgi/tech/1432173164/338
339: デフォルトの名無しさん [sage] 2017/06/08(木) 05:33:24.44 ID:1DKX/Vru >>336 1 ・B1セルを選択してからマクロの記録を実行 ・入力規則でリストを選択にリストの内容でA列を選択する ・マクロ記録の終了をする ・できたコードを修正してA列の任意のセルをデフォルトにするように変更する 2 ・デスクトップにaaa.txtが存在するかチェックする。 ・存在しない場合はaaa.txtを作成して終了。 ・存在する場合はDo~Loop中にデスクトップにaaa(i).txtが存在するかチェックする ・存在する場合はiをカウントアップして次のループ ・存在しない場合はそのiを使用してaaa(i).txtを作成して終了。 http://mevius.5ch.net/test/read.cgi/tech/1432173164/339
340: デフォルトの名無しさん [sage] 2017/06/25(日) 17:10:56.20 ID:/fEFwdln A1セルに =NOW()-TODAY() と入力すると 現在時刻が表示されますが。 MsgBox Range("a1") とすると 0.0110212・・・と言ったような数値が出ます。 Dim now As Date now=Range("a1") と型を指定した変数に格納してやると MsgBox now で 21:49:32 といった一般的な時間表記を示せますが、 変数化を省略して MsgBox Range("a1")〜に補足コードを書くなどで同じ処理を実現する方法は無いのでしょうか？ http://mevius.5ch.net/test/read.cgi/tech/1432173164/340
341: デフォルトの名無しさん [sage] 2017/06/25(日) 17:20:36.10 ID:A4A49pvi MsgBox Range("A1").Text とか MsgBox Format(Range("A1"), "hh:mm:ss") とか http://mevius.5ch.net/test/read.cgi/tech/1432173164/341
342: デフォルトの名無しさん [sage] 2017/06/25(日) 17:26:03.97 ID:/fEFwdln >>341 なんと！！ 変数をだらだら定義すること無く綺麗さっぱり解決できました！ありがとうございました。m(_ _ )m http://mevius.5ch.net/test/read.cgi/tech/1432173164/342
343: デフォルトの名無しさん [sage] 2017/07/17(月) 17:20:20.62 ID:7pjXcMGR プロシージャの中で1回しか使わないのに、わざわざ変数にするやつとかいるよね。（しかもハンガリアン記法で） 100行に満たない程度のコードなら、Withステートメント使ったほうがむしろ可読性は上がる。 http://mevius.5ch.net/test/read.cgi/tech/1432173164/343
344: デフォルトの名無しさん [sage] 2017/07/17(月) 17:25:26.05 ID:l3sSLpQS マシンパワーが貧弱だった大昔ならともかく、今時はリソースを気にする必要なんてないんだから、可読性を最優先で記述するべきだよ。 http://mevius.5ch.net/test/read.cgi/tech/1432173164/344
345: デフォルトの名無しさん [sage] 2017/07/23(日) 22:54:52.46 ID:EbUz/UVB >>343 ああ、俺だ。 Ubound(配列)とか、For〜Nextの中で何回も実行すると、 なんか遅いような気がして、一度変数に入れちまう。 http://mevius.5ch.net/test/read.cgi/tech/1432173164/345
346: デフォルトの名無しさん [sage] 2017/07/24(月) 03:07:48.10 ID:/3vdoRrW >>345 何回も実行するなら変数に入れたほうがいいんじゃね？ http://mevius.5ch.net/test/read.cgi/tech/1432173164/346
347: デフォルトの名無しさん [sage] 2017/09/01(金) 23:04:37.73 ID:RmCwgyLh >>345 (1) For I1 = 1 to UBound(xxx) For I2 = 1 to UBound(xxx) (2) J=UBound(xxx) For I1 = 1 to J For I2 = 1 to J 普通に考えて本のチョット早いと思われますが、記述の労力ほどじゃない。 他の方の書いてますが、今は、処理速度が物凄く早くなっています。 気にしなくていいと思います。 ただし、私はEXCELでVBAを書くのですが、シートのセルに書き出すと物凄く遅くなる。 VBAの配列とかメモリーならばほとんど気にしなくていいです。 ですから、メモリー内で処理して最後の最後にシートに書くようにしてます。 http://mevius.5ch.net/test/read.cgi/tech/1432173164/347
348: デフォルトの名無しさん [sage] 2017/09/02(土) 08:26:52.52 ID:tqo/3wkP >>347 > ですから、メモリー内で処理して最後の最後にシートに書くようにしてます。 基本中の基本だからいちいち書かなくてよろし http://mevius.5ch.net/test/read.cgi/tech/1432173164/348
349: デフォルトの名無しさん [sage] 2017/09/05(火) 10:53:29.80 ID:WmSrV0rS アノニマスに入会したいんですがVBA知ってるだけで入れますか? あと入会ってどうやんの? スーツ着て履歴書持って事務所に面接に行くの？ http://mevius.5ch.net/test/read.cgi/tech/1432173164/349
350: デフォルトの名無しさん [] 2017/09/05(火) 12:25:17.40 ID:P2jRu54V たまにハローワークに求人出てるから行ってみれば？ http://mevius.5ch.net/test/read.cgi/tech/1432173164/350
351: デフォルトの名無しさん [sage] 2017/09/12(火) 02:10:43.27 ID:2wFcaigK 超初心者です 同じブック内の複数のシートにある顧客データをUserFormを用いて（検索するイメージ）抽出し、別のシートへ出力するコードを書きたいのですがいまいちわかりません。 大変困っているのでヒントをくださればありがたいです。 http://mevius.5ch.net/test/read.cgi/tech/1432173164/351
352: デフォルトの名無しさん [sage] 2017/09/12(火) 02:30:21.88 ID:U3/YorLf >>351 超初心者には無理です パソコン教室に通ってせめて初級をクリアしてから質問してください http://mevius.5ch.net/test/read.cgi/tech/1432173164/352
353: デフォルトの名無しさん [sage] 2017/09/12(火) 04:10:40.96 ID:2wFcaigK >>352 返信ありがとうございます Excel自体触ったことない超初心者ですが頑張っているところです( ??? ) http://mevius.5ch.net/test/read.cgi/tech/1432173164/353
354: デフォルトの名無しさん [sage] 2017/09/12(火) 08:28:28.15 ID:GFFccSR9 >>351 自称初心者がどこでUserFormとか覚えたの？ まずはシート上でやってみようね http://mevius.5ch.net/test/read.cgi/tech/1432173164/354
355: デフォルトの名無しさん [] 2017/09/12(火) 12:27:40.35 ID:7XJfZGpJ どこで覚えようとお前の知った事じゃねえだろｗ なんだこのバカはｗｗｗ http://mevius.5ch.net/test/read.cgi/tech/1432173164/355
356: デフォルトの名無しさん [sage] 2017/09/12(火) 13:06:30.39 ID:N1ygkJfx >Excel自体触ったことない超初心者 ユーザーフォームを作ったことはあるのか？ 無けりゃ、この時点でやろうとしていることはもう無理 VBAはほんの少しでも書いたことはあるのか？ まぁ最初は>>354の言うようにシート上で実現して、それをユーザーフォームにもっていくのが順当 というか触ったこと無いって時点で釣り確定 http://mevius.5ch.net/test/read.cgi/tech/1432173164/356
357: デフォルトの名無しさん [sage] 2017/09/12(火) 16:38:53.70 ID:2wFcaigK VBA参入門書とネットの知識を詰め込みました。 Excel初心者は本当です。友達に教えてもらいつつやっています。気分を害された方、すみません。 >>356さん非常に分かりやすいです。 二日間くらい最初からコードを書こうとしてもがいていましたが、マクロの記録が使えそうな気がします。 そのコードをいじってボタンで起動するユーザーフォームとくっつけるイメージで挑戦してみます。 http://mevius.5ch.net/test/read.cgi/tech/1432173164/357
358: デフォルトの名無しさん [sage] 2017/09/12(火) 16:41:08.80 ID:2wFcaigK >>354さんもありがとうございます！参考＆励みになります http://mevius.5ch.net/test/read.cgi/tech/1432173164/358
359: デフォルトの名無しさん [sage] 2017/09/12(火) 20:34:49.57 ID:/wKXVszF このスレで一番の基地外が満を持して遅れて登場 http://mevius.5ch.net/test/read.cgi/tech/1432173164/359
ﾒﾓ帳
(0/65535文字)
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 643 ﾚｽあります
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.011s