Dim fso As FileSystemObject Set fso = New FileSystemObject ' インスタンス化 Dim f As file Set f = fso.GetFile("c:\hoge.json") ' ファイルを取得 Dim JsonText As String JsonText = f.OpenAsTextStream.ReadAll ネタ元 http://officetanaka.net/exce…

excel vba でファイルを一気に読み込む

Adsenseに広告出してなくてもくるので、そういう事かもしれない。 確証はない。 ネタ元 https://moimoi-days.com/%E3%80%8Cgoogleads-g-doubleclick-net%E3%80%8D%E3%81%A8%E3%81%84%E3%81%86%E3%83%AA%E3%83%95%E3%82%A1%E3%83%A9-%E5%8F%82%E7%85%A7%E5%85…

「googleads.g.doubleclick.net」というリファラ/参照元は Adsense広告からの流入じゃなくて、関連コンテンツからかも

Adobe Acrobat DCでPDF作成をして「Webページ」からを選ぶ体験版でもできるよ。 ネタ元 http://mubz.jp/2013/12/15/22427/#.XYYdlij7TDc

WEB サイトの全ページをまとめてPDF出力する方法

パワポで新規作成し、「新しい文書」からオンラインの検索窓に「名刺」と入れ検索する ネタ元 https://ink-revolution.com/contentsplus/original-meishi/

家のプリンターで名刺印刷する方法

スペースキー押しながらドラッグ ネタ元 https://qiita.com/hiro93n/items/fddec8b36e06643d136b

Adobe XDでスクロールさせる方法

Amazon Lightsailで一番安いプランでWordpress作る。2019/9/20時点では $3.5 / 月。SSHで接続。ログインパスワードを以下のコマンドで確認。 cat /home/bitnami/bitnami_application_password 最初なのでIPで直アクセス。https://XXX.XXX.XXX.XXX ユーザー名…

Amazon Lightsailでwordpress作成＆ログイン方法

IFSを自前で実装する Function IFS(ParamArray par()) Dim i As Integer IFS = CVErr(xlErrNA) If UBound(par) Mod 2 = 0 Then Exit Function End If For i = LBound(par) To UBound(par) - 1 Step 2 If par(i) Then IFS = par(i + 1) Exit Function End If …

Excel2013、Excel2010、Excel2007等古いエクセルでIFSを使う方法

