質問者が納得amachann3625さん
一度に複数の質問も、VBA初心者が望むものとしても、ちょっと欲張りすぎの感がありますが、、、
(1)と(2)について
P9:U9、W9:AB9 にはタイトル行がある想定です。
シート名タブを右クリックして「コードの表示」を押下、出てきた VisualBasicEditor画面(VBE画面)にコピペします。
Private Sub Worksheet_Change(ByVal Target As Range)
Dim r As Range, myCol As Integer...
質問者が納得一行目にA B C D E F G H I
二行目の特定のセルに送料変更
三行目に商品の個数
が入力されているんですよね?
では非常に初歩的にFor NextとIF文だけで
Sub 送料変更()
'所定の回数(この場合(A~Iで9回)操作を繰り返す
For i = 1 To 9
'2行目のあるセルの値が"送料変更"の場合は一行下の3行目のセルに0を代入(Cells(a,b).Value→a行b列のセル)
If Cells(2, i).Value = "送料変更&qu...