VBA

VBA 値のみ貼り付け

VBA

こんにちは。ちゃあ少佐です。 VBA 学習13日目 ☆値のみ貼り付け☆ range("A1": "D10").copy range("F1").pastespecial paste:=xlpastevalues copy コピー pastespecial 貼り付け オプション paste:=xlpastevalues 値のみ その他オプション https://excel-ubar…

VBA セルの内容を消す

VBA

こんにちは。ちゃあ少佐です。 VBA 学習12日目 ☆セルの内容を消す☆ cells(1,1).clear range("A1":"G5").clear clear 書式や数式、文字列等全てを消します clearcomments コメントを消去 clearcontents 文字列と数式を消去 clearformats 書籍設定を削除 以上…

VBA シートとブックの指定

VBA

こんにちは。ちゃあ少佐でした。 VBA 学習11日目 ☆シートとブックの指定☆ シート指定 Worksheets("シート名") または Sheets("シート名") ブック指定 Workbooks(“Book名”) つまり・・・ Workbooks(“Book名”).Worksheets("シート名").cells("セル番地") 以上…

VBA マクロの記録

VBA

こんにちは。ちゃあ少佐です。 VBA 学習10日目 ☆マクロの記録☆ これはエクセルで操作した内容を記録し、 マクロで実行できるようにするものです。 『マクロの記録』 ↓ エクセルを操作 ↓ 『記録終了』 以上です。 コードは開発のVBに記載されている。 操作と…

VBA for文~ネスト~

VBA

こんばんは。ちゃあ少佐です。 VBA 学習9日目 ☆for文~ネスト~☆ for i = 1 to 3 for a = 1 to 5 cells(i, a) = a + i next a next i 結果 2 3 4 5 6 3 4 5 6 7 4 5 6 7 8 以上、ちゃあ少佐でした。

VBA for文とif文を使用する

VBA

こんにちは。ちゃあ少佐です。 VBA 学習8日目です。 ☆for文とif文を使用する☆ for i = 1 to 4 if i = 2 or i =4 then s = s + i cells(1,1)= s end if next i 結果 6 以上、ちゃあ少佐でした。

VBA if文で分岐させる(条件複数)

VBA

こんにちは。ちゃあ少佐です。 VBA 学習7日目 ☆if文で分岐させる(条件複数)☆ if cells(1,1) = 1 and cells(1,2) = 2 then cells(2,1) = "セル(1,1)は『1』且つセル(1,2)は『2』です。" if cells(1,1) = 1 or cells(1,1) = 2 then cells(2,1) = "セル(1,1…

VBA if文で〇〇が含まれた場合の処理

VBA

こんにちは。ちゃあ少佐です。 VBA 学習6日目 ☆if文で〇〇が含まれた場合の処理☆ if cells(1,1)like "*大阪*" then cells(1,2) = ”大阪は含まれています。” else: cells(1,2)= "大阪は含まれていません。 以上、ちゃあ少佐でした。"

VBA if文で分岐させる

VBA

こんにちは。ちゃあ少佐です。 VBA 学習5日目 ☆if文で分岐させる☆ If 条件式 Then 条件式が成立した場合に実行する処理 Else 条件式が成立しなかった場合に実行する処理 End If ex) a = 15 if a >= 10 then cells(1, 1) = "aの値は10以上です。" else: calls…

VBA for文で繰り返し処理を行う

VBA

こんにちは。ちゃあ少佐です。 VBA 学習4日目 ☆for文で繰り返し処理☆ Dim 変数 For 変数=初期値 To 最大値 ~繰り返し処理を記述 ~Next 変数 ex) Dim i For i = 1 To 12 Cells(i, 1) = i & "月" 'i行目・1列目のセルに各月を入力’ Next i 結果 A列 1月 2月 3…

VBA 文字列と数字の連結

VBA

こんにちは。ちゃあ少佐です。 VBA 学習3日目 ☆文字列と数字の連結☆ Sub テスト() Dim str1 As String Dim str2 As String Dim num1 As Integer Dim num2 As Integer str1 = "こんにちは" str2 = "お元気ですか" num1 = 10 num2 = 34 Range("A1").Value = st…

VBA cellとRange

VBA

こんにちは。ちゃあ少佐です。 VBA 学習2日目 ☆CellとRange☆ cell cells(縦, 横) Range Range("セル番号指定") 範囲 Range("セル番号:セル番号") or Range(cells(縦, 横),cells(縦, 横)) 以上、ちゃあ少佐でした。

VBA 変数宣言

VBA

こんにちは ちゃあ少佐です。 VBA 学習1日目 ☆プロシージャの宣言☆ Sub 名前() | | この間にコードを書く | End Sub ☆変数の宣言☆ Dim 変数名 as 型 型の種類 integer (数字) String (文字列) Date (日付) Variant (なんでもOK) 以上、ちゃあ少佐でした。