No.1ベストアンサー
- 回答日時:
たとえば使い慣れた(?)エクセルを使うとして,しかしふつーにやっていたのではそういう事は出来ません。
あくまでお試し,体験版として次のように作業してみてください。
添付図:まっさらのエクセルを開き,この通りに作成します。
B2とC2セルが入力欄です
6行目からがデータが追加されていく表です。
各列も,添付図の通りに作成している事が前提です。
手順:
シート名タブを右クリックしてコードの表示を選ぶ
現れたシートに下記をコピー貼り付ける
Private Sub Worksheet_Change(ByVal Target As Range)
Dim h As Range
If Application.Intersect(Target, Range("B2:C2")) Is Nothing Then Exit Sub
If Application.CountA(Range("B2:C2")) <> 2 Then Exit Sub
Set h = Range("B6:B65536").Find(what:=Range("B2"), LookIn:=xlValues, lookat:=xlWhole)
If h Is Nothing Then
'new data
Set h = Range("B65536").End(xlUp).Offset(1)
h.Offset(0, -1) = Application.Sum(h.Offset(-1, -1), 1)
End If
h = Range("B2")
Cells(h.Row, "IV").End(xlToLeft).Offset(0, 1) = Range("C2")
Range("B2:C2").ClearContents
End Sub
ファイルメニューから終了してエクセルに戻る
そのままB2セルとC2セルにデータを記入する。
次々B2とC2に記入していく。
繰り返しますが,勝手に表の配置を変えるとこのプログラムは動かなくなりますから,添付図の通りにお試しで作成してください。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
- Excel(エクセル) Excelマクロ 差分抽出の方法が知りたいです。 2 2023/03/07 13:25
- その他(データベース) c言語の問題です。これを踏まえてコーディングしたいのでおしえていただきたいです。 3 2023/08/03 09:27
- Visual Basic(VBA) ユーザーフォームの表示を追加したい 2 2023/03/26 23:18
- その他(SNS・コミュニケーションサービス) スマホが壊れたため新しい代替のスマホになってカカオトークを新しくインストールしました カカオトークの 2 2023/05/01 20:42
- Excel(エクセル) グループの最後の行に書式、計算式なども同じ行を追加するマクロを教えてもらえませんか。 7 2022/05/18 10:13
- Excel(エクセル) 棚卸表の前月比の関数等あれば教えてください 2 2023/05/02 18:34
- その他(メールソフト・メールサービス) Thunderbird にアカウントの追加ができない 1 2022/09/27 17:39
- Visual Basic(VBA) 【困っています2】VBA 追加処理の記述を教えてください。 2 2022/08/26 11:42
- Visual Basic(VBA) 検索のユーザーフォームの表示について 1 2023/03/27 23:31
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
未成年ですがドンキでオナホ買...
-
エクセルでマウスカーソルの形...
-
Excelピボットテーブルで余計な...
-
ドンキに18禁コーナーじゃない...
-
エクセルで特定のセル以下の全...
-
蛍光灯はドラッグストアで売っ...
-
Snipping Toolで切り取った画像...
-
タスクバーからデスクトップへ...
-
Excel(エクセル)で価格帯別に...
-
Wordで段落番号が2桁になったと...
-
エクセルの行の幅を一部だけ変...
-
イラレで急に日本語が打てなく...
-
PowerPointを使っているのです...
-
線のスタイル(太さ)をまとめ...
-
ドラッグストアーのコスモスっ...
-
ラベルとテキストボックスのグ...
-
エクセルの式をドラッグコピー...
-
ワードで、表をずらしてから表...
-
性交痛にベビーオイルがよいと...
-
エクセル自動連番機能の解除方法
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
未成年ですがドンキでオナホ買...
-
エクセルでマウスカーソルの形...
-
ドンキに18禁コーナーじゃない...
-
タスクバーからデスクトップへ...
-
ドラッグストアでTENGAを買おう...
-
エクセルで特定のセル以下の全...
-
蛍光灯はドラッグストアで売っ...
-
ワードで1ページに同じ内容の...
-
コスモスにTENGAは売っています...
-
正露丸のレシートは医療控除に...
-
ワードで、表をずらしてから表...
-
Excelピボットテーブルで余計な...
-
通常、ドラッグストアとコンビ...
-
Excel(エクセル)で価格帯別に...
-
Snipping Toolで切り取った画像...
-
性交痛にベビーオイルがよいと...
-
線のスタイル(太さ)をまとめ...
-
エクセルの式をドラッグコピー...
-
Wordで段落番号が2桁になったと...
-
ドラッグストアーのコスモスっ...
おすすめ情報