am creating an application that has three master sheets and a template. Sheet
2 holds the data for an unknown list of sheets. I have a userform that allows
the user to copy the template worksheet and give it a unique name. That name
is stored in the database on sheet two. Sheet 2 looks like this.

A B C D
1. Sheet Name Data 1 Data 2 Data 3
2. New Sheet1 NewSheet1!A1 NewSheet1!B1 NewSheet1!C1

I need to figure out how to take data from the new sheet's Cell A1 B1 and C1
and copy it to it's corresponding position on the database in Sheet 2. I hope
that I explained it well. Any help would be appreciated.


--

Fighting Texas Aggie Class of 2009

I fi read this right you can just reference the cells, no? maybe a Vlookup
function? Have a look here
http://www.contextures.com/xlFunctions02.html

"Texas Aggie" wrote:

am creating an application that has three master sheets and a template. Sheet
2 holds the data for an unknown list of sheets. I have a userform that allows
the user to copy the template worksheet and give it a unique name. That name
is stored in the database on sheet two. Sheet 2 looks like this.

A B C D
1. Sheet Name Data 1 Data 2 Data 3
2. New Sheet1 NewSheet1!A1 NewSheet1!B1 NewSheet1!C1

I need to figure out how to take data from the new sheet's Cell A1 B1 and C1
and copy it to it's corresponding position on the database in Sheet 2. I hope
that I explained it well. Any help would be appreciated.


--

Fighting Texas Aggie Class of 2009

I would use Vlookup if I knew in advance what the sheet name would be
--


Fighting Texas Aggie Class of 2009


"Office_Novice" wrote:

I fi read this right you can just reference the cells, no? maybe a Vlookup
function? Have a look here
http://www.contextures.com/xlFunctions02.html

"Texas Aggie" wrote:

am creating an application that has three master sheets and a template. Sheet
2 holds the data for an unknown list of sheets. I have a userform that allows
the user to copy the template worksheet and give it a unique name. That name
is stored in the database on sheet two. Sheet 2 looks like this.

A B C D
1. Sheet Name Data 1 Data 2 Data 3
2. New Sheet1 NewSheet1!A1 NewSheet1!B1 NewSheet1!C1

I need to figure out how to take data from the new sheet's Cell A1 B1 and C1
and copy it to it's corresponding position on the database in Sheet 2. I hope
that I explained it well. Any help would be appreciated.


--

Fighting Texas Aggie Class of 2009

After doing some more research I come upon the solution to my own problem

The code is:

Sub test()

Dim c As Range
Dim ws As Worksheet
Set ws = ThisWorkbook.Worksheets("Sheet 2")

With ws
For Each c In Application.Intersect(.UsedRange, .Range("A2:A100"))
If c.Value = "" Then

Else
c.Offset(0, 1).Value = "='" & c.Value & "'!A1"
c.Offset(0, 2).Value = "='" & c.Value & "'!B1"


End If
Next c

End With
End Sub
--

Fighting Texas Aggie Class of 2009


"Texas Aggie" wrote:

am creating an application that has three master sheets and a template. Sheet
2 holds the data for an unknown list of sheets. I have a userform that allows
the user to copy the template worksheet and give it a unique name. That name
is stored in the database on sheet two. Sheet 2 looks like this.

A B C D
1. Sheet Name Data 1 Data 2 Data 3
2. New Sheet1 NewSheet1!A1 NewSheet1!B1 NewSheet1!C1

I need to figure out how to take data from the new sheet's Cell A1 B1 and C1
and copy it to it's corresponding position on the database in Sheet 2. I hope
that I explained it well. Any help would be appreciated.


--

Fighting Texas Aggie Class of 2009