オンライン講座 質問と回答

無料・有料のオンライン講座で寄せられたメッセージの一部を紹介致します。

[11313]エクセルマクロVBA「Web連携」Microsoft Internet Controls_Webコンテンツの取得

2019-04-03 13:24:33 ざきさんさんからの投稿です。

返信ありがとうございます。
アプリという表現が正しかったのかわかりませんが、サイト上で顧客管理をしています。ここでURLをさらしていいのかわからなかったので、添付ファイルにて、URLを送ります。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[11310]エクセルマクロVBA「Web連携」Microsoft Internet Controls_Webコンテンツの取得

2019-04-03 09:46:45 ざきさんさんからの投稿です。

小川先生、おはようございます。
先日はロリポップのログインの件ありがとうございました。
無事に先に進むことができ、ロリポップ上に溜まったメール約50件から、顧客番号、氏名、電話番号を抜き取ることに成功しました。今までコピペで対応していたのが、馬鹿らしく感じます。

次のステップとして、仕事で使用しているクラウド型の顧客アプリにログインしたいのですが、IEでひらくと、添付ファイルのような画面になり、会社で使ってるFirefoxで開く画面と違い困っています。
IEでひらくと ctrl + Uを押してもソースコードでないので、分析しようがありません。

何か良い方法があったら教えてほしいです。
よろしくお願いします。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[11309]エクセルマクロVBA「Web連携」Microsoft Internet Controls_Webコンテンツの取得

2019-04-03 05:14:07 副島 望さんからの投稿です。

小川慶一様:
Sub DomSample2()
' On Error Resume Next

Dim objIE As New InternetExplorer
objIE.Visible = True

Dim url As String
' url = "https://www.exvba.com/ws/domform.html?time=" & Format(Now, "yymmddhhnnss")
'???Q?l????ASSL??????????g??????B

url = "C:/Users/e0206/OneDrive/?f?X?N?g?b?v/hina.html"

'?e?X?g?y?[?W??AID?????????
objIE.navigate url

'?y?[?W??¥?????????
Do While objIE.ReadyState <> 4 Or objIE.Busy = True
DoEvents
Loop

上記マクロを実行すると、DO While のところで
オートメンションエラーが発生します。
自分のデスクトップ上のHTMLファイルをVBAで
開こうとするとエラーになるのでしょうか?

以上、宜しくお願い致します。

[ 続きを読む ]  返信件数:5件  [ 動画を見る] 

[11301]エクセルマクロVBA「Web連携」Microsoft Internet Controls_Webコンテンツの取得

2019-03-28 11:33:13 ざきさんさんからの投稿です。

小川先生、こんにちは。質問です。
仕事でロリポップWebメーラーにある情報を抜き取る作業をしたいのですが、ログインするところで躓いています。

https://tools.lolipop.jp/mail/

メールアドレスとメールパスワードの自動入力はなんとかマクロで作成できました。
しかし、どうやっても「ログイン」の画像をクリックして送信する方法がわかりません。
ちなみに、「Microsoft HTML Object Library」と「Microsoft Internet Controls」は参照済みです。作成したエクセルファイルを添付します。
アドバイスをお願いします。

[ 続きを読む ]  返信件数:2件  [ 動画を見る] 

[11296]エクセルマクロVBA「Web連携」Microsoft Internet Controls_Webコンテンツの取得

2019-03-26 09:49:07 受講生さんからの投稿です。

質問です。
「05_IE制御してコンテンツを取得.xls」ファイル中にある、マクロを実行したのですが、最初の数回は正常に実行できるのですが、繰り返すと「objIE.Visible = True」のところでプログラムがストップします。原因がわからず、困っています。「オートメーションエラー」と書いてあります。助けてください。

ちなみに、再起動して再度マクロを実行しても、同じ症状がでます。
回答よろしくおねがいします。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[11292]発展1講座イントロダクション - 使用するファイル、PDFの確認

2019-03-22 18:41:46 井上 聡さんからの投稿です。

小川様何度もお手数おかけして申し訳ありません。
配列はほとんど忘れていました。ADOを勉強する中で復習しようと思いテキストを読みました。
発展テキスト2P24

 For cnt = 0 To 5
        st = stAry(cnt)
       Debug.Print st
    
    Next
    For cnt = 0 To 5
'        st = stAry(cnt)(A)
        Debug.Print st
    Next


配列の要素に入っている値を調べる例を紹介するとあります。

