三流君のソースコード置き場

ブログにソースコードをアップして、ブログの検索機能で利用してます(利用予定です)

よく検索されるキーワード: [VBA]/ [VBS]/ [CreateObject]/ [Excel]/ [ADO]


test20240404_01ppスライドをexシートへグラフ情報付きで書き出す

あとで、解説を書く まず、コードを質問者さんへ送るソースコード: Option Explicit '起動済みの既存 パワーポイントのスライドから 'パワポのシェイプ情報をexcelシートへ書き出す 'ex:新規ブックを追加して、pp:スライドの情報をex:シート単位で貼り付ける…

蛇足1.パワポのアクティブスライドからオブジェクトの名前をエクセルに落とす

Option Explicit '起動済みの既存 パワーポイント スライド .Shapes から テキストを取り出す 'アクティブシートに名前とテキストをセット Sub test20220915ppスライド内シェイプ名取得() Dim ppApp As Object 'As PowerPoint.Application Set ppApp = Nothi…

ActiveChart.SeriesCollection.Count で グラフ系列の数

ActiveChart.SeriesCollection.Count で グラフ系列の数 ActiveChart.SeriesCollection.Count よく見かける .Count でChartのSeries数がわかりそうです Option Explicit Sub bbb() Dim n As Integer Debug.Print "コレクションの数:" & ActiveChart.SeriesCo…

PowerPoint VBA OnSlideShowPageChange でハマる

ken3memo.hatenablog.comhttps://youtu.be/jP0O2KlXeLE 目次 00:00 1.処理のタイミングをとりたい 00:32 1.2 標準モジュールにOnSlideShowPageChange 03:20 1.4 ん?一回目にコードが走らない?なんだこれ? 05:55 2.事前準備で名前を付ける 08:12 3.1 1ペー…

PowerPointVBA Shapes.AddMediaObject

PowerPoint2003マクロ記録で 挿入 ビデオとサウンド ファイルからサウンド 操作を記録した。 記録したコードは概要欄・コメント欄を見てください。youtu.be#PowerPointVBA #マクロ記録 #Shapes #AddMediaObject #デバッグ .AddMediaObject は 2013で廃止され…

PowerPointVBA PageSetup

PowerPoint2003マクロ記録で ファイル ページ設定 スライド 縦(P) 操作を記録した。 記録したコードは概要欄・コメント欄を見てください。youtu.be#PowerPointVBA #マクロ記録 #PageSetup #デバッグ Sub Macro3() ' ' マクロ記録日: 2022/5/18 ユーザー名: K…

PowerPointVBA Presentations.Add

PowerPoint2003マクロ記録で ファイル 新規作成 (ついでに レイアウト 空白) 操作を記録した。 記録したコードは概要欄・コメント欄を見てください。youtu.be#PowerPointVBA #マクロ記録 #Presentations #Add #デバッグ Sub Macro2() ' ' マクロ記録日: 2022…

VBS マクロ付きExcelファイル .xlsmを開き マクロを実行する 例題としてオッズ取得のマクロを実行

VBS

.vbs で マクロ付きExcelファイル .xlsm を開き、マクロを実行してみます。 タイトル画像1.簡単なVBSの説明 Set oApp = Nothing '1.1 Excelを起動 WScript.Sleep 1000 Set oApp = CreateObject("Excel.Application") oApp.Visible = True '可視にする oApp.U…

ActivePresentation.Slides(1).Copy スライドの1ページ目をコピー

データ転記でページが足りない時、 'スライドを増やす ppApp.ActivePresentation.Slides(1).Copy '1ページ目をコピー ppApp.ActivePresentation.Slides.Paste p '最終スライドpageに貼り付け で、1ページ目をコピーしました。 p = 1 While Len(Trim("" & r.O…

EXcel VBA 読み上げ Range("A1:C5").Speak と Application.Speech.Speak

Option Explicit Sub test1() '.Speakなんてあるんだ・・・ Debug.Print "開始" & Now Range("A1:C5").Speak Debug.Print "終了" & Now End Sub Sub test2() '直接文字列で読み上げ も 可能みたいです Application.Speech.Speak "あのあの" Application.Spee…

