Powerpoint VBAを使おう!

Powerpoint VBAやExcelのVBAで遊んでいます。JavaScriptやJScript,HTAに最近はまってます。

自己書き込み型再び HTAネタ

以前失敗した自己書き込み型の掲示板ぽいやつです。強引に解決?したものをメモで。前回のものはローカルで使う場合は動くけどネットワーク上で動かすとADODB.Streamが警告を受けて止まってしまうというもの。FilesystemObjectを使う限り,UTF-8は使えないか…

Javascript  SVGのツールチップを表示する

さんざん悩んでいたものが解消したので,備忘録SVGで図形の上に来た時に任意の値を表示したいというもの。 titleとかを使えば似たようなものはできたりしますし,svgの直後に文字をつけてCSSでなんとかする手もありました。でも制約がけっこうあり,不満でし…

HTA 自己書き込み型のスクリプト(失敗)

すっかりHTAにしか興味がないので,ここに書くのも憚られるんですが,自分用メモとしてなら名前詐欺もいいかなと思いそのまま書きます。 HTAネタです。やったことは,自己書き込み型のスクリプト。 テキストボックスを一個もっていて,そこに打ち込んだもの…

音声ファイルデータを後につけて実行するメモ

自分用メモ音声データをBase64でテキスト化して,最後に付け足して使うことが可能だったこと。 <html> <head> <meta http-equiv="X-UA-Compatible" content="IE11=edge" charset="utf-8"> <title>テスト中</title> <script> window.onload=function(){ mus.play() new Vue({ el:"#app", data:{ myText:"今日はいい天気です。" } }) } </script> </head> <body> </body></html>

mp3ファイルをbase64でテキストにしてjavascriptで活用する

