Enter different data into same cell and have it create a log on another sheet

T

TitansFan

New Member
Joined
Mar 8, 2011
Messages
10
I'm trying to figure out a way to be able to enter different data into a particular cell on one sheet and have this data be listed as individual items or rows on a different sheet.

For example, let's say I have cell A1 on Sheet 1 as my cell that will have different text entered into it. Let's say I type the word 'dog' into A1. I would want this copied into Sheet 2 in cell A1 as 'dog'. Now, let's say I want to enter the word 'cat' into A1 on Sheet 1. I would then want this new text to not replace A1 on Sheet 2, BUT to drop down another row and be in cell A2 on Sheet 2. Does that make sense??? In other words, Sheet 1 would be for data entry and would show the last text entered into cell A1. Sheet 2 would create a log or history of the text that was entered into A1 of Sheet 1.

Any thoughts on how do do this?

Thanks!
 

Excel Facts

Using Function Arguments with nested formulas
If writing INDEX in Func. Arguments, type MATCH(. Use the mouse to click inside MATCH in the formula bar. Dialog switches to MATCH.
Sort by date Sort by votes
Paste the following into your sheet1 module:

Code: 
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then Sheets("Sheet2").Range("A" & Rows.Count).End(xlUp).Offset(1) = Target.Value
End Sub
 
Upvote 0
Bringing this post back to life.

Can someone modify this VBA to...
-Store the log in the same sheet
-Move the stored data "down" (store the most recent entered data at the top of the list)
-Set a max number rows data is kept (10)
-Apply this to data entered in two cells

Thanks for the time.
 
Upvote 0
Hi There,

Would anyone please help me how can I transfer (automatically incremental percent) value from one cell to another column to log progress rate monthly.

Suppose I got cell which has got percent value increasing as work progress and I want that value log monthly into another column progressively into different rows so I can find how much percent increased in different months. <o:p></o:p>
Will appreciate any help.<o:p></o:p>
Cheers
 
Upvote 0
njimack said:
Paste the following into your sheet1 module:

Code: 
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then Sheets("Sheet2").Range("A" & Rows.Count).End(xlUp).Offset(1) = Target.Value
End Sub
Click to expand...


(I know this is an old thread, I'm hoping someone knowledgeable sees this and can help.)

I found this code by searching and I believe it is a step in the right direction for me, however, it's not yet ideal. I actually have 14 columns that I would like to track the changes of in a separate sheet. Rather than doing it every time one of these cells is targeted as the quoted code is doing, I would prefer to run a check for changes on these columns when the end user saves the workbook - and then copy any columns that did change to my log.

Can it be done?

Thanks in advance for your help!
 
Upvote 0
You must log in or register to reply here.

Similar threads

P
  • Solved
VBA to keep a running log of changes to specific cell
2 3
Replies
20
Views
804
Joe4
Joe4
G
  • Solved
VBA Delete rows if cell contains specific text within a string
2
Replies
10
Views
942
Peter_SSs
Peter_SSs
C
  • Solved
Making a dynamic image change depending on which cell is selected
2
Replies
12
Views
382
kevin9999
K
J
  • Question
Formula to change values in different cells - HELP!!
Replies
1
Views
291
awoohaw
awoohaw
S
  • Solved
COUNTIFS with dynamic range when same data is in different column in different sheets
Replies
9
Views
180
Fluff
Fluff

Forum statistics

Threads
1,214,985
Messages
6,122,603
Members
449,089
Latest member
Motoracer88

Share this page

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top