関数 on qwerty.work

【VBA】エクセルでどこのセル示しているか取得する関数

Mon, 20 Feb 2023 00:00:00 +0000

Address(False, False)で取得できる

例えば、A1のセルから縦にレコードがいくつあるかカウントして、最後のレコードのセルが仮にA5だっとしたら、A1:A5といった感じでRange関数で指定するとしたら、以下のようになります。

Range("A1", Range("A1").End(xlDown).Address(False, False))

.Address(False, False)を加えれば取得できました。cells関数で座標をセルに変換するときは以下のようになります。

cells(2,2).Address(False, False)

.Addressだけでも取得できます。.Address(False, False)との違いは以下のようになります。

ソース例	取得する値
cells(1,1).Address	$A$1
cells(1,1).Address(False, False)	A1

参考ページ

https://learn.microsoft.com/ja-jp/office/vba/api/excel.range.address https://learn.microsoft.com/ja-jp/office/vba/api/excel.range.address

https://www.tipsfound.com/vba/07022 https://www.tipsfound.com/vba/07022

https://excel-ubara.com/excelvba1/EXCELVBA384.html https://excel-ubara.com/excelvba1/EXCELVBA384.html

【Excel】セルに値がない場合は空白を表示する際に使う計算式例

Thu, 24 Feb 2022 11:57:15 +0900

数量や単価が空白の場合は0が表示されないようにしたい