しかし、(A)がないとjunのみ出力されます。配列が保持されないならば、For cnt=0 to 5は必要ないのではないかという疑問がうまれ保持するにはどうしたらよいのかいうことから何度も質問して申し訳ありませんでした。変数はモジュールレベル変数で宣言しても、一次静的配列は構文内しか保持されないという結論でよろしいでしょうか。結論がないと次に進めませんのでよろしくお願いします。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[11281]エクセルマクロVBA「Web連携」Microsoft WinHTTP Services 5.1_Cookie

2019-03-20 00:40:27 受講生さんからの投稿です。

質問です。
動画でクッキーを使ったリクエストのやり方とありますが、どういった場合にクッキーを使ったリクエストするのでしょうか?
クッキーを使ってリクエストをして解析することと、クッキーを使わないでリクエストをして解析する違いを教えてください。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[11272]発展編1 フォローメールセミナー 第30回

2019-03-18 20:51:59 赤澤 勇二さんからの投稿です。

フォローメールメ-ルセミナー第30回ですね。
メールプリントアウトで一冊のファイルが完成しました。
EmEditor大活躍でした。
仕事柄3交代の勤務でメール見るのも朝、夕、真夜中でメールのプリントアウトのみの日も多くありました。
内容は把握出来るので時間をかけて復習します。

追記
復習ついでにカレンダーを改良して日程管理表と日程シミュレーションを作ります。

会社に縛られず でも 楽しく会社に貢献出来るマクロを作成します。 「自分が楽をする為に」

頑張ろう! 日本のモノ作り!!

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[11268]発展1講座第2章 - プロパティ 上位のオブジェクト

2019-03-17 10:28:59 gooskaさんからの投稿です。

前に必要に迫られて大急ぎで受講したとき、時間の関係で、ここは飛ばしてしまったことを後悔しています。
.Parentのことを知りませんでした。

当時複数ファイルを開いて、ファイル間で作業するマクロを作っていたので、
「今作業しているシートのファイルがどれなのか知りたい」
という場面、たくさんありました。

そういうとき、.Parentを使えばよかったのか・・・・
イミディエイトウィンドウに出力すれば、都度確認ができましたね。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[11267]発展1講座第2章 - End プロパティの使い方

2019-03-17 10:15:09 gooskaさんからの投稿です。

しばらく仕事でマクロを使う機会がなく、勉強から遠ざかっていましたが
まもなく任期が終わるので、次にマクロを作る仕事のチャンスを広げるべく、基礎を学び直しています。

データ最終行の取得は、実務でマクロを書くとき必須要素だったので
Excelのバージョンに左右されない
Range("A" & Rows.Count).End(xlUp).Row 構文を
理解不十分のまま、借用していました。

しかし構文の意味がわかると、丸暗記する必要がなくなるので
後追いでもいいから、正しい概念の把握につとめたいです。

今回久しぶりにこの構文を見て、なぜrows.count とrowsが複数になるのかピンときませんでした。

でも、レジュメのコレクションをもう一度見たら
「行 Rows 特定ワークシート内のすべての行」 とちゃんと書いてありました。行コレクションだからRows とようやくわかりました。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[11266]発展1講座イントロダクション - 使用するファイル、PDFの確認

2019-03-17 09:26:58 受講生さんからの投稿です。

発展2の配列についての質問です。DVDにて講座購入済みです。
Sub GetZangyoList_Array()
Dim st As String
Dim cnt As Long
Worksheets("残業3").Activate
Dim stAry(5) As String
stAry(0) = "jan"
stAry(1) = "Feb"
stAry(2) = "Mar"
stAry(3) = "Apr"
stAry(4) = "May"
stAry(5) = "Jun"

For cnt = 0 To 5
st = stAry(cnt)
Next
For cnt = 0 To 5
Debug.Print st
Next
End Sub

発展2 テキスト24P
この場合stにはjunのままでPrintされます。配列はFor Next構文内のみ有効で構文外は配列はたとえモジュール変数にしても数値は保持されないと考えてよいのでしょうか。尚、この場合はLBound 関数UBound関数を使用する必要があると考えてよいのでしょうか。

[ 続きを読む ]  返信件数:5件  [ 動画を見る] 

[11258]表を解析して1行のリストを作る、1行のリストを解析して表にする(その2)

2019-03-14 12:54:42 jinoseさんからの投稿です。

