No.2ベストアンサー
- 回答日時:
該当のシートのコードに下記のように記述
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then 'A列のみ判定
If Target = 0 Then '変更内容が0またはブランクなら
Target.Offset(0, 1).Clear '同じ行のB列の内容をクリア
Else
Target.Offset(0, 1) = Target '同じ行のB列にA列の値をセット
End If
End If
End Sub
No.3
- 回答日時:
>B1にセルをおきます
意味不明。B1はセルの番地じゃないの。
>A1の内容を比較します
何とA1を比較するの?
>同様にA列の内容を比較し結果をB列に格納します
同様に第2行目以下についても、同じ作業を行う。
>if A1=0
then B1を空セルに
このように Thenの前で改行したらエラーになるのではないですか。
Sub test01()
if range("A1")=0
then Range("B1")=0
End Sub はエラー
↓
Sub test01()
If Range("A1") = 0 Then
Range("B1") = 0
Else
Range("B1") = Range("A1")
End If
End Sub
End If
これを行変化させやすいように
Sub test02()
d = 10
For i = 1 To d
If Cells(i, "A") = 0 Then
Cells(i, "B") = 0
Else
Cells(i, "B") = Cells(i, "A")
End If
Next i
End Sub
質問の文章はしっかり表現してください。
それとVBA(マクロ)の本でもまず1冊読んでから質問することをお勧めします。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルの関数式を教えてください。 2 2022/11/29 21:09
- Excel(エクセル) エクセルでIF関数中にIFERROR関数を使いたいのですが???? 5 2022/04/08 13:24
- Excel(エクセル) エクセル表作成について 5 2023/03/12 13:25
- Excel(エクセル) 【再度】Excelの関数について教えてください。 4 2023/07/28 13:06
- Excel(エクセル) エクセルVBAでセルに表示されているとおりの数値を取得したい(時間の計算結果) 1 2022/03/30 17:52
- Excel(エクセル) Excel 関数 数式 について 2 2022/09/02 21:45
- Excel(エクセル) IF関数について 5 2023/06/26 00:46
- Excel(エクセル) エクセルで月末、月初の判定をしたい。 4 2022/05/18 23:22
- Visual Basic(VBA) Excel VBA 最終行を取得しVlookup関数をコピーする方法をコーディングで教えてください。 3 2023/05/11 13:14
- Excel(エクセル) 並べ替え、ソートの構文がわからない。 お世話になります。VBA超初心者です。 エクセルでワークシート 2 2023/06/28 21:00
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルで特定の文字列が入っ...
-
【Excel関数】UNIQUE関数で"0"...
-
[EXCEL]ボタン押す→時刻が表に...
-
特定の文字がある行以外を削除...
-
エクセルマクロで偶数行(又は...
-
excel 小さすぎて見えないセル...
-
excelのデータで色つき行の抽出...
-
Excelでカタカナ・ひらがな・英...
-
エクセル マクロ オートフィ...
-
エクセル マクロで数値が変っ...
-
エクセルVBA:リストに登録した...
-
サイズの違うセル 並べ変え
-
エクセル2016で時間を入力して...
-
エクセル 上下で列幅を変えるには
-
結合されたセルをプルダウンの...
-
Excel グラフのプロットからデ...
-
Excel 時刻の並び替え
-
VBAで色の付いているセルの行削除
-
電話番号の入力方式が違うデー...
-
セルの色によって条件文をつけ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルで特定の文字列が入っ...
-
エクセル マクロ オートフィ...
-
【Excel関数】UNIQUE関数で"0"...
-
[EXCEL]ボタン押す→時刻が表に...
-
結合されたセルをプルダウンの...
-
エクセル マクロで数値が変っ...
-
Excel グラフのプロットからデ...
-
AのセルとB行を比較して、一致...
-
エクセル 上下で列幅を変えるには
-
Excel ウインドウ枠の固定をす...
-
特定の文字がある行以外を削除...
-
excelのデータで色つき行の抽出...
-
エクセル2016で時間を入力して...
-
excel 小さすぎて見えないセル...
-
EXCELで最後の行を固定
-
エクセルVBA 最終行を選んで並...
-
VBAで色の付いているセルの行削除
-
エクセルマクロで偶数行(又は...
-
エクセルのセルに指定画像(.jpg...
-
罫線の斜線を自動で引くマクロ
おすすめ情報