VBA
下記の質問をいただく、 (が、いつものように、できない、難しい・・・の後ろ向き回答、ぉぃぉぃ) >さてこのたび仕事の関係で某厚生労働省の年金関連のqaページをエクセルの表にして抽出したいと考えています。最低限A列にQ(質問内容)、B列に(回答内容)…
タイトルサムネイル1.小数点をそろえる、オッズ10倍以下を赤にする 見た目を少し、修正してみます。 時間稼ぎの見た目修正よりも、異常なオッズや勝ち馬を探すロジックを組み込めよ・・・ なんて、声が聞こえてきますが。。。下記、いつもの あのあの 解説動…
タイトルサムネイルWithEvents myChartClass As Chartを使い、グラフのイベントをクラスモジュールで処理する グラフ選択で軸の値を表示、ダブルクリックで修正、そんな処理を作成しました。 グラフの軸の値は、 With myChartClass.Axes(xlValue) Debug.Prin…
Excel A列に切替タイミングの秒数を入力、PowerPointの画面切り替え タイミングにセットする そんな処理を行ってみます。 タイトルサムネイルYoutubeのコメント欄で下記の質問をいただきました パワーポイントの自動画面切り替えの秒数の設定において、エス…
タイトルサムネイルPowerPointのスライドで複数サムネイル画像を作成 各スライドをjpgファイルに保存したいと思い、 VBAを探ってみたら、 .Export で 簡単に画像ファイルを作成できました。 youtu.be https://youtu.be/Gf1AGfSdN5c 目次 00:00 挨拶 やりたい…
タイトルとサムネイル下記、知恵袋の質問に触発され detail.chiebukuro.yahoo.co.jp ExcelのデータをPowerPointに転記する そんな処理をやってみます。勝手に作った仕様は、 Excel:A1一行目~項目名 2行目からデータ pp:図やテキストボックスに名前を付け、…
タイトルとサムネイルDim oDocument As Object Set oDocument = CreateObject("htmlfile") で作成したhtmlfileドキュメントオブジェクトに html文字列を書き込む、そんなデバッグ風景です。下記、いつもの あのあの そのその 解説動画です www.youtube.com h…
タイトルExcelのVBAで.Speakを使用すると、簡単に読み上げが可能です Application.Speech.Speak もあって、 セル読み上げだけじゃなく、好きな言葉を読み上げることができます。MsgBoxと組み合わせてみたけど、チョット、イマイチでした。 視聴者のみなさん…
Excelで入力された文字列(台詞)からwavファイルを作成してみた。 機械音声のファイルを作成してみました。 意外と簡単に音声ファイル .wavを作ることができそうなので、 コードをアレンジしながら使ってみてください。 何か面白い使い方、アイデアがあったら…
自作マクロVBAをExcelの右クリックメニューに追加したかったので、 いつものように デバッグ テスト してみます。 ※最後の後始末がうまくいかなかったのは・・・実力・確認不足です。下記、いつもの、あのあの そのその 動画解説です youtu.be https://youtu…
最近は、マクロ付きExcelブックなどを配布してないんだけど(ぉぃぉぃ、活動してないのか?) ファイル配布がセキュリティ関係で厳しくなるのかなぁ。 まぁ、あまり簡単にメール添付やネットからダウンロードした マクロ付きファイルから実行できたらまずいの…
Selection.Tables.Count で 選択したエリアに表・テーブルがあるか?判断 Columns.Count で 列数 Columns(x).Width で 幅が取得できます youtu.be https://youtu.be/FeZvnfIHWZ0 ← 文字が小さい時はYouTubeで直接見てください。 目次 00:00 0.つかみで、列幅…
www.youtube.com ↑ Word VBAを探る マクロの記録 と オブジェクトの調べ方 例題:検索した文字列の1行下に指定文字を入れる Word VBAのコードをマクロ記録から修正 - YouTube Sub Macro1() ' ' Macro1 Macro ' ' Dim n As Integer '先頭にカーソル移動 https:…
ExcelからPowerPointのテキストを取得したい 過去の記事:A列のデータをパワポへ ken3memo.hatenablog.com >これの逆(パワポのスライドタイトルをExcelへ)ってできますか? とコメントが来たので、パワポのテキストを取得してみたいと思います下記、作成した…
↑あっ、間違えた、先端の方ですね・・・結合は図形を折れ線とか足した時だから、この先端の丸と join は関係ないな。はずかしいけど、残しておくか・・・ 似ている質問見つけました ぉぃぉぃ teratail.comMSのページ※勘違いの結合だけど docs.microsoft.com…
いつものように参照設定の下記回答動画を作成、 テスト結果を確認した時に あれ?差出人が違う名前になってる? SentOnBehalfOfName を意図せずに発見→ https://youtu.be/u4sLe5J2Tms?t=80 And 落ちてたコードの拾い食い発言は面白くない(ネットにUPされてい…
結果を先に書くと、 Shape.TextFrame2.TextRange.Font.Fill.GradientStops.Item(1).Color で取得できました。 - : TextFrame2 : : TextFrame2/TextFrame2 : Module1.aaa - : TextRange : : TextRange2/TextRange2 : Module1.aaa - : Font : : Font2/Font2 : …
実行時エラー 1004 : RangeクラスのAutoFilterメソッドが失敗しました 質問元: teratail.com ↑が質問元です。※回答してから勘違いに気が付く、痛恨のパターン・・・落ち着け・・・VBAからフィルターを使ったこと無かったので、 勝手にデバッグ動画を作成 htt…
VBA PowerPoint イベント で検索すると、いろいろなページがヒットします。 今回は、下記公式の Application オブジェクトでイベントを使用する https://docs.microsoft.com/ja-jp/office/vba/powerpoint/how-to/use-events-with-the-application-object を…
IsDateで日付かチェック可能なのですが、 1200-12 みたいなYYYY-MMと取れる文字列を真 Trueと判断する まぁ、当たり前のお話なのかなぁ・・・なので、追加で、書式が文字列かチェックしてみたり、 置き換え前の文字に 日 が入っているか?チェックしてみたり…
下記の質問 Q. をいただく Vbaを、勉強中初心者なのですが、この度質問させて頂きたいことがあり、自身では調べきれずメッセー ジさせていただきました。「内容」 Vbaとvbsの違いについてです。現在、勤め先でvbaを使用し作成したxlsmファイル(150個)を作成…
またまた浮気して人力検索から teratail の質問を答えて、恥をかいてみたり・・・ (※ここまできたら、浮気じゃなくて、あっちが本命か?ぉぃぉぃ・・・)元ネタの質問ページは下記を見てください。※他の回答や質問のコードを参考にする。 teratail.com PowerP…
人力検索から浮気して teratail の質問に回答してみた。 テスト不足で、浮気先で恥をかいてしまった ぉぃぉぃ ※正確には、人力検索でもダメ回答で恥をかいていたりするんだけど・・・浮気先(質問元) teratail.com https://teratail.com/questions/j9rj56gr6h…
ExcelからWordの段落オブジェクトParagraphsを使用して検索文字列の位置Range.Informationを探してみました ※人力検索から浮気して teratail の質問に回答してみた。いつもの人力検索のノリなので、常連さんに怒られないか心配しつつ・・・浮気先(質問元) te…
>ExcelVBAでデータを集め、競輪予想を作っています。 ・ ・ ・ >さて最近、IEのサポート終了が告知されていますが >WEBからのデータ取得はどのような対処がベターなのでしょうか?ご意見をお聞かせください。ベター、ベスト、イロイロな考え方がありますが、…
下記の質問をいただきました。 >パワーポイントのVBAを検索していたらこちらに辿り着きました。 >A列~E列までのデータを1枚のスライドの5か所のテキストボックスに流し込むにはどうしたら >いいでしょうか? >テキストボックスは上から下へ同じ大きさ…
下記の質問をいただく >OUTLOOKで受信したメールで作業実施日を毎朝8時とすると >そこからからマイナス15時間から朝8時の範囲で受信したメールだけを >任意のサブフォルダーに移したいときはどのようにすればよいのでしょうか。 .ReceivedTime で受信…
テスト動画を冒頭に移動※先に観てもらう? https://www.youtube.com/watch?v=JoidvQb2BIE www.youtube.com ↑こんな感じの結果です。下記質問をいただいたので、テストしてみる。 Sub aaa() Dim strWORK As String '呼び出しは簡単で、調べたい文字列を渡す s…
www.youtube.com1.Range("B2:D5")など固定エリアをパワーポイントに貼り付けてみる https://www.youtube.com/watch?v=iMavOYyH2ac2.シート内の表を探す https://youtu.be/iMavOYyH2ac?t=3293.とりあえず、一つ表をエクセルからパワーポイントへコピー・貼り…
下記の質問をいただきました。 WEBページからのメッセージに困っていましたが objIE.navigate "JavaScript:function confirm() { return true; }" のおかげで次に進む事が出来ました。 本当にありがとうございます。ただ次の問題が新たに発生しました。 実行…