kazz

Excel VBA Sample

VBA セルを検索

Findメソッドでセル内を検索するセル範囲内で検索する戻り値:Rangeオブジェクト一致するデータが見つからなかった場合、Nothingを返すRangeオブジェクト.Find(What, After, LookIn, LookAt, Sea...
Excel VBA

VBA 文字列操作

関数説明Chr,ChrB,ChrW指定した文字コードに対応する文字を示す文字列型の値を返すLCaseアルファベットの大文字を小文字に変換UCaseアルファベットの小文字を大文字に変換Len,LenB指定した文字列の文字数を表す値を返すLen...
Excel VBA Sample

VBA 一次元配列のソート

バブルソート隣同士の値を比較、必要があれば入れ替えを繰り返して整列するSub zsBubbleSort1(ByRef dataAry() As Variant) Dim temp As Variant Dim i As Long, j As...
Excel VBA Sample

VBA AdvancedFilter

Sub AdvancedFilterSample() Dim dataRng As Range 'データ範囲(見出し要) Dim searchRng As Range '抽出条件範囲(見出し要) Dim copyToRng As Range...
Excel VBA Sample

VBA ワークシート操作

ワークシートの追加ワークシートオブジェクト.Add(Before, After, Count, Type)Before:指定シートの前に追加After:指定シートの後ろに追加Count:追加するシート数を指定Type:xlChart、xlW...
Excel VBA

Excel VBA ワークシート関数

ワークシート関数の呼び出し方VBAからワークシート関数を呼び出すには、ApplicationオブジェクトのWorksheetFunctionプロパティを使うApplication.WorksheetFunction.ワークシート関数Sub ...
Excel VBA

VBA 並べ替え

Excel 2007からは、新しくSortオブジェクトが新設された。以前は、並べ替えのキーが3つまでしか指定できなかったが、最大64個の指定ができるようになった。でも、以前のRange.Sortメソッドも使える。sub 並べ替えSample...
Excel VBA

VBA セルの表示形式とデータ型の不思議 (考察1)

セルの表示形式とデータ型は同じじゃない "(-""-)"VBAで転記ツールなどを作成していて、転記元も転記先も与えられたExcelファイルを利用する場合、各シート内のフォーマットは触ることができないため、この表示形式とデータ型の違いに苦しめ...
Excel VBA Sample

VBA 斜線用のパーツ Excelリボンに登録

'選択範囲の空白とゼロ値に斜線を引く'とりあえず、3000個分Sub myDrawBlankDiagonalLine1() Dim c As Range Dim n As Long For Each c In ActiveWindow.Ra...
Excel VBA Sample

VBA 斜線

斜線を引くSub zsDrawDiagonalLine() Dim ws1 As Worksheet Dim tRng As Range Dim allRng As Range Dim i As Long, j As Long, k As ...