Hi All,

How can I make multiple data for the same column go in access.

eg: here is what My excel table looks like:

Student_ID Subjects Grades

123456 Eng A
123456 Hist B
123456 Math B+
123456 Bio B-

here is what I have in access for recordset:

With rs
.AddNew
.Fields("Student_ID") = Range("A3").Value
.Fields("Subject") = Range("B3").Value
.Fields("Grades") = Range("C3").Value

.Update
End With
r = r + 1

Thanks in advance

Not sure what your asking
dim r as long
r=3
Range("A" & r).Value

"sam" wrote:

Hi All,

How can I make multiple data for the same column go in access.

eg: here is what My excel table looks like:

Student_ID Subjects Grades

123456 Eng A
123456 Hist B
123456 Math B+
123456 Bio B-

here is what I have in access for recordset:

With rs
.AddNew
.Fields("Student_ID") = Range("A3").Value
.Fields("Subject") = Range("B3").Value
.Fields("Grades") = Range("C3").Value

.Update
End With
r = r + 1

Thanks in advance

Oops.. Sorry I fogot to mention one thing.

There is a button "Submit" on the excel sheet that exports all of the
student data at once in the database.. I want to insert multiple student data
each in a seperate row.. all at once..

"Mike" wrote:

Not sure what your asking
dim r as long
r=3
Range("A" & r).Value

"sam" wrote:

Hi All,

How can I make multiple data for the same column go in access.

eg: here is what My excel table looks like:

Student_ID Subjects Grades

123456 Eng A
123456 Hist B
123456 Math B+
123456 Bio B-

here is what I have in access for recordset:

With rs
.AddNew
.Fields("Student_ID") = Range("A3").Value
.Fields("Subject") = Range("B3").Value
.Fields("Grades") = Range("C3").Value

.Update
End With
r = r + 1

Thanks in advance