Avatar billede Gonz Novice
10. maj 2018 - 10:05 Der er 3 kommentarer

VBA hjælp til at finde række

Hej jeg er igang med en opgave hvor jeg skal finde den ældst indskrevet studerende ud fra enroll_period, som er et tal. Min sub til at finde den ældste virker fint, men problemet er at jeg også skal finde den studerendes student_id, enroll_date og program_type_name, og det er her problemet opstår for når jeg prøver at finde de informationer frem så er det den forkerte række den finder informationerne fra. Jeg kan se at den vælger den række hvor den mindste værdi fra enroll period er fra, hvilket er 94.
Så jeg vil bare vide hvordan jeg kan finde den korrekte række frem så jeg kan få de informationer til den pågældende studerende.

Min sub ser således ud:

Sub Ældste()
   
    Dim ENROLL_PERIOD As Range
    Dim period As Integer
   
    Set ENROLL_PERIOD = Range("E2:E" & Rows.Count)
    period = Application.WorksheetFunction.Min(ENROLL_PERIOD)
    If Val(period) And 1 Then
    MsgBox "Indskrevet: Forårssemestret " & (period / 2 + 1949) & vbNewLine & "Student Id: " & (Cells(period, 12)) & vbNewLine & "Enroll Date: " & (Cells(period, 4)) & vbNewLine & "Program Type: " & (Cells(period, 11))
    Else
    MsgBox "Indskrevet: Efterårssemestret " & (period / 2 + 1949) & vbNewLine & "Student Id: " & (Cells(period, 12)) & vbNewLine & "Enroll Date: " & (Cells(period, 4)) & vbNewLine & "Program Type: " & (Cells(period, 11))
    End If
   
End Sub
Avatar billede kim1a Ekspert
11. maj 2018 - 12:12 #1
Misforstår jeg dig, eller mangler du blot rækkenummeret på der hvor
val(period) = 1?
Avatar billede Gonz Novice
11. maj 2018 - 12:43 #2
Manglede at finde rækkenummeret for "period", men dette har jeg faktisk fået løst ved at bruge:


Dim minPeriodRow As Long

minPeriodRow = ENROLL_PERIOD.Find(what:=period, lookat:=xlWhole, LookIn:=xlValues).Row
Avatar billede kim1a Ekspert
11. maj 2018 - 15:17 #3
Så kan du vel blot derefter vælge:
Cells(x, minperiodrow).value =
Så har du den værdi du skal brug videre?
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester



Seneste spørgsmål Seneste aktivitet
I går 22:00 Datafordeler Af Lsk i PHP
I går 12:37 Summere beløb pr. dato Af TTA i Excel
31/1022:44 Tilslutte chassic fans Af viking69 i PC
31/1020:28 LED lysstofrør Af ErikHg i Fri debat
31/1014:25 Smartphone Motorola Af Peter Olsen i Mobiltelefoner