縦横が絡むとExcelって非力っていうか、言うこと聞かない。コピー先シートに =Schedule!D3 横方向にコピペ Ctrl+Shift+@で数式表示 数式をコピー テキストエディタに貼り付け \tを\nに置換 エクセルに貼り付け

なんでこんなに面倒なのか。 配列の数を決めてから格納するって、どこが動的なんだか ぶつぶつ Dim ArrStr() As String ReDim ArrStr(3) ArrStr(0) = "aaa" ArrStr(1) = "bbb" ArrStr(2) = "ccc" For i = 0 To UBound(ArrStr) - 1 ArrStr(i) = ArrStr(i + 1)…

五十音順に並べるマクロ Private Sub aiueo() 'あいうえお用の初期化 Worksheets("あいうえお").Columns("A:BA").Delete Shift:=xlToLeft Worksheets("50").Columns("A:I").ClearContents Worksheets("all_ki").Columns("A:I").Copy Sheets("50").Select Sel…

エクセルマクロ君が悪いんじゃないんです、エクセルマクロ君の生まれてきた環境が・・・とかアホなこと言っていない。 変数宣言と初期値を１行で書きたい Dim Max, Min As Integer Max=10 Min=1１行で書かせろ Dim Max, Min As Integer: Max=10: Min=1コロン…

XLSXファイルを開いて、指定した複数のシートが存在するかチェックしたい。ラブライブである必要はまったくない。そもそもよく知らない。 Dim FilePath As String FilePath = "C:\Users\kenmituo\Documents\ラブライブ.xls" If Dir(FilePath) <> "" Then Wor…