onloadイベントより早いタイミングで実行されるDOMContentLoadedイベントを使う。 window.addEventListener("DOMContentLoaded", function(){ // 画面読み込み時の初期処理とか書く。 }, false); ネタ元 https://www.yoheim.net/blog.php?q=20120904

ページを全部読み込み前にjavascriptを実行する

rbegin()とrend()を使う。逆順なんだけどイテレータは加算でOK。 for (auto ite = map.rbegin(); ite != map.rend(); ++ite) { .... } ネタ元 https://marycore.jp/prog/cpp/reverse-iterator-rbegin-rend/

STLの逆イテレーター

COleDateTime dt1( yyyy, mm, dd ); COleDateTime dt2( yyyy, mm, dd ); COleDateTimeSpan span( dt1 - dt2 ); printf( "%d 日間です", span.GetTotalDays() ); ネタ元 https://oshiete.goo.ne.jp/qa/649520.html

MFCで日付の間隔取得

IFS(条件,結果,条件,結果,条件,結果....TRUE,"") と一番最後にTRUEで必ず処理される条件を入れればOK

ExcelのIFSでELSEするには

条件,結果,条件,結果,条件,結果 ...って書くだけなので楽。あんま長いの書くのは、やっぱり大変だけど ネタ元 https://www.hello-pc.net/howto-excel/ifs/

Excelで複数のIF()書くなら IFS()も検討を

ShowWindow(SW_SHOWMAXIMIZED ) ネタ元 https://docs.microsoft.com/ja-jp/previous-versions/visualstudio/visual-studio-2010/72szh9c7(v=vs.100)

MFCでウインドウを最大化する

OnSize()イベントで引数がOnSize(UINT nType, int cx, int cy) となるがnTypeがSIZE_MAXIMIZEDなら最大化されたと判定できる。 SIZE_MINIMIZEDなら最小化。 ネタ元 C#だけど https://dobon.net/vb/dotnet/form/minimized.html

MFC フォームが最小化あるいは最大化されたことを知るには

EDDATE(A2,-1)とかで1ヶ月前 ネタ元 http://www.excel.studio-kazu.jp/func/edate.html

Excelで1ヶ月前/1ヶ月先の日付取得するにはEDATE 関数

半角/全角スペースに対応 $email = trim ($email," \t\n\r\0\x0B "); ネタ元 https://www.php.net/manual/ja/function.trim.php

PHPのtrim() - 文字列の先頭および末尾にあるホワイトスペースを取り除く

gmail送るとspredsheetに追記みたいなサンプルいろんなことができるらしい。 ネタ元 https://ferret-plus.com/8654

非エンジニアでもルーチン作業を自動化できるツール「Zapier」

find()して置換位置探したりなんだりと、工夫しないと行けない関数なのです。 ネタ元 https://marycore.jp/prog/cpp/std-string-replace-first-all/#replace%E9%96%A2%E6%95%B0%E3%81%AE%E8%87%AA%E4%BD%9C%E6%96%B9%E6%B3%95

std::stringのreplace()は単純に文字入れ替えてくれるような便利関数じゃない

こんな感じ。 =AVERAGE(INDIRECT("P2:P"&F2))ネタ元 https://excel-excel.com/beginner/beginner38.html

Excelで関数へ渡す引数をセル指定するならINDIRECT

商用でも使えるしdropboxの人が公開してくれてるし、C++11仕様でいけてる感じ。 https://github.com/dropbox/json11 sjisの日本語文字がはいったjson渡すと、ダメ文字対策しないとアウト。 もしくはコード弄ってwstring化するしかないかもね。 ネタ元 http:/…

C++でjson扱うなら picojsonよりjson11がトレンディー

2byte目が0x5c の \ になっているものはjsonのパース等でトラブルが発生する。2byte目が0x5c のダメ文字 ― ソ Ы Ⅸ 噂 浬 欺 圭 構 蚕 十 申 曾 箪 貼 能 表 暴 予 禄 兔 喀 媾 彌 拿 杤 歃 濬 畚 秉 綵 臀 藹 觸 軆 鐔 饅 鷭 纊 犾 偆 砡 0x7cもだめな場合あ…

Shift_JISのダメ文字

バッチファイルのサンプル @echo off powershell -ExecutionPolicy Unrestricted -File hoge.ps1 %*

powershellのファイル(*ps1)にはドラッグ＆ドロップできないのでbatファイル経由で行う

その場しのぎで使ってその先の処理で死なないように、気を使ってね。 ネタ元 https://www.k-karakuri.com/entry/2018/04/13/TryParse%E3%82%92%E4%BE%8B%E5%A4%96%E7%99%BA%E7%94%9F%E3%81%AE%E9%98%B2%E6%AD%A2%E3%81%AB%E4%BD%BF%E3%81%86%E3%81%AE%E3%81%…

C#で文字列の数値変換でint.Parse()使うと数値意外の文字列で例外飛んじゃうの嫌ならint.TryParse()

#ヘッダが無いファイルはヘッダも指定する $csv = Import-Csv tosho-etf-stock-prices_2016_1305.csv -Encoding Default -Header "SC","名称","市場","業種","日時","株価","前日比","前日比(％)","前日終値","始値","高値","安値","出来高","売買代金(千円)…

powershellでCSVを読み込んで必要な項目だけ出力　あと日時を日付だけの表記にするのもやっちゃうスクリプト

Visual Studio上のNugetパッケージ管理で「Grpc」を探してインストールするだけ ネタ元 https://qiita.com/muroon/items/4e12dde47b9e8b1e94d3

gRPCをC#で利用する方法

出張がてらに速度調査してみた↓東京某所でのネット速度テスト ↓宮城某所でのネット速度テスト サーバーがTokyoなのでレイテンシは東京のほうが短いが、 回線の混み具合なのか、Mbpsは宮城のほうが圧倒的に速い。

田舎のほうがインターネットは速い？

REPLACEは開始位置と文字数を指定して置換位置を指定する方式だけど SUBSTITUTEなら、置換したい文字を指定するだけ。 ネタ元 https://www.forguncy.com/blog/20171027_function_replace_substitute

Excelの文字置換はREPLACEじゃなくてSUBSTITUTE関数がイメージに近い

<body> 〜〜〜 <input id="copyTarget" type="text" value="コピー対象の文言" readonly> <button onclick="copyToClipboard()">Copy text</button> 〜〜〜 <script> function copyToClipboard() { // コピー対象をJavaScript上で変数として定義する var copyTarget = document.getElementById("copyT…</body>

HTML＆JAVAScriptにてクリック一つでクリップボードにコピーする

https://fx-d.jp/mt5/mt5-indicator/mt5-rsi/mt5-connors-rsi.html https://jp.tradingview.com/scripts/connorsrsi/ https://www.tradingview.com/wiki/Connors_RSI_(CRSI) https://fxcashback.info/rsi-calculation/

コナーズRSI (CRSI)メモ

QueryCloseイベントを捕まえる Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) If CloseMode = 0 Then MsgBox "[×]ボタンでは閉じられません。", 48 Cancel = True End If End Sub ネタ元 http://officetanaka.net/excel/vba/ti…

ExcelVBAのフォームのxボタンで閉じなくさせる方法