Excel VBA 行の並び替え、列の並び替え
'■行の並び替え、列の並び替え、並べ替えWith ActiveWorkbook.Worksheets(1).Sort With .SortFields .Clear '設定クリア '条件1 昇順（xlDescending） 降順（xlDes...
Excel VBA
Excel VBA 
日記 串刺し印刷するための、串刺し処理（串刺し面付）
決まった用紙に、サイズ別に面付するときの考え方小さいカードを、決められた用紙サイズに面付したときに、重ねたまま断裁した場合、その重なったカードが上から順に並んでいる状態を作る場合の考え方この手の場合、カードが１種類だとやりやすいけど、カード...
日記 特定列で、シート分け（特定の列に記入されているセル内容をシート名にする）
特定列で、シート分け（特定の列に記入されているセル内容をシート名にする）なので、特定セルのセル内容は、順番に並んでいる必要があり、同じ名前が再び出てくるような順番になっているとエラーが発生！（同じシート名でシートを存在させることは出来ないの...
日記 拡張子を含まないファイル名の取得方法
拡張子を含まないファイル名の取得方法'ファイル名取得Dim trueName As StringtrueName = ActiveWorkbook.NameDim kcsi As Longkcsi = InStrRev(trueName, ...
日記 vba 忘備録
'■日付を8桁で取得Dim strYYYYMMDDstrYYYYMMDD = Format(Now, "yyyymmdd")'■ログインユーザー名を取得するDim loginUser As StringloginUser = CreateO...
日記 項目を既定の順番に並べなおす
Sub 項目を既定の順番に並べなおす()Dim i_1, i_2, i_3Dim ii '項目名用宣言Dim nx As Integer '指定回数用宣言Dim koumoku '項目用宣言Range("A1").Select i_1 = ...
Excel VBA メニュー作成
エクセルの上部に、メニュー形式を追加します。また、名前を付けて保存【Excelアドイン（*.xlam）】することで、マクロのみのファイルを作ることが出来るので、マクロをエクセルファイルに依存させる必要がありません。非常に便利なので、これは覚...
日記 vba 忘備録
'ウィンドウの最大化、最小化、標準（高速化2）Application.WindowState = xlMaximizedApplication.WindowState = xlMinimizedApplication.WindowState...
日記 シートが複数あると中止
'シートが複数あると中止Dim sht1stop As Stringsht1stop = Sheets.CountIf sht1stop > 1 Then MsgBox "シートが複数あります。" & vbCrLf & "不要なシートを削除...
Excel VBA メニュー形式（エクセルのアドインタブにメニューを追加する）
メニュー形式（エクセルのアドインタブにメニューを追加する）Option ExplicitSub Auto_Open()With CommandBars("worksheet menu bar").Controls.Add(Type:=mso...