Excel

数値以外の値もランク付け

(対応バージョン:2021,WEB版,365版) 値の順位付けを行う関数にRANK関数がありますが、これは数値同士の比較にしか使えません。次の式で、任意の順位付けを行うことができます。 =XMATCH([何番目か知りたい値], SORT( [ランク付けに使う範囲] )) 使用例(結果): 数…

結合したセルの高さを自動調節する(縦方向の結合にも対応)

縦方向の結合にも対応させてみたが思ったより大げさになってしまった。 Option Explicit '結合したセルの高さを自動調節する ' ' 処理の概要 ' - 新しいブックを作成し、書式、標準のフォントとそのサイズを選択したセル範囲からコピー ' (標準のフォントの…

横方向に結合したセルの高さを自動調節する

'横方向に結合したセルの高さを自動調節する ' ' 処理の概要 ' - 新しいブックを作成し、書式、標準のフォントとそのサイズを選択したセル範囲からコピー ' (標準のフォントの大きさによって長さ当たりのピクセル数が変わってくるので標準のフォントを揃える…

横方向に結合したセルの高さを自動調節する

'横方向に結合したセルの高さを自動調節する ' ' 処理の概要 ' - 新しいブックを作成し、書式、標準のフォントとそのサイズを選択したセル範囲からコピー ' (標準のフォントの大きさによって長さ当たりのピクセル数が変わってくるので標準のフォントを揃える…

いま選択しているページだけ印刷(特定のセルのページ番号を取得)

' Printout Current Page 'アクティブなセルのあるページだけ印刷 Public Sub PrintCurrentPage() Dim PageNumber As Long PageNumber = PageNumberOf(ActiveCell), s.PrintOut From:= PageNumber , To:=PageNumber End Sub '特定のセルのページ番号を取得 '…

選択以外フィルタで抽出

Sub FilterNotSelected() Dim v v = Selection.Cells(1, 1).Value If Selection.Worksheet.AutoFilter Is Nothing Then Selection.AutoFilter End If Dim Af As AutoFilter Set Af = Selection.Worksheet.AutoFilter Dim Field Field = Selection.Column - A…

Match関数の検索オプション

メモというのは本当に自分用のメモですのでご容赦 MATCH(検査値,検査範囲,照合の型) についてExcelのヘルプより 照合の型 -1、0、1 の数値のいずれかを指定します。照合の型には、検査範囲の中で検査値を探す方法を指定します。照合の型に 1 を指定すると、…

1列のデータを複数行に折り返して整形する方法

■複数行のデータを1列にまとめる数式 http://d.hatena.ne.jp/robbie21/20070209/1170974171 の逆です。 数式を使う方法 A列に1から順番にデータを並べて A B C ... 1 2 3 4 5 6 7 ... 18 、B1セルに =OFFSET($A$1,(ROW()-1)*5+COLUMN()-2,0) *1 とし、縦横に…

複数行のデータを1列にまとめる数式

A列 B列 C列 D列 A B C D E F G H I J K L M N O P Q R S T U なデータを A B C D E F G H I ... とする方法。 どこでも良いので1行目に(例えばF1) =OFFSET($A$1,INT( (ROW()-1)/4),MOD(ROW()-1,4) ) として下方にコピー。以上。*1 *1:もとのデータが4列じゃ…

Excelに本当に欲しい機能

新しいMicrosoft Officeの発売が近づいているようです。 新しい機能のリボンとかも便利なのかもしれないけれど、ずっとずっと本当に欲しい機能は、 プログラム不要のユーザー定義関数 どういうことかって言うと、 =IF(A1>=60,1,0) という数式に例えば、「合…

Ctrl+クリックで複数セル選択中に失敗したとき一個戻すマクロ Ver.2

イベントプロシージャを使う方法で書き直してみました。 それほどニーズのある機能ではないかもしれませんが、他では見たことが無い機能なので、公開しておきます。 ダウンロード http://space.geocities.jp/micnak2001/vba/CancelOverlappedSelection.zip …

小マクロ Ctrl+クリックで複数セル選択中に失敗したとき一個戻すマクロ

question:1159247189 Excelで、Ctrlキーを押しながら複数の箇所を選択すると離れた範囲でも選択できますが、 間違えたセルを選択してしまった場合にはキャンセルができません。 (Ctrlを押しながら、再び選択すれば何とかなると思っていたのですが、 ...以下…

Ctrl+Shift+":"(もしくはCtrl+テンキー*) は知らんかった。 http://dreamy.boy.jp/short1.htm

ショートカットキーの変更の仕方&便利な小マクロ

Excel2003までには(2007以降どうなるのかは知りません。)、ショートカットキーを変更する方法がないので、 ショートカットキーを変更するには、 「猫まねき*1」のようなキーボード入れ替えソフトを使う 同様の機能を持つマクロを作って、そのマクロにショー…

CSVファイルをテキスト形式で読み込む

microsoft.public.jp.excel > CSVファイルを読み込んだときに文字列として読みたい http://groups.google.com/group/microsoft.public.jp.excel/msg/ba2e8e1282207cdf?as_umsgid=OHg3YYLlDHA.3320@tk2msftngp13.phx.gbl

使用済み範囲のみ計算する-TIPS

短大職員関係ないじゃん、って感じになってしまってますが、またVBAネタです。例えば、入力された成績の中から合格者だけ数えるユーザ定義関数CountPass*1を作りたいとします。 A B C 氏名 成績 合格者数 豊田 60 =CountPass(B:B) 本田 55 鈴木 68 富士 75 …

データを10行おきにするために空白行を挿入する。

question:1157358328 現在、A1セルからA100セルに文字列が入力されています。入力されている行の下に10行の空白行を挿入したいのですが、行挿入を繰り返す以外に簡単に1行(文字列)・空白10行・1行(文字列)・空白10行・・・となるようにできないでしょう…

値を処理するときはValueを取得しておく

記事の本題とは関係ないんだけどメモ 不特定の位置にある不要な文字列の削除・変換 in microsoft.public.jp.excel http://www.microsoft.com/communities/newsgroups/list/en-us/default.aspx?dg=microsoft.public.jp.excel&tid=9bd74f7b-df84-472e-8880-b92e…

数式を使ってリンクを設定する。

question:1156388934 VBA(Excel)で、Sheet1に郵便番号と住所の一覧があり、Sheet2に会員の名前と郵便番号の一覧があるような場合、Sheet2の郵便番号をクリックすると、Sheet1の郵便番号にジャンプするようにするには、どのような記述になりますか? 質問は「…