すっかりHTAにはまりこんで,Powerpointに戻る気配がありません(;´∀`)JavascriptやCSS,HTML5でできることの幅広さにおののく毎日で,日々本がたまりにたまって読める気配がない。でも,気の向くままに,調べものするときに読むことで,少しずつ,少しずつ頭…

HTA Audioオブジェクト meta記述で使えた

昨日までの成果でHTAを作る場合にmeta記述でEdge互換にするといろいろ使えたってのを書いていました。以前失敗したAudioオブジェクトのやつがふいに頭によぎり試してみた。ためしてみたまず前の失敗例 <html> <head> <meta charset="utf-8"> <title></title> <script> var pu=Audio() pu.src="end.mp3" pu.play() </script> </head> <body> </body> </html>…

たぶんできました。

Plotly.js plot.ly 現段階でわたしが選んだのはこれです。奥が深そうであり,かつ,こだわらなければシンプルに書ける。なんといいもの。Libralyファイルもたった一つです。大き目ではありますが,そこは機能の魅力に負けました。HTAのコードだけ載せます。 <html></html>…

次にやること メモ

アンケートを取ったら,次にやることはグラフ表示。そこまでできたら本当に授業に生かせる気がする。単純に記録やアンケートを取るだけならもう対応可能なとこまできたわけですが,グラフはまた別の話ですね。HTML+JavaScriptという範囲でなら選択肢は非常に…

アンケート とりあえずできた

今日一日でかなり進んだ。久々に一日の大半を使ってやってた気がします。Excelのブックを貼れないのが残念ですが,まぁやってみます。Excelには二つのシートを作ります。 アンケートシート と コード と名前をつけます。アンケートシート はこんな感じ セル …

アンケートづくり テキスト出力部分も統合

さて,やっとJScript,HTML部分の最後です。たぶん。けっこう確認はしたんですが・・・どうでしょう。(;´∀`)Excelとの連携はまだです。メモ帳などにUTF-8の文字コードで出力し,拡張子HTAで保存すればたぶん動きます。たぶん(;´∀`)dataフォルダを直下につく…

アンケートフォームづくり なんとか。

いろいろと試行錯誤をして,たぶんですが <table id="~"></table> に対してinnerHTMLを使うのをHTAでは拒否られていたようでした。HTMLではそんなこと気にせずやってくれてたので,残念ですが,HTA+JScriptとHTML+JavaScriptで仕様が違うのはわかってること。ローカルファイルにア…

HTA innertHTMLまわりでうまくいかない

あいかわらずアンケートのほうで遊んでいます。いったんは作れたんですが,JavaScriptの情報をあさってると,便利そうなところにどんどん出会うので,それに従って書き直しているところ。とりあえずhtmlを作る部分 ブラウザでは動くHTMLをのせます。 <html> <head> <meta charset="utf-8"> <title>無</title></meta></head></html>…

アンケート けっこうできてきた。

一度はまりだすと,小説より面白いですね。ひたすらアンケートのやつやってました。Excelのブックをアップする手段がないので,物自身は上げれませんが,概要とコードを上げてみます。図のように,エクセルのシートに設問のデータを入れると,htaを作り出す…

アンケート部分の例を作ってみました。

どういうコードを吐き出させればいいのかを確かめるため,とりあえずアンケートフォームを作ってみました。画面はこんな感じ 送信ボタンを押すと, <div id="answer"></div> にアンケートの結果をとりあえず出すように作りました。最終的にはこれを望む場所に放り込むよう作ればいい…

アンケート作成 苦戦中です。 愚痴みたいなもの。

アンケートのHTAを最終的にはつくるべく,HTMLやJavaScriptと格闘中です。あまりホームページ等作ったことはないので,このへんはツールの力でごり押ししていて,タグ打ちとかほぼしたことなくて未知の領域。進まない進まない。。ネットや本の力を借り,見た…

疑似掲示板 その2

TextStreamのCloseをきちんとすると,動きがとてもよくなったので,実際の使用に向けてさらに調整を加えてみました。各授業で簡単に使えるように,データファイルに当たるbbs.txtを掲示板ファイルの名前を利用してつけるように変更。同じフォルダにHTAファイ…

疑似掲示板(失敗) JScript & HTA → 成功かも

興味がない分野について,自分の知識が全くないことに気づかせてくれるJSciptの学習。今日は掲示板ぽいのを作ることをしていました。neos21.hatenablog.comこちらの記事を参考に,コードも使わせてもらいながら,自分の環境で作る。JQueryを自分の環境でいま…

JScript mp3の再生について 書き残し

前回のタイマーで一番時間がかかった点の記録。JavaScriptでmp3を鳴らすのはとても簡単だったのに,JScriptの場合はそうでなかった点。というかそれに関する記述を探すのがとても大変でした。なので書き残し。ちなみにわたしはDreamweaverを使ってJavascript…

年が明けてしばらく経ちますが。

のんびりしてたらもう5日も経ってました。最近はVBAからは離れていますが,仕事が始まればまたデータ処理で思い出すんだと思います。VBAからはすこし離れていますが,しばらく前に興味を持ったJavaScriptの勉強をしているところです。全然わからない → 他人…

部品づくり 図形がどのセルの上にあるか

imihitoさんに教えていただいた application.caller TopLeftCell BottonRightCell これらはとても便利そう。注意すべきは,自分で作り自分だけが使うときは問題ないけど少しだけ図形がずれる,ということがあると想定外の不具合はありそうです。 Altキー押し…

メモ

Excelで図形を作ってOnActionを使ってみようとしていたら,次の記事を見つけました。Excel VBA を学ぶなら moug モーグ | 即効テクニック | OnActionで実行するプロシージャに引数を渡す 図形にマクロをつけて,引数もつけれると(;´▽`A``これはいい。軽くテ…

トグル入力のコード Excel VBA

ブログ名前詐欺中です。 今取り組んでることのための部品。キーボードを使わずタブレットだけで作業をする。複雑なインターフェースは準備できない。 でも簡単な入力方法を実装したい。いつも思いつくのは,お風呂に入ってるときや,帰宅,出勤時。考えを変…

毎年この時期はデータ処理。。

教員をしていると,入試の時期が必ず来ます。そろそろ,また今年の分の調整をし始めないといけません。思えば,様々なアドバイスをいただき始めたのも,データ処理をどうするか,という話の頃から。とてもありがたいことです。以前とはコードの書き方もけっ…

ひと段落しています。(VBAコード一切ありません)

とりあえず,作った教材を紹介する,という機会が終わりました。仕事で人にものを説明することを日々やっている割に,やはり緊張するものですね。また,PowerPoint2016のノートPCとPowerPoint2013のタブレットで動作確認をし,さらに直前に,説明する電子黒…

有効数字 今度こそ大丈夫??

まだ変なとこありましたので,書き直してみた。うーん。なんと面倒な。。気にせずやれればいいんですが(;´▽`A`` 固定小数点でやれない数値の扱いって面倒ですね。できるだけシンプルな方法を今後も考えます。主目的がここじゃないせいで,トライアンドエラ…

有効数字 修正をはじめてます。

有効数字を処理する部分がまずそうだったので修正中です。 Function 有効数字表示(値 As Variant, 桁 As Long, 指数表示 As Boolean) As String Dim Val_ As String, Format_ As String If 桁 = 1 Then Format_ = "0" Else Format_ = "0." & String(桁 - 1, …

化学反応式の量的関係 とりあえず完了

コードが長いです(;´▽`A`` 正規表現を使っているのでMicrosoft VBScript Regular Expressions 5.5への参照設定が必要です。コードが長すぎるため,最初に書きたいだけ書きます。新規のプレゼンテーションに標準モジュールを追加し,そこにペタッと下記のコ…

powerpoint vba はみ出すテキストの処理 (現状失敗)

なかなか厄介なものに出会って困っています。これも解決へ持っていけるのか,はたまた代替案を持っていくのか。PowerpointのVBAってスライドショー中にいらないことをさせないって考え方でもあるのかなぁ。( ´ー`)フゥー...ぶつかっている壁は単純だからこ…

VBA 有効数字の表示

化学反応式の量的関係のところで,根本的なところからやりなおしています。ActionSettingのために四角形敷き詰めるなら,そもそも表いらないんじゃ??というところから(;´▽`A``そう思わないといけなくなった理由は,表だとセルの大きさに合わせて文字の大き…

Powerpoint VBA 表で遊ぶ その2

表をきちんと制御できるようにしようと思って,目的もなく作ってたら何かにつかえそうだったので載せます。オセロ作れる・・?挟まれたやつの判別ルーチンができたら作れるかなぁ。 Const 全幅 = 960, 全高 = 540 Sub test() Dim Sld1 As Slide: Set Sld1 = A…