ray88’s diary

お仕事で困ったとき用の自分用の覚書

2020-01-05から1日間の記事一覧

検索フォームでサブフォームのデータを検索する際のクエリ(あいまい検索等)

■以下のような検索フォームで検索する際、サブフォームの元となるクエリの設定の 仕方 基本的な処理を覚書 ■IDの抽出条件(オートナンバー型ですが、以下の式で正常に動作) Like IIf(IsNull([Forms]![日にち検索]![ID]),"*",[Forms]![日にち検索]![ID]) ■タ…

オートフィル

■同じ値でオートフィル(関数のオーフィルなどもこの方法でOK) ************************************************************************* (例)セルB1に1を入力し、B10まで1をオートフィルで入力 Sub test1() Range("B1").Value = 1 Range("B1").AutoFil…

最終行を取得するコード

①特定のセルから見てデータの入っている一番下の行を取得 (途中う空白有の場合は使えない) ■ 最終行 = Range("B2").End.End(xlDown).Row ②エクセル全体の最終行を取得し、そこから順に上を見ていき、指定した列の データのある行を取得(途中空白ありもOK…