エクセルで請求書や見積書または原価計算などを作成する際に、数量や単価などが入らない行があり、金額欄には「数量×単価」の計算式だけ入れてあるため、その行には「0」(ゼロ）が表示されます。それを防ぐための計算式の例をいくつかメモ。

計算式例

エクセルの表が以下のようになっていた場合を例にします。

A2 … 商品名
B2 … 数量
C2 … 単価
D2 … 金額（数量×単価） ← ここに計算式を入れる

IF文で簡単に使用する例

IF文で簡単に使用する例もし、**C2（単価）が空白じゃなければB2*C2（数量×単価）**を表示し、そうでなければ空白を表示する。

=IF(C2<>"",B2*C2,"")

その逆で、**C2（単価）が空白なら空白を表示し、そうでなければB2*C2（数量×単価）**を表示する。

=IF(C2="","",B2*C2)

もし、**B2（数量）またはC2（単価）が空白なら空白を表示し、そうでなければB2*C2（数量×単価）**を表示する。

=IF(OR(B2="",C2=""),"",B2*C2)

ISBALNK関数を使用した例

セルが空白かどうか調べるISBALNK関数を使用した例で、もし、**B2（数量）またはC2（単価）が空白なら空白を表示し、そうでなければB2*C2（数量×単価）**を表示する。

=IF(OR(ISBLANK(B2),ISBALNK(C2)),"",B2*C2)

【EXCEL】VLOOKUPの#N/Aエラーで困ったらINDEX+MATCHで解決（サンプルあり）

Sun, 30 Jan 2022 19:37:45 +0900

値は存在しているのに#N/Aエラーになる

いつも使っているVLOOKUPが**#N/Aエラー**になり、困り果てました。エラーの原因は、

検索値が検索範囲の左端の列にない。
完全一致と部分一致の指定が誤っている。
検索値を参照する列が昇順で並び替えられていない。
小数で計算した値を検索値に使用している。
検索範囲を「絶対参照」にしていないためズレている。

と様々です。しかし、何をどうやっても解決できませんでしが、以下の方法で解決できました。

**それは『INDEX関数』と『MATCH関数』を組み合わせる方法です。**これを使えば、VLOOKUPの作法から解放されます。

INDEX関数とMATCH関数を使ったサンプル

詳しい説明は省きます。

上記と同じエクセルのサンプルをダウンロードしてお使いください。

*sample.xlsx（12.7 kbyte）

VLOOKUPで値を参照する例

IDから型番を抽出

これは正常に値を参照できます。

=VLOOKUP(F5,$A$2:$D$5,3,FALSE)

型番からIDを抽出

これは#N/Aエラーになります。

=VLOOKUP(F10,$A$2:$D$5,-2,FALSE)

INDEX+MATCHで値を参照する例

IDから型番を抽出

これもVLOOKUP同様に正常に値を参照できます。

=INDEX($A$2:$D$5,MATCH(F16,$A$2:$A$5,0),3)

型番からIDを抽出

こちらはVLOOKUPで失敗したことが正常に値を参照できます。

=INDEX($A$2:$D$5,MATCH(F21,$C$2:$C$5,0),1)

#N/Aを表示したくないとき

検索したい値が一覧に無い場合も#N/Aエラーになりますが、その際に空白を表示したい場合、以下2つの方法があります。ISERRORとIFERRORは一文字違いで紛らわしいので注意。

IF+ISERRORを使う方法

IF文とISERROR関数を使って以下のようにすればOKです。

=IF(ISERROR(INDEX($A$2:$D$5,MATCH(F21,$C$2:$C$5,0),1)),"",INDEX($A$2:$D$5,MATCH(F21,$C$2:$C$5,0),1))

IFERRORを使う方法

IFERROR関数を使う方法もあります。こちらの方が簡単ですね。

=IFERROR(INDEX($A$2:$D$5,MATCH(F21,$C$2:$C$5,0),1),"")

Microsoft 365またはOffice 2021ならXLOOKUPが便利

バージョンの新しいエクセルならVLOOKUPの弱点を克服したようなXLOOKUPが使えます。またHLOOKUPの機能もカバーしているので、縦横のどちらの方向の参照もできます。常に決まったバージョンや新しいバージョンが使える環境ならば、こちらの方が簡単と思います。

https://forest.watch.impress.co.jp/docs/topic/special/1356264.html https://forest.watch.impress.co.jp/docs/topic/special/1356264.html

https://support.microsoft.com/ja-jp/office/xlookup-%E9%96%A2%E6%95%B0-b7fd680e-6d10-43e6-84f9-88eae8bf5929 https://support.microsoft.com/ja-jp/office/xlookup-%E9%96%A2%E6%95%B0-b7fd680e-6d10-43e6-84f9-88eae8bf5929

【エクセル】VLOOKUPの日付の検索で値が取得（抽出）できないとき

Wed, 21 Jul 2021 14:58:22 +0900

VLOOKUPに日付を使うと#N/Aになった

マッチする日付があったら、その横にある数値や文字列を取得したいのに**『#N/A』**と表示されてうまくいきませんでした。例えば、出勤データがあったとして、2021/07/20で該当する日は出勤だったか、欠勤だったかをVLOOKUPで取得したかったとします。

結論から言うと、検索範囲の始まりが日付の列になっていなかったからでした。

VLOOKUPの書式

=VLOOKUP(検索値,範囲,列番号,検索方法)

もうちょとわかりやすく書くと、

=VLOOKUP(検索したい値,返す値を含む範囲,取得したい列番号,近似値TRUEまたは完全一致FALSE)

参考書式例

例えば、指定範囲であるシートのC列が日付だったとします。

エラーになる例

日付はC列なのにA1:Z9と、A列から始まる範囲になっているとエラーになります。

=VLOOKUP(A1,'別シート'!A1:Z9,2,FALSE)

成功する例

C1:Z9と、C列から始まる範囲にすると、日付はC列なのでエラーになりません。

=VLOOKUP(A1,'別シート'!C1:Z9,2,FALSE)

参考ページ

https://support.microsoft.com/ja-jp/office/vlookup-%E9%96%A2%E6%95%B0-0bbc8083-26fe-4963-8ab8-93a18ad188a1 https://support.microsoft.com/ja-jp/office/vlookup-%E9%96%A2%E6%95%B0-0bbc8083-26fe-4963-8ab8-93a18ad188a1

【エクセル】日付とテキストの変換に関する関数メモ

Wed, 21 Jul 2021 10:06:52 +0900

例

例えば、2021年7月3日の年月日がバラバラのセルに入力されているとします。

A1 … 2021
B1 … 7
C1 … 3

関数

バラバラな年月日を結合する関数

文字列として結合

=CONCATENATE(A1,"/",B1,"/",C1)

表示結果 2021/7/3

さらに日付に変更

=TEXT(CONCATENATE(A1,"/",B1,"/",C1),"yyyy/m/d")

表示結果 2021/7/3

一桁の月日の頭に0をつけたい場合

=TEXT(CONCATENATE(A1,"/",B1,"/",C1),"yyyy/mm/dd")

表示結果 2021/07/03

日付として結合

=DATE(A1,B1,C1)

表示結果 2021/7/3

一桁の月日の頭に0をつけたい場合

=TEXT(DATE(A1,B1,C1),"yyyy/mm/dd")

表示結果 2021/07/03

JavaScriptから非同期でPHPのファンクション（関数）を呼び出すサンプル

Sun, 14 Feb 2021 00:27:04 +0900

PHPのFunctionの一部にstream_get_contents（指定したURLのHTMLソースを取得する関数）を使っていて、それを多用すると、PHPの処理が終わるまでページの表示が停まるので、ページの読込がかなり遅くなります。どうにかならないかな？と考えてみました。

**『PHPのファンクションをJavscriptから呼び出せば、非同期で表示できるのでは？』**と思い、やり方を探してヒントになるやり方を見つけたのでメモ。

重たい処理はサーバー側のPHPで処理させて、表示の部分だけJSの非同期で処理するといった感じです。

サンプル

jQueryなどを使わずにできるシンプルな方法のサンプル

これをいじっていけば旨くいけそうですが、AMPページとかには使えそうにないので、AMPページではそうするか考えないといけない感じです。

<?php
function func($a) {
  echo( $a );
}
?>

<script type="text/javascript" async>
function test(){
  document.getElementById("php_code").innerHTML='<?php func("hello");?>';
}
</script>

<a href="#" onclick="test(); return false;"> test </a>
<p id="php_code"></p>

テストページ

参考サイトこちらのページにはプレーンなJavascriptのサンプルと、jQueryを使ったサンプルがあります。

https://www.it-swarm.jp.net/ja/php/javascript%E3%81%8B%E3%82%89php%E9%96%A2%E6%95%B0%E3%82%92%E5%91%BC%E3%81%B3%E5%87%BA%E3%81%99/940293979/ https://www.it-swarm.jp.net/ja/php/javascript%E3%81%8B%E3%82%89php%E9%96%A2%E6%95%B0%E3%82%92%E5%91%BC%E3%81%B3%E5%87%BA%E3%81%99/940293979/

【エクセル】ファイルの保存場所やフォルダパスを取得表示する関数と数式

Thu, 28 Jan 2021 16:56:32 +0900

関数・数式

現在のファイルパスを表示

現在、開いているファイルの保存場所とファイル名までフルパスで表示します。どちらも同じ結果が表示されます。

=LEFT(CELL("filename",A1),FIND("[",CELL("filename",A1))-1) & MID(CELL("filename"),SEARCH("[",CELL("filename"))+1, SEARCH("]",CELL("filename"))-SEARCH("[",CELL("filename"))-1)

=SUBSTITUTE(LEFT(CELL("filename",A1),FIND("]",CELL("filename",A1))-1),"[","")

表示例

D:\sample\関数サンプル.xlsx

ワークブックが保存されているフォルダのパス

末尾「\」あり

=LEFT(CELL("filename",A1),FIND("[",CELL("filename",A1))-1)

表示例

D:\sample\

末尾「\」なし

=LEFT(CELL("filename",A1),FIND("[",CELL("filename",A1))-2)

表示例

D:\sample

ファイル名のみ取得

=MID(CELL("filename",A1),FIND("[",CELL("filename",A1))+1,FIND("]",CELL("filename",A1))-FIND("[",CELL("filename",A1))-1)

表示例

関数サンプル.xlsx

現在のシート名のみ取得

=RIGHT(CELL("filename",A1),LEN(CELL("filename",A1))-FIND("]",CELL("filename",A1)))

表示例

Sheet1

サンプルファイル

ダウンロード

以下より、上記の関数（数式）を組み込んであるサンプルのエクセルファイルをダウンロードできます。

sample.zip（約8KB）

エクセルでSUMPRODUCT関数を使って特定の文字列を含むものをカウントする

Wed, 22 Mar 2017 19:43:52 +0900

エクセルで数や金額のの集計をする場合、単純な条件であればSUMIFやCOUNTIFでいいのですが、複数の条件にマッチする集計の場合はいつもSUMPRODUCT関数を使っています。

SUMPRODUCT関数では**"*"**などのワイルドカードで特定の文字を指定ができず不便でしかたありません。

ところがいろいろ検索したらSUMPRODUCT関数でワイルドカードを使わなくても特定の文字を含む文字列をカウントする方法があったのでメモ。

ISNUMBERとFIND関数を併用

以下の表を参考にした場合。

特定の文字を含む文字列をカウント

例えば、メモ欄に「リンゴ」が含まれている「セット商品」をカウントする場合の計算式は以下のようになります。

=SUMPRODUCT((B2:B6="セット商品")*(ISNUMBER(FIND("リンゴ",C2:C6))))

特定の文字を含まない文字列をカウント

逆に「リンゴ」が含まれていない「セット商品」をカウントしたい場合はNOT関数を挿入します。

=SUMPRODUCT((B2:B6="セット商品")*(NOT(ISNUMBER(FIND("リンゴ",C2:C6)))))

サンプルファイル

sample1.zip

XLSファイルをZIPで圧縮しています。

その他方法

以下の方法でも同じカウントができました。

=COUNT(INDEX(0/SEARCH("セット商品*リンゴ*",B2:B6&C2:C6),))

=COUNT(INDEX(SEARCH("セット商品_*リンゴ*",B2:B6&"_"&C2:C6),))

エクセルは奥が深いですね。

ExcelでURLの一覧からホスト名（ドメイン）のみ抽出する関数例

Sat, 26 Nov 2016 22:05:52 +0900

WordPressやMovableTypeで使うブログ更新時のPING送信先のリストがあるのですが、送信先の死活状態を確認するためにホスト名（ドメイン名）のみの一覧が必要で、それをエクセルで簡単に作る関数例を見つけたのでメモ。

例えば

http://www.bing.com/ping?sitemap=sitemapurl http://www.bing.com/ping?sitemap=sitemapurl

上記のURLから

www.bing.com

のみを抽出するものです。

関数例

セルA1にURLが入っている場合の例です。

=MID(A1,FIND("/",A1,FIND("/",A1,1)+1)+1,SEARCH("/",A1,FIND("/",A1,FIND("/",A1,1)+1)+1)-(FIND("/",A1,FIND("/",A1,1)+1)+1))

注意

抽出元のURLがhttp://www.bing.comといった感じで**.com**で終わっている場合、**http://www.bing.com/のように"/"**で閉じておかないとエラーになります。

PHP5.3でnumber_format()がエラーになるときの対処

Mon, 03 Nov 2014 21:32:45 +0900

何気なく会社のホームページを見ていたら以下のエラーが出るページに気づきました。

Warning:number_format() expects parameter 1 to be double, object given in /home/hoge/foo/bar.php on line 99

ここ数か月は特に更新をしていないページなのになんでだろう？と思っていたところ、そういえばレンタルサーバー会社からPHP5.2を終了し、5.3にバージョンアップするといったメールが届いていたの思い出しました。

**number_format()**のエラーを検索したらあっさり対処法が見つかりました。

$chinryo = number_format($alldata->data[$i]->chinryo);

に**(int)**を加えて

$chinryo = number_format((int)$alldata->data[$i]->chinryo);

とするだけでエラーが出なくなりました。

以下のサイトURLのページによると、エラーの原因はPHP5.3からnumber_formatを含むあらゆる関数に対して互換性のない値が渡されるとNULLを返すのが原因のようです。

http://jp2.php.net/manual/ja/migration53.incompatible.php http://jp2.php.net/manual/ja/migration53.incompatible.php

エクセルで重複を除き（ユニークな値のみを）複数条件でカウントする方法

Thu, 04 Apr 2013 17:35:43 +0900

以下のような顧客データがあった場合に、重複するお客様は1人のお客様として、支払い方法別など複数条件で人数をカウントする方法です。（ユニークな値のみを複数の条件別でカウントします。）

サンプルダウンロード (count.xls)

単一条件で重複を除いて（ユニークな値のみ）カウント

=COUNT(INDEX(1/(MATCH(A2:A10,A2:A10,0)=ROW(A1:A10)),0)) ※途中に未入力のセルがあってもカウントします。

複数条件で重複を除いて（ユニークな値のみ）カウント

=COUNT(INDEX(1/(MATCH(A2:A10&G2&H1,A2:A10&C2:C10&D2:D10,)=ROW(A1:A10)),))

※ROWの範囲はA1からにしておかないと結果は0になっていまいます。

その他

全体の人数はSUMPRODUCT関数とCOUNTIF関数を組み合わせた使い方もあります。

=SUMPRODUCT(1/COUNTIF(A2:A10,A2:A10))

ただし、途中に未入力のセルが含まれているとエラーで#DIV/0となります。