エクセルファイル上のURLにアクセスしてウェブサイト上のデータを取得し、エクセルファイルにデータを張り付ける

全くの初心者です。 まずは以下のような処理がUWSCで可能かどうか教えて頂けると幸いです。 1)エクセルファイル上にリストアップされたURLをコピー 2)ブラウザのアドレス欄にペーストしてウェブサイトにアクセス 3)ウェブサイト上のデータをコピー 4)エクセルファイル上のURLの隣のセルにペースト 1)~4)を1行づつ繰り返す 具体的にはyahoo!リアルタイム検索にて期間指定をすると検索窓の下に表示される件数を取得することが目的です。 期間指定はURLに含まれるため、期間指定のためのブラウザ操作は必要ありません。

タグ

2017年7月27日 | コメント/トラックバック(0) |

カテゴリー:掲示板

Excelのセルをクリックする

Excelマクロで作られたツールがあります。マクロは保護されていて中が見れません(無理に覗くのも使用規約に反するようで)。<br>
このツールはシート上のセルをダブルクリックすると、その行に記載されている情報を元に動作するようになっています。<br>
このツールを1行ずつダブルクリックしていく処理をUWSCで実現したいと思います。<br>
低レベル関数では実現出来ていますが、Excelの表示設定によって座標の調整が必要なため、他の方法が無いかと考えております。<br>
<br>
試しにCLKITEMを使って以下の様に組んでみましたが、<br>
いずれもCLKITEMの戻り値がFalseになります。<br>
################################<br>
id = GETID("Book1.xlsx - Excel", "XLMAIN", -1)<br>
ACW(id)<br>
ret1=CLKITEM(id, "A3", CLK_LEFTCLK)<br>
ret2=CLKITEM(id, "A3", CLK_DBLCLK)<br>
print "1:" + ret1 + " ,  2:" + ret2<br>
################################<br>
<br>
種別はCLK_ACCなども試してみましたが変わりませんでした。<br>
<br>
BTN以外での実現方法はありませんでしょうか。<br>
よろしくお願いいたします。<br>

タグ

2017年7月21日 | コメント/トラックバック(0) |

カテゴリー:掲示板

OUTLOOK2013でのメールの送り方

毎日、データを更新したExcelファイル(Sales.xlsx)がデスクトップ上(C:\Users\shihan\Desktop)に自動作成されます。 ここまではプログラミングできたのですが、OUTLOOK2013を立ち上げ、その作成されたExcelファイルをメール配信したいのですが、コードの書き方が分かりません。ご教授いただけないでしょうか? よろしくお願いいたします。

タグ

2017年7月3日 | コメント/トラックバック(1) |

カテゴリー:掲示板

URLから画像ファイルをダウンロード

現在あるサイトから、画像ファイルを一括でダウンロードするマクロを作ろうとしています。
現状画像ファイルのURLを取得することはできましたが、ローカルにダウンロードするところで詰まっています。
お知恵を拝借したいです。よろしくお願いします。

タグ

2017年1月27日 | コメント/トラックバック(1) |

カテゴリー:掲示板

Webサイトからテーブルの内容をエクセルシートに保存

http://uwscscript.blog.fc2.com/blog-entry-30.html を参考にさせていただいるのですが、 現在参考の目的のIEが無いようで、 テーブルの要素を書き込む部分の「エクセルに書き込みでエラーが出てしまいます。」 仮にサイトを別のサイトで置き換えて、下記を理解できれば解決に至れるのかと思うのですがご教授お願いできれば幸いです。 —————————— sheet.cells[y,2].value = table.item(3).rows(3).cells(2).innerText sheet.cells[y,2].value→エクセルのシートの場所を指してると思っています。 table.item(3)→取得したWebサイト側のテーブルだと思ってます。 rows(3)→何を指しているかわかりません。 cells(2)→何を指してるかわかりません。 innerText→書き込む動作として理解しております。 ——————————

