以下は、特定のセルにデータを自動入力するVBAの例です。この例では、セルA1に「Hello, World!」というテキストを自動的に入力します。
|
1 2 3 4 5 6 7 8 9 10 11 12 |
Sub AutoFillCell() ' ワークシートのセルA1にデータを自動入力するマクロ ' ワークシート名とセルのアドレスを指定 Dim ws As Worksheet Set ws = ThisWorkbook.Sheets("Sheet1") ' ワークシート名を適切なものに変更する Dim targetCell As Range Set targetCell = ws.Range("A1") ' 入力したいセルのアドレスを適切なものに変更する ' セルにデータを入力 targetCell.Value = "Hello, World!" ' 入力したいデータを適切なものに変更する End Sub |
