Kako da kreirate sopstveni čitač životopisa sa Excel VBA

Podijeli sada:

Velike kompanije koriste skupi softver za skeniranje biografija koristeći vlastite prilagođene liste ključnih riječi kako bi pronašle kandidate za sve otvorene pozicije u svojoj kompaniji. Ako ste mala konsultantska firma i još uvijek ručno skenirate svoje biografije, ne brinite. Sada možete napraviti vlastiti alat za skeniranje biografija.

Preuzeti sada

Ako želite što prije početi koristiti softver, možete:

Preuzmite softver odmah

Odmah preuzmite predložak životopisa

Inače, ako želite DIY, možete pročitati sadržaj ispod.

Hajde da pripremimo GUI

Kao što je prikazano na slici, napravite dva lista i nazovite prvi kao „Meni“, a poslednji list kao „Nastavi“. Kao što ime kaže, list “Menu” će biti GUI za naš alat, a list “Resume” će sadržavati informacije iz Resume datoteka koje su pročitane kroz naš alat.

Na listu „Meni“ kreirajte polje za držanje pune putanje izabranog Resume. Imajte na umu da bi životopis trebao biti u doc ​​ili docx formatu. Dodajte dva dugmeta. Kasnije ćemo dodati makro ovim dugmadima kako bismo ih učinili funkcionalnim. Nazovimo dugme koje se nalazi desno od polja kao „Pretraži“. Neka dugme na dnu polja bude nazvano „Read Resume“. Da bi alat bio vizuelno dobar, možete dodati ikone jer sam dodao ikonu Word dokumenta.  Pripremite GUI

Hajde da pripremimo bazu podataka

Postalo je vrlo uobičajeno da sve kompanije imaju predložak životopisa na svojoj web stranici, a od tražitelja posla se traži da koriste ovaj šablon. Dakle, priprema baze podataka je jednostavna. Samo dodajte zaglavlja kolona koja odgovaraju poljima u predlošku životopisa vaše kompanije. Kao što je prikazano na slikama ispod, kreirao sam uzorak predloška životopisa i dodao odgovarajuća zaglavlja u listu "Nastavi"Uzorak predloška životopisa

Dodajte odgovarajuća zaglavlja u biografiju lista

Učinimo ga funkcionalnim

Kopirajte skriptu i zalijepite je u novi modul. Scenario ima dva sub-a. Prva podloga je da omogući korisniku da pregleda i odabere datoteku sa životopisom. Druga podloga je za čitanje i uvoz podataka iz odabranog životopisa. Sada nastavite i dodajte ove makroe odgovarajućim dugmadima na listu "Meni"

Hajde da ga testiramo

Sa lista „Meni“ pritisnite dugme za pretraživanje i izaberite datoteku. Sada možete vidjeti punu putanju odabranog životopisa koji se pojavljuje na polju. Kliknite na dugme „Read Resume“ i alat će odmah pročitati podatke iz Resume i staviti ih na list „Resume“

Kako radi?

Skripta tretira životopis kao tabelu sa redovima i kolonama. Svaki red i kolona se raščlanjuju i podaci se prenose iz riječi u Excel.

Izmijenite ga

Alat koji ste upravo napravili čita jedan životopis. Možete ga lako modificirati da čita više životopisa iz mape. Izmijenite prvu podlogu kako biste omogućili korisniku da izabere mapu i modificirajte drugu podlogu za čitanje i prosljeđivanje svake datoteke riječi iz odabrane mape.

Script

Sub pick_word()
'Allowing the user to pick the resume
    Dim wd As Office.FileDialog
    Set wd = Application.FileDialog(msoFileDialogFilePicker)
    With wd
        .AllowMultiSelect = False
        .Title = "Please select the Resume"
        .Filters.Clear
        .Filters.Add "Resume", "*.doc*"
        If .Show = True Then
            Sheets("Menu").Range("G5").Value = .SelectedItems(1) 'show the picked file on the Menu sheet
        End If
    End With
End Sub

Sub ImportWordTable()
'Read the resume
    Dim obj1 As Object
    Dim file1 As Variant
    Dim t1 As Integer
    Dim ir As Long
    Dim ic As Integer
    Set obj1 = GetObject(Sheets("Menu").Range("G5").Value)
    Sheets("Resume").Rows("2:1000").Clear
    Dim c As Long
    c = 0
    With obj1
        With .tables(1)
            For ir = 1 To .Rows.Count
                c = c + 1
                For ic = 2 To .Columns.Count
                    Sheets("Resume").Cells(2, c).Value = WorksheetFunction.Clean(.cell(ir, ic).Range.Text)
                    Next ic
                    Next ir
                End With
            End With
            Set obj1 = Nothing
        End Sub

U slučaju da jeste oštećena Excel xlsx datoteka datoteku i niste je ranije primijetili, sada je vrijeme da je popravite pomoću alata za oporavak kao što je DataNumen Excel Repair.

Uvod za autora:

Nick Vipond je stručnjak za oporavak podataka DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući popraviti korupciju u dokumentima i Outlook softverski proizvodi za oporavak. Za više informacija posjetite www.datanumen.com

Podijeli sada:

Komentari su zatvoreni.