タグ

2016年11月12日 | コメントは受け付けていません。 |

カテゴリー:掲示板

ファイルへの追記書き出しについて

いつもありがたく使わせてもらっています。 早速ですが、FOPENで開いたファイルに対して追記することはできないのでしょうか? 外部アプリからUWSCを呼び出してスクリプトを実行していますが、UWSC側での動作ログを書きだそうとして以下のようにしてみました。 Fid=FOPEN(“.\log.txt”,F_READ or FWRITE) FPUT(Fid,G_TIME_YY2 + “/” + G_TIME_MM2 + “/” + G_TIME_DD2 + ” ” + G_TIME_HH2 + “:” + G_TIME_NN2 + “:” + G_TIME_SS2,0,1) FCLOSE(Fid,TRUE) 想定では起動するたびにログに時間が追記されていくと思っていたのですが、上書きモードになってしまい最新1件分しかない状態です。 どうすれば追記モードとして動作することができるでしょうか?

タグ

2016年7月4日 | コメント/トラックバック(1) |

カテゴリー:掲示板

エクセルの特定のセルにあるメルアドをiniファイルに書込する方法

エクセルの特定のセル、例えばA1にあるメルアドの文字列を、iniファイルに下記のように書込する方法ないでしょうか? [メルアド1] メールアドレス=A1にあるメルアドの文字列

タグ

2016年6月24日 | コメントは受け付けていません。 |

カテゴリー:掲示板

8桁のランダムなアルファベット数字の文字列を作成したい(先頭はアルファベット)

8桁のランダムなアルファベット数字の文字列を作成したい(先頭はアルファベット)を作成したいのですが、下記のスクリプトでは先頭が数字になる場合があります。 先頭はアルファベットで数字とアルファベットの組み合わせの文字列の作成する方法ないでしょうか? 宜しくお願いします。 IDPASS = “” //文字列10個出力 FOR A = 1 TO 10 //文字数は8文字 FOR B = 1 TO 8 IDPASS = IDPASS + RETURNCHAR() NEXT IDPASS = IDPASS + “” NEXT SENDSTR(EXEC(“NOTEPAD”),IDPASS) FUNCTION RETURNCHAR() LETTER = CHR(97 + RANDOM(26)) //アルファベットの小文字、大文字、数字を出す SELECT RANDOM(3) CASE 0 //小文字はそのまま RESULT = LETTER CASE 1 //大文字を出す場合は変換 RESULT = STRCONV(LETTER,SC_UPPERCASE) CASE 2 //数字の場合は0~9をランダムに出す RESULT = RANDOM(10) DEFAULT RESULT = LETTER SELEND FEND

タグ

2016年6月24日 | コメントは受け付けていません。 |

カテゴリー:掲示板

ページ検索後に得られた単語にマウスを移動させたい

任意のサイトで目的の単語をページ検索し、その結果得られた単語部分にマウスを移動させたいのですが、わかりません。最近、このフォーラムを知って、小林さんの本を買ったりしていろいろ勉強しているところです。このトピックに関して、参考となるサイトやアドバイスなどいただけると幸いです。

タグ

2016年6月6日 | コメントは受け付けていません。 |

カテゴリー:掲示板

CLKITEMを使ったマウス移動について

CLKITEMを使って、3番目のアイテムに マウスカーソルを置くコードについて 教えてください。 ———————— wid = GETID(GET_ACTIVE_WIN) CLKITEM(wid, アイテム名, CLK_ACC or CLK_MUSMOVE, FALSE, FALSE, 3) ———————— 上記のアイテム名を指定する際に、 value値(キャプションの文字)なら マウス移動できるのですが、 input type値(“radio”や”checkbox”) ではできません。 何か良い方法が あれば教えてください。

タグ

2016年2月28日 | コメントは受け付けていません。 |

カテゴリー:掲示板

このページの先頭へ