DuKiccoの雑記

My Life Is Myself

【グラフにラベルを付ける】【エクセル,VBA,グラフ】

折れ線グラフが複数ある場合、凡例を普通に配置しても、似たような色の線が必ず存在するので系列名とどの折れ線が対応するかわかりにくいです。例えば以下のグラフは1920年~2000年の県別の人口推移ですが何が何だかわかりません。県別人口推移見やすくする…

【配列内の順位を取得する/ソートする。】【エクセル,VBA】

VBAでは配列内の数値の順位を取得したり、並べ替えたりといった関数が存在しませんので自作してみました。Worksheet.FunctionのLARGE関数やSMALL関数を使用するとシンプルなコードで実現できます。ちなみに順位の取得にはRANK関数が使用できるともっともシン…

【配列内の順位を取得する/ソートする。】【エクセル,VBA】

VBAでは配列内の数値の順位を取得したり、並べ替えたりといった関数が存在しませんので自作してみました。Worksheet.FunctionのLARGE関数やSMALL関数を使用するとシンプルなコードで実現できます。ちなみに順位の取得にはRANK関数が使用できるともっともシン…

【HTMLカラーコードをエクセルで使う】【エクセル,VBA,16進法,RGB】

エクセルでグラフを作成する際など、デフォルトの配色ではいまいちなことが多いです。きれいな色を探す際に他の配色サイトを参考にすることがありますが、そこではHTMLカラーコード(HEX)で記載されているケースが多く、エクセルではそのままでは利用できま…

格安シムからWimaxへ乗り換え

月3000円程度で満足のいくネット環境が得られました。 経緯 この春から一人暮らし(@千葉県西部)をはじめて、携帯(Docomo)+ポケットWifi(格安シム、Freetel)の組み合わせでネット環境で過ごしていた。Freetelは従量制(20GB天井設定)なのでネットを使わない…

Diginnos Stick DG-STK3(スティック型PC)

PC

スティック型PCを購入しました。HDMI出力になってるのでリビングや出張先のテレビで簡単にネットや動画が観れるのでとても便利です。キーボード、マウス込みでたったの12000円です。 背景 我が家の母艦はMacですがエクセルも使うのでMacの仮想環境でWindows…

スマートリモコン化

PC

経緯 めざまし時計に耐性がついてしまい、冬は寒くて暗くて、なかなか布団から出れません。対策として、照明とエアコンをタイマーでコントロールして朝にONにしたいと思いスマートリモコンを入れてみました。大したことをやりたいわけではないので、「とりあ…

【Yahoo検索結果をエクセルにテーブル形式で抽出する】【エクセル2013,VBA】

Yahoo検索結果をWebクエリを利用してエクセルにテーブル形式で抽出する。手順 1.Yahoo検索結果をWebクエリによりシート1へ表示 ↓Yahoo検索結果(エクセル vba)のWebクエリ 2.シート1の内容(いつもの検索結果の並び)をシート2へテーブル形式で並べ直す。 ↓並…

エクセル,vba,xml,Pubmed,API,PMID

PubmedAPIを利用してPubmed検索結果のPMIDをセルに書き出す。Pumed API PubMed検索方法:Web Apiの勉強中: IT関係。二階堂のブログ。XML http://minor.hatenablog.com/entry/2015/09/02/233330 Sub GetPubMedID() 'Microsoft XML. v6.0を参照設定のこと Dim …

エクセル,VBA,xml,Pubmed,API,abstract,Title

PubmedAPIを利用して文献IDからAbstractやTitleを読み込むFunction Sub Pubmed2() 'Functionの使い方 Dim arr As Variant, PubmedID As Long '情報を取り出したいPubmedID PubmedID = 2644239 arr = GetTitle(PubmedID) MsgBox " Abstract " & arr(1) MsgBox…

【robocopyコマンドでフォルダーをバックアップ/同期する】【エクセル2013,VBA】

robocopyはwindows vista以降に装備されているコマンドで通常はコマンドプロンプトから使いますが、VBAから使ってみます。robocopyは「Robust File Copy」の略で、堅牢(robust)かつ確実なファイルのコピーという意味になります。ファイルやフォルダのコピ…

【画像処理、ImageMagickをエクセルVBAから使う】

目的 様々な画像処理をVBAから行う。 画像処理例 ・フォルダ内の画像ファイルを一括で縮小やリサイズを行う ・フォルダ内の画像ファイルを一括で別形式に変換する(→jpg,png,pdf,etc) ・フォルダ内のjpgファイルをまとめ1つのpdfファイルにする ・画像ファイ…

【Web上のファイルや画像をダウンロード、URLDownloadToFile】【VBA】

Web上のファイルをダウンロードする際に・ファイルのURLに法則性があり機械的に決まっている。 ・ダウンロードしたファイル名を自分で決めて保存したい。といったケースに大変便利です。例えばYahooFinanceのトヨタ自動車(証券コード7203)の日足チャートは…

エクセルでバーコードを利用する-1

備品の管理をエクセルで行っているような場合に、エクセルで管理番号をバーコード印刷できると便利です。 方法は大まかに2つあります。「1は簡便、2はバーコードの種類が多く細かな設定が可能」という利点があげられます。今回は1について書きます。 1.バー…

【必携Function-1】【エクセル2013,VBA】

