vba ボタンのテキストを取得する

Quick Edit Pencil 
ActiveSheet.Buttons(Application.Caller).Text

このブログの人気の投稿

memo: ショートカットファイルを直接削除する

ショートカットファイルを直接削除する C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup （一部カタカナ表示あり） C:\ProgramData\Microsoft\Windows\Start Menu\Programs\StartUp （一部カタカナ表示あり） レジストリから削除する　regedit コンピューター\HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Run コンピューター\HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run コンピューター\HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Windows\CurrentVersion\Run グループポリシー 「コンピューターの構成」→「Windowsの設定」 ＞light＜ ＞dark＜ ＞night-bule＜ ＞vibrant-ink＜ ＞wed＜
Read more »

https://gemini.google.com/search?q=%5B%5BOralHistory%5D%5D

＞light-monochrome＜ ＞light＜ ＞dark＜ javascript:(function(searchstr) { var input = document.querySelector('input[data-test-id="search-input"]'); if (input) { input.value = ""; input.value = searchstr; input.dispatchEvent(new Event('input')); input.dispatchEvent(new Event('change')); } else { alert('入力フィールドが見つかりませんでした。'); } })("代入するテキスト"); javascript:(function(searchstr) { var input = document.querySelector('input[data-test-id="search-input"]'); if (input) { input.value = ""; // 既存の値をクリア input.value = searchstr; // 新しいテキストを代入 input.dispatchEvent(new Event('input')); // 入力イベントを発火させる input.dispatchEvent(new Event('change')); // 変更イベントを発火させる } else { alert('入力フィールドが見つかりませんでした。'); } })("代入するテキスト"); javascript:(function() { var inp...
Read more »

AppleScript 改行 コード 置換

改行を置換 returnキーはLF、ASCII character (10)と\nはLF、ASCII character (13)と\rはCR、controlキー + returnキーはラインブレーク   (* テスト文字列を変数にセット *) set str to "1LINE(LF)" & ( ASCII character (10)) & "2LINE(CR)" & ( ASCII character (13)) & "3LINE(LineBrake) 3LINE_2" log " ★生 str: " & str & " ★ " (* ★生 str: 1LINE(LF) 2LINE(CR) 3LINE(LineBrake) 3LINE_2 ★ *)   (*LF 置換 *) set LFstr to do shell script "echo " & quoted form of str & " | perl -pe 's/\\n//g'" log " ★ LF 置換 str: " & LFstr & " ★ " (* ★ LF 置換 str: 1LINE(LF)2LINE(CR) 3LINE(LineBrake) 3LINE_2 ★ *)   (*CR 置換 *) set CRstr to do shell script "echo " & quoted form of str & " | perl -pe 's/\\r//g'" log " ★ CR 置換 str: " & CRstr & " ★ " (* ★ CR 置換 str: 1LINE(LF) 2LINE(CR)3LINE(LineBrake) 3LINE_2 ★ *)   (* ラインブレーク置換 *) set LAINBLAKEstr ...
Read more »

スクロールボックスのアンカーリンク

ライブラリを使わないページ内ジャンプのメモ [JavaScript] DIVのスクロールをJavaScriptから操作する - YoheiM技術やらずに終われまテン height: 30vh; min-height: 315px; overflow: auto; <div class="modal-body"> <div class="modal-body-inner" id="area-b"> <div id="b-index"> 目次 <a onclick="test('area-b','b-index',this,'b1');" href="javascript:void(0);" rel="nofollow">環境設定の構造と構成</a> <a onclick="test('area-b','b-index',this,'b2');" href="javascript:void(0);" rel="nofollow">環境設定関数について</a> 環境設定引数 三つの大分類について 環境設定引数 二種の中分類について 環境設定引数 設定項目について </div> <script type="text/javascript"> <!--     function test(_area,_head,_this,_anchor){         var area = document.getElementById(_area);         var areaScrollHeight = area.scrollHeight;         var areaRect = area.getBoundingClientRect();         var headRect = document.getElementById(_...
Read more »

ヤバい！JAPANNEXT WQHD対応 27型ワイド液晶ディスプレイ「JN-IPS2716WQHD」を注文してみた！！！

イメージ
注文翌日にはブツが届き、梱包も本体にもおおむね満足している。通電も映像も設定も問題はない。メーカー対応は未知数だが品物はクールだ。さらに詳しくは下に... 何かと怪しさ満点のJAPANNEXT IPS液晶モニターのJN-IPS2716WQHD 27型 WQHD ディスプレイをアマゾンで注文してみたレポ。２０１６・５・５ JN-IPS2716WQHD 27型 WQHD モニター 60Hz対応ワイド液晶ディスプレイ （2560×1440 ) HDMI/DVIポート搭載 アマゾンが発送するので品物が届かないという不安は無さそうなのでお遊びで注文してみたが...
Read more »

AppleScriptでURLエンコード

AppleScriptでJavaScriptを使わずにURLエンコードする。Perl, Ruby set theText to "http://ja.wikipedia.org/wiki/ アップルスクリプト "   --Perl set theURL to do shell script "perl -MURI::Escape -wle 'print uri_escape(\"" & theText & "\")'" log "2=" & theURL (*2=http%3A%2F%2Fja.wikipedia.org%2Fwiki%2F%E3%82%A2%E3%83%83%E3%83%97%E3%83%AB%E3%82%B9%E3%82%AF%E3%83%AA%E3%83%97%E3%83%88*)   --perl set theURL to do shell script "perl -MEncode -MURI::Escape -e 'print uri_escape(encode('utf8', decode('utf8', \"" & theText & "\")))'" log "3=" & theURL (*3=http%3A%2F%2Fja.wikipedia.org%2Fwiki%2F%E3%82%A2%E3%83%83%E3%83%97%E3%83%AB%E3%82%B9%E3%82%AF%E3%83%AA%E3%83%97%E3%83%88*)   --ruby --AppleScript : URL エンコード　 http://blog.goo.ne.jp/vallie/e/26f5d6333f44e071863c173300865306 set theURL to do shell script "ruby -r cgi -e 'puts CGI.escape(\"" ...
Read more »

AppleScriptとターミナルでJavaScriptを使う

AppleScriptでJavaScriptを使いたい ターミナルでJavaScriptを使いたい AppleScriptでJavaScriptを使いたい applescript jsc javascriptcore 具体には、URL全体をエンコード（encodeURI）しておきたい時 下記のように、Sfafariを経由して、JavaScriptを使う事ができるが、Safariが起動してまうし、Safariが起動していてもウィンドウがゼロの時はエラーが出るので、スマートではない。 set theText to " アップルスクリプト " --JavaScript tell application "Safari" set theURL to ( do JavaScript "encodeURI(\"" & theText & "\")" in document 1) as text log "encode=" & theURL (*0=%E3%82%A2%E3%83%83%E3%83%97%E3%83%AB%E3%82%B9%E3%82%AF%E3%83%AA%E3%83%97%E3%83%88*) set theURL to ( do JavaScript "decodeURI(\"" & theText & "\")" in document 1) as text log "decode=" & theURL (*0= アップルスクリプト *) end tell   そこで、 do shell script で JavaScriptCore.framework を直接呼んで、URL全体をエンコード（encodeURI）。 ※ encodeURIとencodeURIComponentは上手くエンコードしてれない。 のでURL全体をエンコードしたい場合はリンクを参照。 BWNSUY: AppleScriptでURLエンコード しかし、Safariを通さずJava...
Read more »