XXXXさん の検索結果:
下記の質問をいただく >OUTLOOKで受信したメールで作業実施日を毎朝8時とすると >そこからからマイナス15時間から朝8時の範囲で受信したメールだけを >任意のサブフォルダーに移したいときはどのようにすればよいのでしょうか。 .ReceivedTime で受信時刻がわかるので、 .Move してみただけですが下記、メール移動のサンプルコードです 参考となれば・・・ Option Explicit '2021-04-08 .Move でメールを移動させる 'カウンターを使用…
下記の質問をいただきました。 WEBページからのメッセージに困っていましたが objIE.navigate "JavaScript:function confirm() { return true; }" のおかげで次に進む事が出来ました。 本当にありがとうございます。ただ次の問題が新たに発生しました。 実行ボタンを押すと ①confirm画面がポップアップ 特定条件にヒットすると ②confirm画面がポップアップ→alert画面がポップアップ。 となるケースがあり、 ob…
' objTABLE.rows(行).cells(列) Set objCELL = objTABLE.Rows(y).Cells(x) 'これがwebの列 で取り出したデータに対して、さらに、その中から、DIVタグを取り出して、名前を調べる'DIVタグを抜き classの名前を取得してみる Set objDIVs = objCELL.getElementsByTagName("DIV") '1セルの中からさらにDIVをByTagName("DIV")で取り出す。そんなテスト動…
>大量のデータをCOUNTIFSをで実施するとかなり時間がかかります >約1時間~2時間ぐらい?です > >ネットで色々と見て、VBAで配列でとか書いていますが >解かりりかねますので、何卒ご教示お願いいたします こんにちは。 VBA配列での高速サーチについてですが、 私も詳しくなく、お力になれずスミマセン。 >COUNTIFSをで実施するとかなり時間がかかります COUNTIFSで、毎回自動再計算がかかって、遅くなるパターンならgoogle:COUNTIFS 高速化 で検索…
下記の質問をいただいたが、回答ができなかったお話。 csvをDownloadする画面に行くのですが、 そこのボタンがJavaScriptで動くように設定されているのですが、 動かすことができません。 下記がボタンのソースです。 input type="image" name="XXXXXX_SubmitCsv" src="xxxx_dl_csv.gif" style="cursor: pointer;" alt="CSVデータ保存" title="CSVデータ保存" widt…
下記の質問をいただく Accessからエクセルのテンプレートへ1シート10件ごとに出力させようとしています。 件数も毎回変わります。 件数が増えるごとにテンプレートシートをコピーして増やします。(依頼書1、依頼書2・・・)「シートへデータを転記( http://www.ken3.org/vba/backno/vba100.html )」を参考になんとかシートごとに出力はできたのですが、出力開始セルがA1からでないとうまく出力できません。テンプレートなので貼付け開始セルをI21…
1.言語なので受け手PCになったつもりで、そのまま読んでみる 2.名は体を表すので、英単語や変数名などから機能や動作を想像してみては? 3.一を聞いて十を知れないので、前後の文章(コード)があるとわかりやすいかも・伝わりやすいかも。いつもの、脳内を自分語で垂れ流すので ぉぃぉぃ 参考程度に聞いてください。※一つでも心に刺されば成功です(うれしいです) www.youtube.com https://www.youtube.com/watch?v=T0EmYLBZCn8伝えたい…
下記の一行コードの質問をいただく。 >三流君さん、お久しぶりです。 >もし解読出来たら教えて頂きたい構文があります。 >ie.Document.getElementsByName(' routeSettingList[' & n & '].trafficCd').item(0) >です。もし解読出来ましたら教えて下さい そのまま、PC(ieブラウザ)になったつもりで見ると ie.Document.getElementsByName(' routeSettingList[' &…
下記の質問をいただく。 >IE使用時にページ移動後のHTMLDocumentを再取得したいのですができません。 >ご教授いただけないでしょうか?? >IE使用時にページ移動後のHTMLDocumentを再取得 ですが、 通常は、移動後もそのまま使えるので、 ※逆に、移動前のページのデータは書き換えられているので使えない ↑何言ってんだか、意味不明・・・パターン1:ページ表示後に検索データを入れて、検索、検索結果を処理 https://www.youtube.com/watch…
下記の質問をいただく。 今まで動いていたプログラムが【このサイトは安全ではありません】というエラーが出てしまいます。 このエラーメッセジが出ないようにするにはどうすればよいのでしょうか。 軽く、win10 IE vba このサイトは安全ではありませんをキーワードに検索しただけですが、google:win10 IE vba このサイトは安全ではありません で検索するとhttps://www.manageengine.jp/support/kb/OpManager/?p=9959…
デバッグ時の手作業で見つかるオブジェクトが プログラムで走らせると(実行時)見つからないパターン>> objectそのものが取得できていないエラーとなりました。 >> また、ジャバスクリプトを直接動かすほうは、実行しても、「反応しない」という状況です。よくあるのが、ページの表示待ち次がページがフレームのページ? or カーソルが進まないとデータを取得できないパターン https://youtu.be/6yo4PJnzwk0?t=1474 ↑スクロールするとデータが作られるパタ…
老害MS-DOSおじさんの私も、Debugコマンドについて詳しくなくて、 適切な回答ができなくてスミマセン。あっ、下記の動画について質問だったんですね。 バッチファイル .bat を作成してMS-DOSのコマンドを使う。 https://www.youtube.com/watch?v=w7Bc7kTuYPw >デバッグコマンドとかはつくれますか? もしかして、下記のdebugコマンドなら、無くなった?ので、実行できないかも。debugコマンド(MS DOS) https://…
やりたいこと サイトの中の、ID付与されているボタン(具体的には、「帳票」を示す、“LinkButton4”)をクリックしたい、というものです。 2.取得したいID(”LinkButton4”)が記載されている(と思われる)箇所のHTML。 (「要素の検査」を使ったら、表示された行です)、 <dl> <!-- Report --> <dt><img id="LinkButton4" src="../Images/ico_report.png"onclick="javascri…
質問お願いします VBA IE にてテーブル取得するのに 上記例ですが 『お菓子』が含まれているせるがそれぞれA~C列に10行目まであります A列の1行目からC列10行目まで 順番にさぐり 『お菓子』が含まれていれば セルの内容をそのままE列にコピーする ようにしたいです ご教示どうぞよろしくお願いいたします HP上のテーブル ナンバー__1__________2_________3 1_______お菓子です__山田さん___食べた 2_______須崎さん____お菓子…
当店人気のIE操作質問がくるも・・・ >ダイアログボックスが2~3回開く業務系では上記の処理がsendkeysメソッドでしかできません。 >ご存じの通りsendkeysメソッドは不安定で度々エラーが発生し業務使用するのは厳しい状況です。 >何か良い方法はありますか?せっかく良いネタ・メッセージをいただいたのですが、 ダイアログ処理は私もなかなかスッキリできなくて困っています。 なので、かっこつけた回答ができなくてスミマセン。自分やみなさんが困っている処理は、 需要がありとても…
こんにちは。Win10クリーンインストールの件 トラブルで不安な中(そんなに不安じゃなかったらスミマセン) 返信遅れて、すみません。>windows10がおかしくなってクリーンインストールをしたいです。 なかなか、難しい質問ですね。 クリーンインストールかぁ。>けれど難しそうで尻込みしてしまい 私も同じです。 失敗した時のリスクが怖くて、しり込みしてしまう案件ですね。実際、遠隔指示でやると、クリーンインストールの待ち時間が長くて、 連絡体制が難しいかなぁと思ったり。最近は、か…
はてなの質問 q.hatena.ne.jp にチャレンジしてみた。テストしてみた >【指定フォルダ or 指定件名を含むメールの本文内の画像をエクセルに貼り付け】 >複数人からiPhoneのメールで送られてくる画像を >1クリックでエクセルにまとめて貼り付けしたいです Outlook VBA で メールに添付された写真をExcelに貼る処理のイメージがあっているか、わからないが、 下記の用に作成してみましたhttps://www.youtube.com/watch?v=SF9…
入院中で返信できなくすみません。 石が移動して詰まってしまい、処置観察中で退院日はまだ決まってません… ではまたぁ ※内視鏡入れて処置するのに同意書を書いたけど帰って来れるよな…
下記のメッセージをいただく。 >単勝、馬連、馬単、三連複、三連単、出馬表 >の各データの各開催場の9~12Rの生データを >エクセルシートにコピペし(午前中に3度行い)、 >この物をエクセル上でマクロ、VBで加工し、 >各レース毎のシートへ送りオッズ表を作成してますが、 ・ ・ ・ >貴兄のIE使用の単勝オッズ表取得の解説を見て感動しましたが >表記サンプルは稼働不能でした。 >やはり、JRAHPサイトの都合によるProg.変更等により不都合が生ずるものなのでしょうか。 >マ…
>実行時エラー '462': >リモート サーバーがないか、使用できる状態ではありません。 > とでます。 >デバッグでは、 > objIE.Navigate strURL >ここでとまります。 >何か特別な参照設定がひつようなのでしょうか? >リモート サーバーがないか、使用できる状態ではありません連続実行をしていると、 ( Create と .Quit などを繰り返していると) たまに発生したりしますが、Googleでエラーメッセージをそのまま検索すると、https://…
質問をいただきました、最近、返信遅くてスミマセン。 Dim objIE As Object 'IEオブジェクト参照用 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…