新しくエクセルのアプリケーションを作る際には、便利なFunctionの一群をまずはごっそり移すところからはじめます。以下、必携のファンクションを紹介します。1.GetDeskTopPath デスクトップのパスを取得するファンクション。例えば↓のような使い方をします…

【2つのシートの内容を比較】【エクセル2013,VBA】

複数人で同一ファイルに書き込みをするような作業の際に、作業前のシートと作業後のシートを比較し、どこが修正されたかを確認したくなる場合があります。中には適当なひとやエクセルが苦手なひともいたりするため、気がつかずに違うセルの内容を消したり上…

【複数ブック、アンケート、集計】【エクセル2013,VBA】

アンケートをエクセルで作成し、とりまとめ集計するためののコード。 なるべく汎用的に利用できるように、集計範囲をダイアログボックスで指定できるようにしています。 前提としては ・集計するブックの構成(回答の場所)は全て同じアドレスのセル ・アン…

【複数のブックをひとつのブックにまとめる】【エクセル2013,VBA】

複数のブックをまとめるコード。例えばエクセルで作成した雛形やアンケートをメールで配り記入してもらい、その回答をひとつのブックにまとめたい場合に使用する。 以下コード ============================================================== Sub シート集…

【カレンダーの休日を条件付き書式設定で網掛けにする】【エクセル2013,VBA】

チェック表や予約表をエクセルで毎月作成しプリントアウトして使用しているケース多いと思います。毎月手作業で、網掛けにしたり書式を変えたチェック表や予約表の作成を行っている人をみかけると条件付き書式設定が便利ですよと教えてあげたくなるのだけど…

【画像内の寸法を測定する】【エクセル2013,VBA】

画像に写し込んだ物差し(大きさがわかっていれば何でも良い)のサイズをもとに画像内の物体の寸法を測定するコード。 最初に ・専用ソフトや携帯アプリでこと足りるならそちらをお勧めします。エクセルでやりたいひと向けです。 ・画像の大きさ次第のところ…

【シート上の画像をファイルとして保存する】【エクセル2013,VBA】

VBAを使わないでシート上の画像をファイルとして保存する方法 Excelで表や挿入した図形を画像として保存する Excel シートに貼り付けた画像をファイルとして保存するには VBAを使ってシート上の画像をファイルとして保存する方法 下に記したやり方だと画質が…

【アドインを自動化する】【エクセル2013,VBA】

「これ昔似たようなコード書いたことがあるけど、どのブックに書いたっけ?探すの面倒だからまた新しく書いちゃえ。」みたいなことになったりしないでしょうか?そうなると使い方が微妙に違う亜種がいくつも発生したり、探すのが余計に面倒になったりします…

【指定したフォルダ内の画像を一括でシートに表示する】【エクセル2013,VBA】

書類を作成する際に複数の画像をシートにまとめたいときのためのコード。 以下概略 ダイアログボックスで画像の入っているフォルダを選択 ↓ 拡張子を指定 ↓ 選択フォルダ内の指定された拡張子の画像がシートに貼り付けられる。 以下コード =================…

【改行コードの変換「LF」→「CR」】【ファイルサイズが大きな場合】【エクセル2013,VBA】

改行コードがLFでファイルサイズが大きいテキストファイルをVBAで扱う方法を説明する。 WindowsとLinuxでは、改行コードが異なる。 Windows→CRLF(キャリッジリターン+ラインフィード) Linux →LF(ラインフィード) Linuxで作成したテキストファイルをエク…

【セルの行高さや列幅をmmで指定する】【エクセル2013,VBA】

結論としてはセルの大きさは0.01mm単位での設定は難しいが0.1mm単位だとそれなりに近い値での設定が可能である。 エクセルの行の高さの単位はポイント、列の幅の単位は文字数となっている。「mm→ポイント」変換は用意されている関数を使えばよいので行の高さ…

iMacデュアルディスプレイ化

やることは単純にディスプレイをつなぐだけだったのだがちょっとミス。 iMacをデュアルディスプレイ化する方法 ―実はケーブルつなぐだけの簡単設定 - NAVER まとめ iMacをデュアルディスプレイ化する方法 ―実はケーブルつなぐだけの簡単設定 - NAVER まとめ …

「PC TV with nasne」がmacの仮想環境に対応

去年の夏にipadでTVを見ながらネットしたくてnasneを購入していた。しかし、nasne自体は気に入っていたのだが、ipadでの動きのもっさり感と画面の小ささで、若干不満があった。 リンゴ印のライフハック (22) NASを買うなら「nasne」がおトク! リンゴ印のライ…

IO-Data HDR-XR4.0(RAID6.0) RAID崩壊からの復旧【復旧天使】

PC

IO-Data HDR-XR4.0(RAID6.0)がRAID崩壊した。実はこれが二回目。 前回いろいろと試した結果、なんとかデータを救い出すことに成功した。その組み合わせが以下のとおりで今回もこれで対応した。 X 2台(1台で2つのHDDをUSB経由でPCへ接続可能) + データ復元…

パスが通らずはまる

「;」が大事。 どこから見ても同じにしか見えない会社支給のPC2台のうち1台は ・set PATH=%PATH%C:¥Program Files¥NCBI¥blast-2.2.26+¥bin でOKなのに、もう1台は ・set PATH=%PATH%;C:¥Program Files¥NCBI¥blast-2.2.26+¥bin としないとPathが通ってなかっ…