Excel VBA CommandBars(n).Name の実行結果

ken3memo.hatenablog.com ↑で使用する、メニューの名前がわからないとき、、右クリック メニューへ マクロを追加したい時、 どのメニューか?調べる時に使ってみてください。現在の設定をExcelシートへ書き出してみました。 Sub CommandBarの内容をセルに書…

Word VBA コード かこのコード

Sub Macro1() ' ' Macro1 Macro ' ' Dim n As Integer '先頭にカーソル移動 https://www.relief.jp/docs/word-vba-selecting-start-documents.html から引用 ActiveDocument.Bookmarks("\StartOfDoc").Select '文字列を探す、ターゲット位置決め Selection.F…

Excel VBA UsedRange で使用範囲を取得

Excel VBA UsedRange で使用範囲を取得して Rows.Count で行数 最終行は Cells(objRANGE.Rows.Count, 1).Row なんて感じで遠回りで取得してみたDim objRANGE As Range Set objRANGE = ActiveSheet.UsedRange 'セルの使用範囲を取得VBA Excel 表 範囲 で検索…

Excel VBA CurrentRegion で含まれている範囲が取得可能

Excel VBA CurrentRegion で含まれている範囲が取得可能です ショートカットキー操作のShift+Ctrl+:(コロン)の範囲をVBAで取得できますDim objRANGE As Range '範囲を入れるRange型 Set objRANGE = ActiveCell.CurrentRegion 'アクティブセルを含む範囲を取…

Access VBA データの重複チェックをDcount関数と更新前処理を使用して行う おっさんのデバッグ動画です。一部でも参考となればうれしいです。

https://www.youtube.com/watch?v=Irr_9wx6CAY 標準モジュールにDCountを利用したチェック関数を追加する Option Compare Database Option Explicit '0.商品コードを受け取り '1.マスターに、受け取ったコードがあるかチェック '2.明細、履歴にダブりがある…

PowerPoint2003のマクロ記録でパワーポイントのスライド追加とタイトル代入

VBA

VBAのプロパティやメソッドを探る時、 マクロ記録を使う方法 そんなお話をダラダラ撮った動画 youtu.be https://youtu.be/dENBobeb5lY です。プログラム作成の参考となれば幸いです。はてなの質問 q.hatena.ne.jp の回答用に作成したコードと動画です。下記…

IE操作 .getElementsByClassName("クラスの名前") で データ取得してみた JRA発走時刻

最近、要望やご指摘のメッセージやメールをいただいてます。 ありがとうございます。 一つ一つ、処理中なので少々(しばらく?)お待ちを。なんて、挨拶は置いといて自分で見つけた、 いつものバグ報告から・・・ ライブを始めたいと思います。前回、修正終了…

VBA配列の初期化で Array関数を使用 と Split関数で配列作成、UBoundで個数の判断

VBA

Array関数やSplit関数で配列作成したらUBoundで個数を判断するといいですよ。 そんなお話です。【VBA】配列の初期化で Array関数を使用 と Split関数で配列作成、UBoundで個数の判断【三流君】 - YouTube www.youtube.com配列の初期化を行いたかったので、Ar…

Excel VBA Font.Bold=Trueでフォントを太字にできます 前回.FontStyle = "太字"を紹介したけどこちらのほうが

前回のライブで、テンパって マクロ記録でプロパティを調べるといいですよ・・・ と 言って、セルを部分的に太字にする、 .FontStyle = "太字"を疑問に感じながら、 紹介したけど、 やはり .Bold=Trueで太字にできました。テスト動画: https://www.youtube.c…

Excel VBAで最終行を求める VBSで使うには Excelの定数を使う方法

例題として Excelのデータ最終行までを処理するコードをVBSで実行してみます下記、いつもの解説動画です※蛇足付きですがよろしく。 【VBS】VBSでExcelの定数xlDownなどを使う方法 例.End(xlDown).Rowで最終行【三流君】 - YouTube www.youtube.com最終行まで…

VBA IE操作 YouTube動画から ブログ の本文を作成する サンプルとデバッグ

処理の流れ ^^^^^^^^^^ 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で表示されている はてなブログ 編集画面の本文を書き換えるコード

