Replicate cell contents when a value is enter
Closed
TexasTom
-
Oct 8, 2009 at 04:11 AM
venkat1926 Posts 1863 Registration date Sunday June 14, 2009 Status Contributor Last seen August 7, 2021 - Oct 8, 2009 at 10:15 PM
venkat1926 Posts 1863 Registration date Sunday June 14, 2009 Status Contributor Last seen August 7, 2021 - Oct 8, 2009 at 10:15 PM
Related:
- Replicate cell contents when a value is enter
- How to enter @ in laptop - Guide
- Enter is send in whatsapp - Guide
- Clear only the formatting from the selected cell (leaving the content) - Guide
- How to enter in wechat - Guide
- Enter coordinates in google earth - Guide
2 responses
venkat1926
Posts
1863
Registration date
Sunday June 14, 2009
Status
Contributor
Last seen
August 7, 2021
811
Oct 8, 2009 at 06:13 AM
Oct 8, 2009 at 06:13 AM
let me rephrase the question to see whether I have understood.
C1 to C32 have entries 1 to 32ed
If enter 1 in A1 C1 is selectd.
If now enter 5 in A1 c5 is selected
if now I enter 16 c16 is selected
right click the sheet tab
click view code
in the resulting window copy paste this event code
If this solves the problem post back "YES"
C1 to C32 have entries 1 to 32ed
If enter 1 in A1 C1 is selectd.
If now enter 5 in A1 c5 is selected
if now I enter 16 c16 is selected
right click the sheet tab
click view code
in the resulting window copy paste this event code
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$1" Then Exit Sub
Columns("C:C").Cells.Find(what:=Target.Value, lookat:=xlWhole).Activate
End Sub
If this solves the problem post back "YES"
venkat1926
Posts
1863
Registration date
Sunday June 14, 2009
Status
Contributor
Last seen
August 7, 2021
811
Oct 8, 2009 at 10:15 PM
Oct 8, 2009 at 10:15 PM
You could have cleared this in your first posting itself .
see the modified macro with the same instructions
I have used the column c. for my easy verification
you can change wherever "c" comes into "O"
the event code is
see the modified macro with the same instructions
I have used the column c. for my easy verification
you can change wherever "c" comes into "O"
the event code is
Private Sub Worksheet_Change(ByVal Target As Range)
Dim r As Range, x As String, j As Integer
Application.EnableEvents = False
If Target.Address <> "$A$1" Then GoTo line1
Set r = Range(Range("C1"), Range("c1").End(xlDown))
j = Range("A1").Value
x = Cells(j, "c")
Range("A1") = x
line1:
Application.EnableEvents = True
End Sub
Oct 8, 2009 at 08:00 AM
What I actually have is in column "O" 32 names
what i want to be able to do is in the whole of column "B" is to be able to type a number 1-32 in various and possibly repeating cells and when the number 6 is entered the cell is actually populated with the 6th name in column "O" and number 31 returns the 31st name.
Your solution meant that when I entered a number the cell that was in focus was the one containing the matching number.
Thanks again.
Tom