Creating a new sheet and inputting data to it when conditions are met

[owlinfestation]

Hello! I am starting with a basic sheet of data and way-too-complicated of a procedure to know where to start...

There will be data existing in columns A and B. When data is first entered into a column C, I need a new sheet created with a mix of standard text and the data from the rest of the row (columns A and B) that the data was entered in. Every new instance of data being entered into column C needs to generate a new sheet fitting these conditions.

I can provide more particulars on request, but at this point, I'm wondering how intensive of a process it would be to code this, and if it is worth the time it will same. My alternative is copying and pasting onto a new sheet each instance of data on a data set that could reach a couple hundred rows in length.

Thanks for your thoughts!

 

[StephenCrump]

Welcome to the Forum!

Yes, more detail would be helpful. I'm guessing that you mean:

- Enter X in column C --> create a new X sheet and copy X data across
- Enter Y in column C --> create a new Y sheet and copy Y data across
- Enter X in column C again --> Add X data to X sheet already existing
- etc etc

How: Yes, this should be relatively simple to code in VBA

Why: ???? What are you achieving by spreading your data across multiple sheets in this way?

 

[owlinfestation]

Thanks for the welcome and response!

The spreadsheet is three columns. In order: REGistration code, PIN, and an as-yet empty column for NAME. When I enter a NAME, I would like a new sheet generated that says:
NAME, here is your access information for www.website.com
Registration code: REG
Personal Identification Number: PIN

If I enter 40 names, I would like 40 new sheets to be created so that I can print them in a batch (orrr if there's a script to have one sheet print all the new name additions that would be awesome, but probably borderline wizardry).

At this point, I'm thinking it will be more work than it's worth, and that's alright! I can just do a bunch of copy/paste.

 

[StephenCrump]

Here's some simple code (and workbook: https://app.box.com/s/6s1uc4sokj3uadmjxuqy4npbt1d1ih4t) to illustrate what can be done with automation.

Private Sub Worksheet_Change(ByVal Target As Range)

    Dim rngToCheck As Range, rngCell As Range
    
    Set rngToCheck = Intersect(Target, Range("C2:C" & Range("A2").End(xlDown).Row))
    
    If Not rngToCheck Is Nothing Then
        For Each rngCell In rngToCheck
            Range("A" & rngCell.Row).Resize(, 3).Copy Worksheets("Sheet2").Range("A" & Rows.Count).End(xlUp).Offset(1)
        Next rngCell
    End If
    
End Sub

Excel 2010

	A	B	C	D	E
1	Code	Pin	Name
2	AAAAAA	3972	Bill		Existing
3	BBBBBB	9549	Mary
4	CCCCCC	4069	NewName1		New
5	DDDDDD	4675	NewName2
6	EEEEEE	2567
7	FFFFFF	8833
8	HHHHHH	4053
9	IIIIII	3725
10	JJJJJJ	8860

<tbody>
</tbody>

Sheet1​

---> automatically generates:

Excel 2010

	A	B	C
1	New Names added this session
2	CCCCCC	4069	NewName1
3	DDDDDD	4675	NewName2

<tbody>
</tbody>

Sheet2​

It's not robust code. Just a concept to perhaps make you think about possibilities.

It would be relatively simple to write code to print in bulk, individually, generate individual PDFs, individual e-mails etc etc.

 

[owlinfestation]

Thanks, that framework helps me get to a starting point! I appreciate your help.