Is this solved?
If you solve a problem yourself before anyone else has responded, please take a moment to describe your solution, chances are some other member will benefit.
Also,
I have added code tags to your post. As per forum rule 3, you need to use them whenever you put any code in your post. Please add them in future. If you need more information on how to use them, check my signature below this post.
If I have helped, Don't forget to add to my reputation (click on the star below the post)
Don't forget to mark threads as "Solved" (Thread Tools->Mark thread as Solved)
Use code tags when posting your VBA code: [code] Your code here [/code]
Yes, it is solved...Sorry about not posting solution or using code tags.
I flipped the array the other direction, so that it was 9 tall by 6 wide. (Just because it was easier to enter the info that way for me)
Replaced combo boxes with text boxes.
Added a button to start a Vlookup to populate the questions.
Here is what I added:
Private Sub LoadTopics_Click() Dim DBA As String DBA = Me.DBA.Value Me.Q1.Value = Application.WorksheetFunction.VLookup(DBA, Sheets("Sheet4").Range("g1:l10"), 2, False) Me.Q2.Value = Application.WorksheetFunction.VLookup(DBA, Sheets("Sheet4").Range("g1:l10"), 3, False) Me.Q3.Value = Application.WorksheetFunction.VLookup(DBA, Sheets("Sheet4").Range("g1:l10"), 4, False) Me.Q4.Value = Application.WorksheetFunction.VLookup(DBA, Sheets("Sheet4").Range("g1:l10"), 5, False) Me.Q5.Value = Application.WorksheetFunction.VLookup(DBA, Sheets("Sheet4").Range("g1:l10"), 6, False) End Sub
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks