下記のメッセージをいただく。 ＞単勝、馬連、馬単、三連複、三連単、出馬表 ＞の各データの各開催場の9～12Rの生データを ＞エクセルシートにコピペし（午前中に３度行い）、 ＞この物をエクセル上でマクロ、VBで加工し、 ＞各レース毎のシートへ送りオッズ…
>実行時エラー '462': >リモート サーバーがないか、使用できる状態ではありません。 > とでます。 >デバッグでは、 > objIE.Navigate strURL >ここでとまります。 >何か特別な参照設定がひつようなのでしょうか？ ＞リモート サーバーがないか、使用できる…
質問をいただきました、最近、返信遅くてスミマセン。 Dim objIE As Object 'ＩＥオブジェクト参照用 Set objIE = CreateObject("InternetExplorer.application") 'IEのオブジェクトを作る objIE.Visible = True '見えるようにする(お約束) '.Navigate で 指…
＞エラーが出ているのは中盤の更新ボタンクリックのあたりです。 急いでいるみたいなので、(※急いでいない人はそもそも質問しないかスミマセン) ざっと見た感じ勝手にコメント付けてみました。理解の手助け、参考になれば。 Private Sub 更新ボタン_Click() …
Google様より 広告クローラのエラーが生じており、収益の損失が発生する可能性があります。 と言われましても・・・ヘッダーに自動広告コード入れたんだあっ、そういえば昨日、自動広告コードってヤツをヘッダーに入れたんだけど ここに入れたのがマズイ感じ…
OBSでフリーソフトの恋声を使用して、 低い声にして、怖い人を演じてみたり、 Word(Windows)の読み上げ機能で機械音声の返信で 心のこもっていない定型文を演出してみたり 動画作りのアクセント、ヒントとなれば幸いです。【OBS】恋声で声を変えながら OBSで…
アマゾンプライム会員に登録した人をねらった釣りのメールを複数受け取る。From: Amazon緊急事態 Amazoneプライムのお支払いにご指定のクレジットカード有効期限が切れています！だって、、、プライム会員が一ヶ月無料だから、 一昨年12月に登録した人が(201…
私のIEサンプルを使用中に(も)※通常のブラウズ中にも最近、広告表示から フィッシングサイト や 偽のアプリケーションのインストールサイトなどに 自動でリダイレクトしてしまうことが多いみたいです。強制遷移される例 はてなさんのブログを紹介 staff.hate…
下記の質問をいただく VBA IEでHP等から表をｴｸｾﾙに抜き出したい場合ですが 以前に競馬の表の取り込み例として'TABLEタグを抜き 複数のテーブルをセット Set objTABLEs = objIE.document.getElementsByTagName("TABLE") '↑で代入したオブジェクトからテーブル…
0.今日話したいこと 2019年もみなさんの貴重な時間(=お金) を 私のダラダラ解説で消費してしまうかもしれませんが、 今年もよろしくお願いします。 三流プログラマー Ken3 結果から話せ、少し、考えさせられますね。指摘された貴重なご意見をクレームとか失…
Kindle Unlimited 少ししか使わなかったので解約した 三か月のキャンペーンがあと少しで終了するので、 忘れないように本日解約した。無事に下記のようなメールもきたので、解約成功したかな。 様 自動更新がキャンセルされました。Kindle Unlimitedメンバー…
ブラウザの通知許可 を求める 偽広告に初遭遇画面が急に切り替わり通知許可を要求。 なんでもかんでも反射的に許可を押してしまう？を狙っている？ でも、これは無いよな、スマホとか、画面が小さいと、許可を誤クリック・・・あるのかなぁ？リダイレクトの…
IEのDocumnetについておしえてください。 以下のようなプログラムいおいて、①でmiに OBJIE.documnetをいれてますが、ページが変わって miをウオッチでみると変わったページのプロパティ要素が取得されてます。これは、ページが変わる（次のリンク先を読み込…
昨日の夜から、また広告が勝手にリダイレクトして、ニセの警告画面を表示させるような場面にかなり頻繁に遭遇する。 ブラウザバックボタンで元のページに戻れないのがイライラしますね。 ウイルスパターンを更新して、念のため全体をチェックして何も出なか…
前回、Excel A列から文字の色や太字を判断して、HTMLタグを追加する。 そんなVBAをライブで作成して、 マクロ記録で太字のFont.Boldを探せなかったり、 追加したタグがクロスしてしまうバグ・不具合を発見しました。いつものデバッグ風景です。ライブは怖い…
VBAから表示したIEの画面をスクロールさせてみました。 SendKeysとjavascript:scrollToを使ってみたhttps://www.youtube.com/watch?v=jHnqqQP3FC4&start=470 youtu.be ※前半は先週のテストなので、IEのスクロール処理は 7:55 ～ 動画を見てください。 https:…
下記の質問をいただきました。 VBAでIEをヤフーとAmazonを同時に開く事は可能でしょうか。 また開くソースを教えて頂けますでしょうか。 お手数ですが、 宜しくお願い致します。 単純に二つの変数を使って起動したパターン と 隣のタブに表示するパターン 二…
私だけかもしれないけど、 少し、びっくりしたこと(実際にテストしてみて)www.youtube.com 【Excel】実験 メモ帳などで作成したHTMLソース TABLEテキストをコピペ Excelへ貼り付けてみた【三流君】 - YouTubeHTMLソースのテキストをExcelに貼り付けてみると…
昨日修正したJRA 単勝オッズ 取り込みサンプル下記 ken3memo.hatenablog.com ですが、発走時刻とオッズ時刻が正しくない と連絡を速攻でいただく。最後まで、確認をしていなくてスミマセン。すぐに修正をしてみます。 ※またまた、ライブネタにして、恥を重ね…
だいぶ前に試作した(試作したとか予防線を張りつつ、ぉぃぉぃ) 取り込みに失敗すると連絡をいただく 有料ソフトに組み込んだサブルーチンが動かなくて困っています。 12/5にJRAがHPの仕様を変更したためだと思うのですが、 単勝オッズ取り込みが出来なくなっ…
下記のような、わかりやすい ぉぃぉぃ メールが送られてきた From: Aρρleサービス Date: Thu, 6 Dec 2018 13:43:37 +0900 Message-ID: gmail.com> Subject: RE: [新しい要約] Apple IDは2018年12月6日にロックされています。拝啓、Appleシステムは、アカウン…
動画のプレミア公開 テストしてみたかったので、 少し強引に下記のような雑談動画を作成してみた https://www.youtube.com/watch?v=T99HMkUWoI8 www.youtube.com ↑いつものグダグタ動画ですがよろしくお願いします。覚えやすい語呂かわかりませんが、 今月末…
朝からデバッグ Excel リストボックスのイベントについて実験したみた。朝からデバッグ VBA Excel UserForm リストボックスのイベントについて実験する・・・三流プログラマー の 独り言 ライブ プログラミングほか テスト中 - YouTube www.youtube.com1.質…
今回、覚えてほしかったこと ・オートフィルで月火水木・・・ ・書式のコピー ・日付の表示形式 aaa で曜日 ・=TEXT(番地,表示形式) で 文字列として値を取得できます ・セルの絶対番地と相対番地 ・条件付書式で、土日の色付け ・祭日シートと=COUNTIF(範囲…
子供たちに知ってほしいこと、 昔) 読み 書き そろばん 今) 読み 書き エクセル(Excel)と思ったら解説中に、読み 書き 検索が よさそうと思ったり・・・下記のライブ動画でトロいおっさんがExcelの操作を少し解説してみた 怖がらないで Excel エクセル で遊…
Excel VBAでAsc関数 Chr関数 Offsetを使って 処理を変更してみました。前回作成のサンプル ken3memo.hatenablog.com に追加の要望がきました。追加の要望: 前回の質問時は満足していたのですが 本日色々と試してみると ランダム数値の区分がグループ分けした…
下記の質問が来たので、チャレンジしてみました。 質問ですが、VBAで数値の足し算をしたいと思います。 内容は A列に上から 20 15 8 90 16 とランダムに配列した数値を上から順に足し算していくのですが、ある一定の数値（33とします）になるくくりで数値を…
前回のサンプル完成した・・と思ってたら、質問者から不具合の連絡があった q.hatena.ne.jp コードを実行すると、 日付が記載されると2秒くらいフリーズしたりエクセルが点滅、読み込み直しをしているような何とも苦しそうな挙動をします。 ごめんなさい、私…
q.hatena.ne.jp に回答してみた。シートのコード に、 Private Sub Worksheet_Change(ByVal Target As Range) If Target.Count = 1 And Target.Row < 100 Then Cells(Target.Row, "E") = Now End If End Sub を書くと、WorksheetのChangeのイベントで、 タイ…
http://www.ken3.org/vba/backno/vba183.html の VBA Outlook リッチテキスト形式のメール で グラフを送る ですが、 昔作成したサンプルなので、 Office2010からメニューがリボンになったので、 貼り付けが動かないみたいです。下記のサイトで指摘されてた…
