PCメモ

Excelを中心とした業務改善の記録

2021-04-01から1ヶ月間の記事一覧

ネーミングについて(変数名・プロシージャ名)

よく使われる変数名 変数名 用途 語源 ct 数えるとき Count f オン/オフ Flag temp 一時的に使用する Temporrary i カウンタ変数 Iteration buf 一時的に格納 Buffer rc 戻り値を格納 Return Code n 一時的に使う数値 Number s 一時的に使う文字列 String 変…

Functionプロシージャ

Functionプロシージャは引数を渡さなくてもエラーにならない。

引数の渡し方(ByRef・ByVal)

引数の渡し方には「参照渡し」と「値渡し」がある。 指定しない場合は「参照渡し」になる。 参照渡し(ByRef) 値渡し(ByVal)

VBA用語集(オブジェクト・関数・ステートメントなどの読み方)

VBA用語集|VBAエキスパート公式サイト

はてなブログ活用法(作表・動画)

作表方法 HTMLで作表 www.snow0303.com はてな記法で作表 you-key69.hatenadiary.jp 動画埋め込み d.hatena.ne.jp

並べ替え(SortオブジェクトSortメソッド)

並べ替え Excel2007以降の並べ替え Excel2003までの並べ替え Sortオブジェクトのメンバー SortOn ~並べ替えのタイプ~ Order ~並べ替えの順番~ DataOption ~数値と文字が混在~ Header ~タイトル行かどうか~ 並べ替え Excel2007以降の並べ替え Sortオブジェク…

複数条件でフィルターをかける(AutoFilter 配列)

AutoFilterメソッド セル.AutoFilter Field, Criteria1, Operator, Criteria2 Criteriaで条件指定できるのは2つまで。3つ以上条件指定する場合は、引数Criteria1を配列形式で指定する。 条件2つ With Range("A1") .AutoFilter field:=1, Criteria1:="*B*", _…

フォルダ作成(MkDirステートメント)

MkDir 作成するフォルダー名 Mk:Make Dir:Directory デスクトップに20210415という名前のフォルダが作成される。 Sub フォルダ作成() MkDir "C:\Users\sr950\OneDrive\デスクトップ\20210415" End Sub

Faxデータ削除(再帰処理)

フォルダ内のFaxデータをまとめて削除する。条件は更新日が二週間前。 Faxフォルダの中にデータが入っているがフォルダの数に規則性はない。 Faxフォルダ 20210411 Aさん PDFデータ PDFデータ PDFデータ 再帰処理を行い、フォルダ内すべてのデータに対して処…

重複削除マクロ

重複を削除する。 Sub 重複を削除() Dim LastRow As Long LastRow = Cells(Rows.Count, 1).End(xlUp).Row Dim i As Long Dim a As Long Dim c As Long '重複している数のカウント用 For i = 2 To LastRow c = 0 '重複があるか調べる For a = 2 To LastRow If…

オブジェクト・コレクション・メンバ

オブジェクト オブジェクトとは、VBAで何か操作する時の対象となるもののことです。 名 オブジェクト名 ブック Workbook ワークシート WorkSheet セル Range オブジェクト式①対象.様子=値②対象.命令 オプション:=値 佐藤君という小学生を例に説明していきま…

VBA100本ノック 2本目:セルのコピー (書式指定)

出題内容 「Sheet1」のA1:C5のセル範囲を、「Sheet2」のA1:C5にコピーしてください。数式は消して値でコピー、書式もコピーしてください。※書式は「セルの書式設定」で設定可能なもの(ロックは除く)。入力規則やメモ(旧コメント)は書式ではありません。…

検索結果を削除(Findメソッド)

セルを検索し行を削除する。 Sub wrk() Dim a As Range Set a = Range("A:A").Find(what:="佐藤") If a Is Nothing Then MsgBox "見つかりません" Else a.EntireRow.Delete End IfEnd Sub 対象セルだけを削除したい場合。 Sub wrk() Dim a As Range Set a = …

ブックを閉じる(Closeメソッド)

ブックを閉じる Sub 閉じる() ActiveWorkbook.Close End Sub 編集が保存されていない場合、確認メッセージが表示される。 Closeメソッドの引数SaveChangesを使うと保存するかどうか指定できる。保存する:True保存しない:False Sub 閉じる() '保存して閉じ…