XXXXさん の検索結果:
下記のメッセージをいただく。 ＞単勝、馬連、馬単、三連複、三連単、出馬表 ＞の各データの各開催場の9～12Rの生データを ＞エクセルシートにコピペし（午前中に３度行い）、 ＞この物をエクセル上でマクロ、VBで加工し、 ＞各レース毎のシートへ送りオッズ表を作成してますが、 ・ ・ ・ ＞貴兄のIE使用の単勝オッズ表取得の解説を見て感動しましたが ＞表記サンプルは稼働不能でした。 ＞やはり、JRAHPサイトの都合によるProg.変更等により不都合が生ずるものなのでしょうか。 ＞マ…
>実行時エラー '462': >リモート サーバーがないか、使用できる状態ではありません。 > とでます。 >デバッグでは、 > objIE.Navigate strURL >ここでとまります。 >何か特別な参照設定がひつようなのでしょうか？ ＞リモート サーバーがないか、使用できる状態ではありません連続実行をしていると、 ( Create と .Quit などを繰り返していると) たまに発生したりしますが、Googleでエラーメッセージをそのまま検索すると、https://…
質問をいただきました、最近、返信遅くてスミマセン。 Dim objIE As Object 'ＩＥオブジェクト参照用 Set objIE = CreateObject("InternetExplorer.application") 'IEのオブジェクトを作る objIE.Visible = True '見えるようにする(お約束) '.Navigate で 指定した文字列のURLを開く objIE.Navigate "https://www.boatrace.jp/owpc/p…
＞エラーが出ているのは中盤の更新ボタンクリックのあたりです。 急いでいるみたいなので、(※急いでいない人はそもそも質問しないかスミマセン) ざっと見た感じ勝手にコメント付けてみました。理解の手助け、参考になれば。 Private Sub 更新ボタン_Click() Dim b As Recordset Dim buppincord As String 'ここでレコードセット作成 Set b = CurrentDb.OpnRecordset("select * from 物品机…
…ていただいている XXXXXさん サンプルファイルの公開を一時中止しました。 この対応でOKですか？OKの場合、コメント欄やメッセージフォーム、メールでの注意喚起などやめていただけるとありがたいです。 以上、よろしくお願いします。 三流プログラマー Ken3 ※ファイルがどうしてもほしい人は、個別に対応するので、Twittweや ken3.org のメッセージ欄、ここのコメント欄などで連絡ください。 多数のメッセージ、無視していたわけではありません。 このブログのように他の質…
下記の質問をいただく VBA IEでHP等から表をｴｸｾﾙに抜き出したい場合ですが 以前に競馬の表の取り込み例として'TABLEタグを抜き 複数のテーブルをセット Set objTABLEs = objIE.document.getElementsByTagName("TABLE") '↑で代入したオブジェクトからテーブルデータを取り出す｡ Set objTABLE = Nothing 'オブジェクトを空にする For i = 0 To objTABLEs.Length - …
IEのDocumnetについておしえてください。 以下のようなプログラムいおいて、①でmiに OBJIE.documnetをいれてますが、ページが変わって miをウオッチでみると変わったページのプロパティ要素が取得されてます。これは、ページが変わる（次のリンク先を読み込む）と自動的にmiにdocumentプロパティーの要素がはいるってこ とでしょうか？ ページが変わるたびにset mi=objie.documentとしなくてもよいのでしょうか？ 宜しくお願いいたします。 ーー…
下記の質問をいただきました。 VBAでIEをヤフーとAmazonを同時に開く事は可能でしょうか。 また開くソースを教えて頂けますでしょうか。 お手数ですが、 宜しくお願い致します。 単純に二つの変数を使って起動したパターン と 隣のタブに表示するパターン 二つを作成してみました。www.youtube.com 【VBA IE操作】.Navigate2 メソッド &H800指定で新規タブ 隣のタブ表示のテスト【三流君】 - YouTube Option Explicit '変数…
朝からデバッグ Excel リストボックスのイベントについて実験したみた。朝からデバッグ VBA Excel UserForm リストボックスのイベントについて実験する・・・三流プログラマー の 独り言 ライブ プログラミングほか テスト中 - YouTube www.youtube.com1.質問の理解 ユーザフォーム（テキストBOX）からセルに書き込みを行う際、listboxのChangeイベントが発 生しうまく値を書き換えることができません。（値の変更をフォームより行い…
Excel VBAでAsc関数 Chr関数 Offsetを使って 処理を変更してみました。前回作成のサンプル ken3memo.hatenablog.com に追加の要望がきました。追加の要望: 前回の質問時は満足していたのですが 本日色々と試してみると ランダム数値の区分がグループ分けした後 確認できればと思ってしまいました 後出しですみませんが、 引き続きご教示よろしくお願いします 【問題】 班 人数 A 20 B 15 C 8 D 90 E 16 【答え】 班 人数 1…
下記の質問が来たので、チャレンジしてみました。 質問ですが、VBAで数値の足し算をしたいと思います。 内容は A列に上から 20 15 8 90 16 とランダムに配列した数値を上から順に足し算していくのですが、ある一定の数値（33とします）になるくくりで数値を出していきます 説明がうまくできませんが、33人乗りのジェットコースターが来た時に、グループ毎にいる人たち（20人のグループ.15人のグループ.8人のグループ…）が乗るのを待っている時に、順番に乗り込んでいきますが、常…
http://www.ken3.org/vba/backno/vba183.html の VBA Outlook リッチテキスト形式のメール で グラフを送る ですが、 昔作成したサンプルなので、 Office2010からメニューがリボンになったので、 貼り付けが動かないみたいです。下記のサイトで指摘されてたり(なんか恥ずかしいぉぃぉぃ) https://answers.microsoft.com/ja-jp/office/forum/office_2010-excel/ex…
>Outlookでファイルを添付する件で送信先を固定せずにアドレス帳から任意に選択することは可能でしょうか？アドレス関係は軽く追加とかしか、やったことはないのですが、VBA Outlook アドレス帳 連絡先選択 で検索すると、 https://qiita.com/Q11Q/items/c5ae5cbc1744905f3288 https://msdn.microsoft.com/ja-jp/vba/outlook-vba/articles/display-names-fro…
vbaでWEBの、select操作を行いたいのですが、valueを設定するも、うまく動作しません。下記、①のselectで馬連を選択しても、②方式選択が更新されません For Each obj In ie.document.getElementsByTagName("select") If obj.Name = "betType" Then obj.Value = 5 web address https://www.oddspark.com/keiba/auth/Classi…
下記の質問をいただく 単勝オッズの取得20170820.xlsmを回答して実行しましたが、動きません。 MENUシートのB2に入れた、「2回新潟9日 リンクが見つかりませんでした」 のMSGBOXが出てオッズを取得できません。こちらの環境はExecl 2013です。もう一つのサンプルで、「三流君VBAでIEのリンクを操作 Document.Linksを探る」 試したのですが、JRAのHBのリンク数は13個でした。JRA側が2017/08から何か変更したのでしょうか？ 私のサン…
こんにちは。 >IEオブジェクトからIEのウインドウハンドルが知りたいのですが、どんな方法があるでしょうか？ でよく使っているのは .hwnd かな。 SetForegroundWindow (IE.hwnd) など、 IEが持っているプロパティの.hwndを渡し使っています。ken3memo.hatenablog.com ken3memo.hatenablog.comネットの流れは速いので、 もう既に解決されているかもしれませんが、 解決の糸口となれば幸いです。 三流プログ…
私も苦戦してますね・・・できたぁ・・の報告じゃなくてスミマセン。Outlook オブジェクト モデルでルールを管理する https://msdn.microsoft.com/ja-jp/vba/outlook-vba/articles/managing-rules-in-the-outlook-object-modelルールの処理を指定する https://msdn.microsoft.com/ja-jp/vba/outlook-vba/articles/specifying…
例)Outlook2016 自動仕分けで旧機能 アプリケーションの起動 スクリプトの実行を使用したい時にレジストリを設定するOutlook2016の自動仕分けで 過去のバージョンにあった アプリケーションの起動 や スクリプトの実行 を設定したいときは(選択を出したかったので) レジストリをいじってみます。 【Outlook2016】自動仕分けで旧機能 アプリケーションの起動 スクリプトの実行を使用したい時にレジストリを設定する【三流君】 - YouTube www.yout…
下記の質問をいただく。 すみません、動画とは関係ないのですが、outlookのvbaで仕分けルールが自動で作成されるように組もうと思っています。件名に「三流」からメールが来たら「アプリケーションを開始する」というアクションを起こすというルール内容をマクロ起動にて作成されるようにしたいのですが、どうも「アプリケーションを開始する」コマンド？が見つかりません。。。 手動だと answers.microsoft.com のレジストリをいじると表示されるみたいですね。 VBAからセ…
私のサンプルを改造した視聴者様から下記の質問をいただいたので、 チャレンジしてみたいと思います。土曜日のレース中にテストチャレンジ 下記のグダグダ修正を笑ってくださいね。 JRA サイトから レース結果をExcelに取り込む・・・三流プログラマー の 独り言 ライブ プログラミングほか テスト中 - YouTube www.youtube.com 下記の質問をいただきました。 JRAのオッズ取り込みを改造して ﾚｰｽ結果を取り込むことにチャレンジしていますが 中々、思うように…
Outlook VBA 送信アカウントの切り替え .SendUsingAccount = Session.Accounts("アカウント名")でハマってる・・下記の質問をいただいたので、試してます。 VBAでOutlookのメールを立ち上げることに成功しました。 差出人をデフォルトではなく、 別のアカウントで使いたいのですが、 単純にsendusingaccountを入れるだけではダメなんですね。 どうすればうまくいくんでしょうか。 複数メールアドレスを登録して、 テスト中で…
質問が来たので、デバックしてみたが、 動いてしまいました。いつもの酔っ払い右往左往のデバッグ動画 【VBA デバッグ風景】VBA コンボボックス 初期値のセットをデバッグ 2018-07-14【三流君】 - YouTube www.youtube.comコンボボックスの初期値は、.ListIndex を使用した .ListIndex = Month(myday) - 1 のままでもOKだと思います。また、.Valueを使用した UF002.ComboBox2.Value = …
Excel VBA を VBS に変換する作業中に 「オブジェクトでサポートされていないプロパティまたはメソッドです」 エラーが発生しました。 と 質問をいただきました。ここから下質問文※一部カット VBAで無事複数メール送信の構文が出来ました。 そして、一番の難題であるVBSへの変換ですが、 まず私はVBAのマクロをこう作りました。 Enum 列 宛先 = 1 氏名 成績 件名 添付ファイル1 添付ファイル2 添付ファイル3 End Enum Sub メール作成() Dim…
Outlook 予定表 分類を探りたかったので、Outlook 予定 https://msdn.microsoft.com/ja-jp/library/cc446751.aspx のプロパティから分類 カテゴリー？なんてプロパティがあるので、AppointmentItem.Categories プロパティ (Outlook) https://msdn.microsoft.com/ja-jp/vba/outlook-vba/articles/appointmentitem-ca…
> 内容は下記となっております。 > https://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q11192362626 detail.chiebukuro.yahoo.co.jp > > > 先に三流君様に許可をいただいてから、やるべきところを、恥ずかしながら回答者様にご指摘いただくまで、コードのライセンスという概念が無く、質問を行わせていただいておりました。 誠に申し訳ございません。 > >つきましては、現状URLの…
こんにちは。>投票メニューで開催競馬場を選択するselectタグです。 <select class="block-m-ls ng-pristine ng-valid ng-not-empty ng-touched" aria-invalid="false" ng-change="vm.changeCourse()" ng-model="vm.oSelectedCourse" ng-options="oHeldGuide.course.name + '（' + oHeldGui…
IE操作で下記の質問をいただく >今、壁にぶつかったのが >「******確認」のボタンをクリックすると >「Web ページからのメッセージ」 >が出て、その後のプログラムが全く走りません。 >「非同期」等の記事を読ませてもらいましたが、私には難解で先に進めません。 >何卒解決のヒントをご教示していただけないでしょうか。 ↓いつもの酔っ払い解説動画・・・ www.youtube.com 【VBA IE操作】Javascriptのalert「Webページからのメッセージ」を消す…
XXXXXさんへ メールで送れないなら、twitter DMメッセージを～と書きましたが、 こちらの設定ミス(初期状態のままで) で フォロー以外のユーザから送れないようになっていたみたいで、 スミマセンでした。 現在、設定を変えたので再度試してみてください。ダイレクトメッセージ ☑すべてのユーザーからダイレクトメッセージを受信する に変更してみた。 XXXXさんへメッセージを送れない設定ですみませんでした。ダイレクトメッセージ ☑すべてのユーザーからダイレクトメッセージを受…
下記の質問をHPよりいただきました。 ※改行位置、文章一部変更 >現在、EXCELの横棒グラフを駆使して、 >生産の進捗具合を管理するガントチャート風を作ろうとしております。 > >そこで考えましたのは、人間がセルに数値を入力するのではなく、 >予め用意された横棒グラフのその中の１つの横棒をクリックして、 > >これも予め用意したユーザーフォームのボタンをクリックすると >その横棒グラフが伸びたり、縮んだり、 >左右に動いたりするようにしようと思いました。 > >そこで、SE…
XXXXXさんへ 熱い、紹介、転載不可の メッセージありがとう。JRAオッズ取得の テストで使用したExcelブックを http://ie.vba-ken3.jp/test/20170820.zip に保存しました。アレンジして使ってみてください。コードだけで、動くブックを保存していなくてすみませんでした。 次回から、あるていどまとまったら、ブックを公開してみようと思います。 ken3memo.hatenablog.com ken3memo.hatenablog.com 20…
