[過去ﾛｸﾞ] Excel VBA 質問スレ Part68 (1002ﾚｽ)
上下前次1-新
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
467: (ﾜｯﾁｮｲ 7f4b-3DJV) 2020/10/03(土)13:04 ID:DSTQ9BDR0(2/2) AAS
できないって言われましても強制力無いですし
468: (ﾜｯﾁｮｲ ff2f-G8Sl) 2020/10/03(土)13:34 ID:zZGrTJee0(1) AAS
まあそもそも多数の実装が出てからそれ集めて決めた仕様だからな
469: (ﾜｯﾁｮｲ e3da-Kk5w) 2020/10/03(土)19:43 ID:WrZNWJut0(1) AAS
そういやあれ何だろうな。
QueryTableだとセル内改行でずれるのに、
ADOだとずれないとか。
470: (ﾜｯﾁｮｲ 6309-gW4a) 2020/10/04(日)19:09 ID:mqiPq7lq0(1/3) AAS
配列を戻す自作関数を呼び出し先Subから複数回実行して、配列を結合したい
んだけど、どうすればできますか？ redim preserveとUBoundを使うのかも
しれないけど、いい感じにまとまったコードが書けない。
例えば、下の関数を、別のSubから2回実行させて、
「Ary(3) ※中身：path1,path2,path1,path2」
の結果を得たいです。
Function TestFunc()
Dim testPath(1)
testPath(0) = "path1"
testPath(1) = "path2"
省3
471(3): (ﾜｯﾁｮｲ 6309-gW4a) 2020/10/04(日)19:09 ID:mqiPq7lq0(2/3) AAS
配列を戻す自作関数を呼び出し先Subから複数回実行して、配列を結合したい
んだけど、どうすればできますか？ redim preserveとUBoundを使うのかも
しれないけど、いい感じにまとまったコードが書けない。
例えば、下の関数を、別のSubから2回実行させて、
「Ary(3) ※中身：path1,path2,path1,path2」
の結果を得たいです。
Function TestFunc()
Dim testPath(1)
testPath(0) = "path1"
testPath(1) = "path2"
省3
472: (ﾜｯﾁｮｲ 6309-gW4a) 2020/10/04(日)19:09 ID:mqiPq7lq0(3/3) AAS
連投すいません
473: (ｽｯｯﾌﾟ Sd1f-+ya4) 2020/10/04(日)19:15 ID:l1LxtJm7d(1) AAS
注意
ID:mqiPq7lq0
いつもの馬鹿です
474: (ﾜｯﾁｮｲ d3da-Kk5w) 2020/10/04(日)21:13 ID:3bz1Ts/P0(1) AAS
>>471
検索したらいいんじゃね
475(1): (ﾜｯﾁｮｲ b37c-Uy5C) 2020/10/04(日)21:42 ID:NRUY+ZF00(1) AAS
>>471
例えとかいい感じとかじゃなくて正確にコードを提示してどの部分をどうしたいのか明確に説明した方がいいよ
476: (ｽｯｯﾌﾟ Sd1f-EBv7) 2020/10/04(日)21:43 ID:hlbFeQNpd(1) AAS
後出し続けて全部作ってもらおうという魂胆の奴だぞ
477: (ｵｯﾍﾟｹ Sr47-owA3) 2020/10/05(月)01:21 ID:Roj0MJiCr(1) AAS
VBAからIEを操作して、タグを指定して.valueやselctedで自動化しているのですが、ヤフオクの商品説明だけどうしても値の挿入ができません。
Tabや近い要素をフォーカスしたりクリックし、SendkeyなどでShift +Tabからエンダーなど試していますが、一向に解決できません。
直接でか無くてもカーソルが点滅させれれば、クリップボード経由で貼り付けるような仕様にしようと考えています。
478: (ﾜｯﾁｮｲ d32c-IT45) 2020/10/05(月)07:08 ID:z7kgQPv30(1/2) AAS
漏れは、Ruby, Selenium Webdriver で、ブラウザを自動操作して、
send_key で、ユーザー名・パスワードを自動入力して、ヤフーにログインしてる
require "selenium-webdriver"
options = Selenium::WebDriver::Chrome::Options.new
options.add_option( :detach, true ) # ブラウザを切り離す
options.add_argument( '--start-maximized' ) # 画面最大
driver = Selenium::WebDriver.for :chrome, options: options
driver.manage.timeouts.implicit_wait = 10 # default timeout
driver.navigate.to "外部ﾘﾝｸ:login.yahoo.co.jp
省6
479: 478 (ﾜｯﾁｮｲ d32c-IT45) 2020/10/05(月)07:11 ID:z7kgQPv30(2/2) AAS
そもそも、IE なんか動くのか？
漏れは、Chrome
480(1): (ﾊﾞｯﾄﾝｷﾝ MMc7-7HYc) 2020/10/05(月)12:57 ID:BlyIycRMM(1/2) AAS
>>475
すみません。
Sub test
Dim i,ary()
For i = 1 to 2
ary = TestFunc ※ary配列の要素の最後に呼び出した配列を追加していきたい
Next
End
481(1): (ﾜｯﾁｮｲ d3da-Kk5w) 2020/10/05(月)13:22 ID:PJYbs+y10(1/2) AAS
配列に配列を追加するのを初心者がつくるなら
追加する2つの配列と結果を格納する配列の計３つを用意して順番に格納すればできないかな？
482: (ﾜﾝﾄﾝｷﾝ MMe7-hUkp) 2020/10/05(月)14:35 ID:8f5Gi5TxM(1) AAS
>>480
いい加減にしろや糞が
483(1): (ﾜｯﾁｮｲ ff2f-IT45) 2020/10/05(月)14:54 ID:3En1oQ3G0(1) AAS
>>471
redim preserveとUBoundを使うのかも
まあしかし、その処理ほんとに配列でやるのが良いのか検討したほうが良いんだが
VBAコレクション系弱いからなぁ
484(1): (ﾜｯﾁｮｲ d3da-y5MG) 2020/10/05(月)15:05 ID:PJYbs+y10(2/2) AAS
検索すればすむのにね
485: (ﾊﾞｯﾄﾝｷﾝ MMc7-7HYc) 2020/10/05(月)17:50 ID:BlyIycRMM(2/2) AAS
>>481
>>483
ありがとうございました。
486: (ﾌﾞｰｲﾓ MMe7-k/5x) 2020/10/05(月)17:58 ID:FAPvswgpM(1) AAS
喧嘩腰だなあ
何しにきてんのさ
上下前次1-新書関写板覧索設栞歴
あと 516 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.026s