IEで表示されている編集画面の中から、 本文 テキストエリア を探して、内容を置き換える。そんな処理を探ってみたいと思います。デバッグ風景の動画 https://www.youtube.com/watch?v=qdSxWCeNa2w www.youtube.com1.表示されているIEを捕まえる URLに /edit…

プレゼンテーション1.pptm ? application.SlideShowWindows(1).Presentation.Name

PowerPoint VBA 二つのスライド 次ページ処理を同時に行う方法をライブ配信で探ってみた・・・ - YouTube www.youtube.com場所と名前は、 ? Application.Presentations(1).Name プレゼンテーション1.pptm ? Application.Presentations(1).Path D:\VBA\201802…

パワーポイント マクロ .SlideShowWindows(1).View.Next 次ページ処理を探ってみた

人力検索はてなの質問 q.hatena.ne.jp の 回答をライブ配信で作ろうとするが、ハマったお話です。 ※前半は、グダグダなので、ゆるしてください・・・PowerPoint VBA 二つのスライド 次ページ処理を同時に行う方法をライブ配信で探ってみた・・・ - YouTube w…

asp094.html 三流君ASP:2進数文字列と16進文字列の変換処理に挑戦

ASP

元の三流解説は、 三流君ASP:2進数文字列と16進文字列の変換処理に挑戦 ↑を見て、笑ってやってください。 ブログに過去のソースコードをアップして、ブログの検索機能で利用してます(利用予定です) ※古くさいコードが多いです・・・ HEX16進文字列を受け…

asp093.html 三流君ASP:FORM CHECKBOXから受け取った値を使用してWHERE句の作成

ASP

元の三流解説は、 三流君ASP:FORM CHECKBOXから受け取った値を使用してWHERE句の作成 ↑を見て、笑ってやってください。 ブログに過去のソースコードをアップして、ブログの検索機能で利用してます(利用予定です) ※古くさいコードが多いです・・・ FORM CHECK…

asp092.html 三流君ASP:FORM SELECTタグのOPTION値を受け取って処理を行う

ASP

元の三流解説は、 三流君ASP:FORM SELECTタグのOPTION値を受け取って処理を行う ↑を見て、笑ってやってください。 ブログに過去のソースコードをアップして、ブログの検索機能で利用してます(利用予定です) ※古くさいコードが多いです・・・ SELECT OPTION …

asp091.html 三流君ASP:ADO CSVでReadOnly=0と.AddNewを使いデータ追加

元の三流解説は、 三流君ASP:ADO CSVでReadOnly=0と.AddNewを使いデータ追加 ↑を見て、笑ってやってください。 ブログに過去のソースコードをアップして、ブログの検索機能で利用してます(利用予定です) ※古くさいコードが多いです・・・ ソースコード <%@LA…

挨拶・自己紹介:
失敗続きのAB型の変わり者 :三流プログラマー Ken3です
フリーのエンジニア・個人事業主です・・と書くと聞こえはイイが(それとなくカッコよく聞こえるが)、 現在は小さな案件の受注請負 と 短期派遣 で 日々つつましく?ほそぼそと暮らしてます。
(※詳細は[三流君 三流プログラマーとは?]を見てください)


Ken3 ホームページ 目次

分類:HPを大きく分けると4つの柱(分類)です。
・[Excel/Access VBA]の解説
・[ASP(Active Server Pages)]の解説。
・[元コンビニ店長時代の話]が弟に巻き込まれ、失敗した脱サラ、畑違い?の仕事で失敗。
・[プログラマーの愚痴]では、あまり見せたくない三流プログラマーの内面かな。
三流君を踏み台にする
主に上記4つの分類でHP作成やメルマガの発行を行ってます。
※更新頻度が落ちていて情報の鮮度が悪いです。

三流解説動画の再生リスト
https://www.youtube.com/user/ken3video/playlists

本当に三流なんです(笑):たまにスゴイですねなんて言われることもありますが、
真実は→ [三流君の真実は...] ←を初めに見てくださるとわかると思います。
(からくりは、成功例↑しか載せてなくて ヒドイ失敗例はお蔵入り迷宮入りが多かったりします)