Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

2450 / 76734

←次へ　｜　前へ→


	【79927】Excelで家計簿制作中

家計簿Excel - 18/5/28(月) 15:03 -


	引用なし

	パスワード

Excelで家計簿作っていてVBAにチャレンジしていて

レシートを書く一覧表を作っていて、ユーザーフォームから入力出来る仕様にしてみました。
使用用途ごとにお金の流れを見れたらいいなと思い、ピポットテーブルで色分け・フィルター機能を追加しました。
すると下記のコードで書き込もうとすると（コードは最後に記載します）
ピポットテーブルの枠の外からしか書き込まなくなりました。

何かいい方法はありませんか？？
それともピポットテーブルは諦めるべきでしょうか・・・
ご教授下さい。

Private Sub btnOk_Click()
　Dim lastRow As Long
　　　　With Worksheets("一覧")
　　　　Range("F3:H4").Select
　　　　lastRow = .Cells(.Rows.Count, 2).End(xlUp).Row + 1
　　　　.Cells(lastRow, 2) = Me.txt購入日.Text
　　End With
End Sub

3 hits

▼

【79927】Excelで家計簿制作中 家計簿Excel 18/5/28(月) 15:03