VBA
PowerPoint VBAで複数スライドの書式を一括変更する方法 PowerPointで資料を作成する際、複数のスライドに同じ書式を設定したい場面はよくありますよね。しかし、手作業で一つずつ書式をコピー&ペーストしていくのは、非常に面倒で時間がかかります。 そこ…
ActiveChart.SeriesCollection.Count で グラフ系列の数 ActiveChart.SeriesCollection.Count よく見かける .Count でChartのSeries数がわかりそうです Option Explicit Sub bbb() Dim n As Integer Debug.Print "コレクションの数:" & ActiveChart.SeriesCo…
データ転記でページが足りない時、 'スライドを増やす ppApp.ActivePresentation.Slides(1).Copy '1ページ目をコピー ppApp.ActivePresentation.Slides.Paste p '最終スライドpageに貼り付け で、1ページ目をコピーしました。 p = 1 While Len(Trim("" & r.O…
ken3memo.hatenablog.com ↑で使用する、メニューの名前がわからないとき、、右クリック メニューへ マクロを追加したい時、 どのメニューか?調べる時に使ってみてください。現在の設定をExcelシートへ書き出してみました。 Sub CommandBarの内容をセルに書…
VBAのプロパティやメソッドを探る時、 マクロ記録を使う方法 そんなお話をダラダラ撮った動画 youtu.be https://youtu.be/dENBobeb5lY です。プログラム作成の参考となれば幸いです。はてなの質問 q.hatena.ne.jp の回答用に作成したコードと動画です。下記…
Array関数やSplit関数で配列作成したらUBoundで個数を判断するといいですよ。 そんなお話です。【VBA】配列の初期化で Array関数を使用 と Split関数で配列作成、UBoundで個数の判断【三流君】 - YouTube www.youtube.com配列の初期化を行いたかったので、Ar…
前回のライブで、テンパって マクロ記録でプロパティを調べるといいですよ・・・ と 言って、セルを部分的に太字にする、 .FontStyle = "太字"を疑問に感じながら、 紹介したけど、 やはり .Bold=Trueで太字にできました。テスト動画: https://www.youtube.c…
例題として Excelのデータ最終行までを処理するコードをVBSで実行してみます下記、いつもの解説動画です※蛇足付きですがよろしく。 【VBS】VBSでExcelの定数xlDownなどを使う方法 例.End(xlDown).Rowで最終行【三流君】 - YouTube www.youtube.com最終行まで…
処理の流れ ^^^^^^^^^^ 1.IE起動 2.B2に入力されたYoutubeのURLに飛ぶ 3.動画のタイトルをB1のセルに書き込む 4.動画の概要 説明欄を取り出し、リンクがあればリンクを細工する 5.動画投稿日をB25にセットする 6.キーワードを取り出しB3にセット 7.コメント…
単体で動作確認ができたので、 結合処理を行ってみます下記、いつもの酔っ払い解説動画です。 https://youtu.be/Ymk_TSO7dQk youtu.be結合処理中のエラー、不具合 を 面白おかしく説明しようと がんばってみましたが、 うまく料理できませんでした。失敗やエ…
はてなブログの記事管理画面 で 条件を入れて検索する前回 ken3code.hatenablog.jp の 続きです。 そんな処理を作成してみたいと思います。 デバック、いきあたりばったりのプログラミングを笑ってください。数行のコードを下記でダラダラと動画解説をしてい…
IEで表示されている編集画面の中から、 本文 テキストエリア を探して、内容を置き換える。そんな処理を探ってみたいと思います。デバッグ風景の動画 https://www.youtube.com/watch?v=qdSxWCeNa2w www.youtube.com1.表示されているIEを捕まえる URLに /edit…
人力検索はてなの質問 q.hatena.ne.jp の 回答をライブ配信で作ろうとするが、ハマったお話です。 ※前半は、グダグダなので、ゆるしてください・・・PowerPoint VBA 二つのスライド 次ページ処理を同時に行う方法をライブ配信で探ってみた・・・ - YouTube w…
ken3memo.hatenablog.com より現在単勝の表を下記のコードで取り込むと、 'Webの表をシートへ転記(代入する) For y = 0 To objTABLE.Rows.Length - 1 '行のループ For x = 0 To objTABLE.Rows(y).Cells.Length - 1 '列数分ループ ' objTABLE.rows(行).cells(…
ライブ配信で作りかけ JRAオッズ取得 できなかったけど...ken3memo.hatenablog.comよりwww.youtube.com ↑が配信したYouTubeライブのアーカイブです。途中まで作成したテスト用のソース Sub ie_test() 'IEの表示をテストする。 'IEの起動 Dim objIE As Intern…
簡単な解説は、 http://ken3memo.hatenablog.com/entry/2016/12/06/225432 に置いておきました。 少しでも、一つでも処理の参考となれば・・・・ Option Explicit Sub le_test20161206_複数テーブルを取得() 'IE起動 Dim objIE As Object 'IEオブジェクト…
https://www.youtube.com/playlist?list=PLskfqQDb_hPLFOCHjhMeYCM-rMt2r0Z7o www.youtube.com 2009-03-16 三流解説 VBA IE Webページの表を取り込む サンプルプログラム http://ie.vba-ken3.jp/sample/002/2009-03-16.html ↑解説ページはこちら 'C8のURLを…
InStr関数をループさせて、複数回の禁止ワードを探す Const strMOJI = "注目 激安通販 激安商品 激安価格" から、 激安の文字がいくつあるか? InStr関数を使って、カウントしてみたいと思います。Instr(検索開始位置, 検索元文字列, 探す文字列) で、チェッ…
三流君VBA:Excelのグラフをgifへ変換 .Exportメソッド使用の ActiveChart.Export ("C:\samp.gif") ExcelグラフをGIFにできたので 少し、テストして遊んでみます。テスト結果の動画 www.youtube.com 【VBA】Excelグラフを ActiveChart.Export で GIFに変換出…
InStr関数を使用すると、 文字列の中から、指定した文字列の位置を知ることができます。見つけた位置・場所 = InStr(探される元文字列, 探す文字)なんて日本語で書くと、アレなんで ※オマエの日本語・説明文が悪いって 読者様の心の声もありますが・・・いつ…
リンクから値を抜く、そんな処理をしてみたいと思います。 ランキングのリンクだったり、 過去記事のリンクだったり、 ウェブページはリンクでつながっているので、今回は、サンプル処理として、 バックナンバーの一覧ページからリンクを取り出してみます。…
まぁ、一般的なので説明もいらないとは思いますが、 Left,Mid,Right 関数をテストしてみます。テスト動画: www.youtube.com 【VBA】文字列を抜き出す 関数 Left,Mid,Right 【三流君】 - YouTube※プログラム講座や学習サイトあるあるで、 簡単なものは長く詳…