[感想]
これは、、、難しい!初期化、変数を増やすタイミング、for next構文の最初と最後の処理、条件分岐等。。。まだ身についていないところの総復習が必要と感じた。

まずはフォローアップ ベーシックを1周できました。わかりやすい講義をありがとうございました!!!

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[11256]基礎講座第4章10 - If文のその他の構文その2

2019-03-13 23:35:06 受講生さんからの投稿です。

この度、実際にマクロを初めて動かしながら講座を受講したのですが、考え方から色々と為になりました。
そこで質問なのですが、
[cord]Sub IfSample06_01()
If Range("E7").Value = "男性" Then
If Range("G7").Value >= 80 Then
Range("H7").Value = "合格です"
Else
Range("H7").Value = "不合格です"
End If
Else
If Range("G7").Value >= 70 Then
Range("H7").Value = "合格です"
Else
Range("H7").Value = "不合格です"
End If
End If
End Sub[/cord]
この構文でEnd if の後のelseからの読み方といみがわかりませんでしたので、どんな役割をはたしているのがお手数ですが説明の程、よろしくお願いいたします。

[ 続きを読む ]  返信件数:9件  [ 動画を見る] 

[11251]【追加特典】「R」から「D」を作る様子-ショートカットキーを使った場合

2019-03-12 17:02:20 受講生さんからの投稿です。

ctrl+shift+endを実行しても、カーソルは移動するのですが、範囲選択ができません。
なにか、パソコンの設定がおかしいのでしょうか。

[ 続きを読む ]  返信件数:3件  [ 動画を見る] 

[11239]エクセルマクロVBA「Web連携」POSTリクエスト

2019-03-10 21:10:02 Sakuさんからの投稿です。

小川先生

こんにちは
IE上のログインボタンを押すという動作がうまくいきませんでした。
添付の先生の「送信ボタン」と
失敗している「ログイン」ボタンは、formの中の3番目にどちらも位置しているのですが
「ログイン」ボタンはelments(2)ではないのでしょうか。

よろしくおねがいいたします。

[ 続きを読む ]  返信件数:3件  [ 動画を見る] 

[11238]発展1講座第1章 - 固有オブジェクト型

2019-03-10 21:02:14 morimotoさんからの投稿です。

総称、固有オブジェクトのメリット等説明している市販の本は見当たりません。勝手にdim A,,,, set A ,,,,と始められて何やってんのかわかりませんでした。いっぽい地味にworksheets("sheet1").,,,,,worksheets("sheets2")....と打ってましたが、今後はsetを使ってやってみます。
ほんとうにこの講座はつかみやすいのでやりやすいです。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[11237]発展1講座第5章 - モジュールレベル変数 アクセシビリティ設定

2019-03-10 20:46:27 受講生さんからの投稿です。

すみません。発展編第六章の動画はないのでしょうか??

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[11236]DPRに基づいたリライト。R→D、D→R

2019-03-10 16:38:16 Y.O.さんからの投稿です。

解説欄には「定数を使った方法、構造体を使っだ方法」と記載されていますが、実際の動画ではDPRの説明が主で、定数や構造体の説明は一切されていないように思います。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[11233]複数条件を組み合わせた条件分岐

2019-03-09 17:36:41 藤村英夫さんからの投稿です。

これはスゴイ!! 脱帽です!! for next 構文のハナコのステップは想像が届きますが、このIF then 構文の組合せの作法は思いもつきません。私、いままで二重仮定のIF then構文は、IF とend ifの組合せがよくわからなくなるのです。これは、非常に参考になりました。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[11232]発展編1 フォローメールセミナー 第20回

2019-03-08 09:55:42 受講生さんからの投稿です。

色見本ですね 結構会社で使います、何回もマクロ作りました。
機械加工の時に穴あけのサイズとか種類、角度等々、表作成の識別に重宝しています。
保管庫、覚えましたので今度からは取り出すだけにします。

次回も楽しみにしています。

[ 続きを読む ]  返信件数:0件  [ 動画を見る] 

[11231]発展編1 フォローメールセミナー 第20回

2019-03-08 09:53:59 受講生さんからの投稿です。

色見本ですね 結構会社で使います、何回もマクロ作りました。
機械加工の時に穴あけのサイズとか種類、角度等々、表作成の識別に重宝しています。
保管庫、覚えましたので今度からは取り出すだけにします。

次回も楽しみにしています。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[11228]出現回数を数える。CountIf関数がやっていることをマクロで書くと?

2019-03-07 19:37:18 マサラさんからの投稿です。

マクロの実行に伴って変数の値が推移する。
講義中で行われていたように、変数の値を丁寧に追いかけることで理解につながりました。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[11227]発展編1 フォローメールセミナー 第18回

2019-03-06 11:16:10 受講生さんからの投稿です。

小川先生 Selctyon の使い分けでこの様な事が一瞬で出来るマクロを知っただけでも大満足です。

「楽して結果を出したいから!」 

昔N88BASICやDOS_BASICをかなり時間をかけて作りましたが
エクセルのマクロは凄いですね 時間の許す限り覚えたいと思います。

つい最近までCADのマクロを作っていました。

リアルタイムで動くマクロを覚えて、楽しんで爽快に仕事がこなせるのであれば努力は惜しみません。

いちばん楽な書き方 ご指導宜しくお願い致します。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[11223]行の挿入、削除をする

2019-03-05 11:40:15 jinoseさんからの投稿です。

[質問]
動画を見ようとしたら、「500 Internal Server Error」というエラーが出てきて見ることが出来ません。。。メンテナンス中なのでしょうか??

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[11218]発展編1 フォローメールセミナー 第14回

2019-03-04 07:15:05 受講生さんからの投稿です。


インターネットで検索したのですが表記の方法が変わってるみたいで

Sheet1上のセルA1の文字列
第001回 「巨大台風から日本を守れ 富士山頂・男たちは命をかけた」(富士山レーダ
ー・三菱電機 3月28日)

の部分が 
コピペした内容

001 3月28日 巨大台風から日本を守れ
富士山頂・男たちは命をかけた 富士山レーダー 三菱電機 -

このような状況になりました。
「  」と ( )と 他 抜けてしまいました。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[11217]発展編1 フォローメールセミナー 第9回

2019-03-03 23:05:43 受講生さんからの投稿です。

伝票印刷(1ページ全部入る)印刷出来る時と出来ない時があり困っています。
長い伝票は出来ます。
.FitToPagesWide = 390 ←プリンターが毎回10-400の入力を求めて来ます。
エクセル操作では問題無く(1ページ全部入る)印刷が出来ます。

[ 続きを読む ]  返信件数:2件  [ 動画を見る] 

[11215]カテゴリアクションのリストを作る

2019-03-02 12:00:18 jinoseさんからの投稿です。

[感想]
基礎編フォローアップ受講の途中ですが、待ちきれずにこちらに来てしまいました!

[質問]
【動画1】で使うエクセルファイルはどれでしょうか?
(zipファイルの中にある 11_CatActList.xlsm というファイルがビデオ内のファイルに近いので使っていますが、よろしいでしょうか?)

よろしくお願いいたします。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[11213]Visual Basic Editorの基本用語と使い方 - プロパティウィンドウ

2019-02-28 14:58:26 受講生さんからの投稿です。

standardwidth プロパティのところで3に変更してもA列が変わってないのはなぜですか?
試しに3に変えてみたときAもすべての列がかわりました。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[11211]基礎講座第3章10 - プログラミング実習のまとめ

2019-02-26 16:18:49 梅津 和馬さんからの投稿です。

今のところはなんとか理解でき、ある程度、現在の仕事での実戦で練習をやっております。ですので、呑み込みも早いと思う。for next構文やピボットなど、もっとその先を早く知りたくなりますね。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[11208]基礎講座第3章10 - プログラミング実習のまとめ

2019-02-26 10:52:42 マサラさんからの投稿です。

講座がここまで進んで、導入編で小川先生が紹介されていた内容がやっと分かりました。
実感としては、必須知識がひとつひとつ積みあがって形になっていく感じです。語学学習に近いのかもしれませんね。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 


各講座ごとのメッセージを見る場合はこちら

 

まずはここから!スマホでも学べる無料動画講座

今なら先着30名限定で無料!定価4,800円の、初心者のためのエクセルマクロ動画講座。
  1. Excel 97~Excel 2016まですべて対応。動画本数20本、総再生時間2時間44分53秒
  2. PC, Mac, iPhone, iPad, Androidのお好みの環境で、いつでも好きなときに学べます。
2004年から10年間述べ3,000名以上に実施した研修の経験と実績を集約した講座です。
いますぐ無料で試してください。

トップへ