Excel VBA ilə Öz Resume Readerinizi necə yaratmalısınız

İndi paylaş:

Böyük şirkətlər costly proqram təminatı öz şirkətlərindəki bütün açıq vəzifələr üçün namizədləri tapmaq üçün onların xüsusi qurulmuş açar sözlər siyahısından istifadə edərək CV-ləri skan etməkdir. Əgər kiçik bir məsləhət firmasısınızsa və CV-lərinizi hələ də əl ilə skan edirsinizsə, narahat olmayın. İndi siz öz CV tarama alətinizi yarada bilərsiniz.

İndi Download

İstəsəniz start proqram təminatından mümkün qədər tez istifadə etmək üçün aşağıdakıları edə bilərsiniz:

Proqramı İndi Yükləyin

İndi Resume Şablonunu endirin

Əks halda, DIY etmək istəyirsinizsə, aşağıdakı məzmunu oxuya bilərsiniz.

GUI hazırlayaq

Şəkildə göstərildiyi kimi, iki vərəq yaradın və birincini “Menyu”, sonuncunu isə “Resume” adlandırın. Adından da göründüyü kimi, "Menyu" vərəqi alətimiz üçün GUI olacaq və "Resume" vərəqi alətimiz vasitəsilə oxunan Resume fayllarından məlumatları saxlayacaq.

"Menyu" vərəqində seçilmiş CV-nin tam yolunu saxlamaq üçün sahə yaradın. Nəzərə alın ki, CV doc və ya docx formatında olmalıdır. İki düymə əlavə edin. Daha sonra bu düymələrə makro əlavə edəcəyik ki, onu işlək hala gətirək. Sahənin sağında olan düyməni “Browse” adlandıraq. Sahənin altındakı düyməyə “Resume Oxu” adı verilsin. Aləti vizual olaraq yaxşı etmək üçün, mən Word sənədi ikonasını əlavə etdiyim üçün siz nişanlar əlavə edə bilərsiniz.  GUI hazırlayın

Gəlin verilənlər bazasını hazırlayaq

Bütün şirkətlərin veb-saytlarında CV şablonunun olması çox adi hala gəldi və iş axtaranlardan bu şablondan istifadə etmələri xahiş olunur. Beləliklə, verilənlər bazasını hazırlamaq sadədir. Sadəcə şirkətinizin CV şablonundakı sahələrə uyğun sütun başlıqları əlavə edin. Aşağıdakı şəkillərdə göstərildiyi kimi, mən nümunə CV şablonu yaratdım və “Cavam” vərəqinə müvafiq başlıqlar əlavə etdim.Nümunə CV Şablonu

Cədvəl CV-ə Müvafiq Başlıqlar əlavə edin

Gəlin onu funksional edək

Skripti kopyalayın və yeni Modula yapışdırın. Skriptin iki alt hissəsi var. Birinci alt istifadəçiyə CV faylını nəzərdən keçirmək və seçmək imkanı verməkdir. İkinci alt, seçilmiş CV-dən məlumatları oxumaq və idxal etməkdir. İndi davam edin və bu makroları "Menyu" vərəqindəki müvafiq düymələrə əlavə edin

Test edək

"Menyu" vərəqindən gözdən keçir düyməsini vurun və faylı seçin. İndi sahədə görünən seçilmiş CV-nin tam yolunu görə bilərsiniz. “Resume oxu” düyməsini klikləyin və alət Resume-dən məlumatları dərhal oxuyacaq və “Cavam” vərəqinə yerləşdirəcək.

Bu necə işləyir?

Skript CV-yə sətir və sütunlu bir cədvəl kimi baxır. Hər bir sətir və sütun təhlil edilir və məlumatlar Word-dən Excel-ə ötürülür.

Dəyişdirin

İndicə qurduğunuz alət tək CV-ni oxuyur. Bir qovluqdan birdən çox CV oxumaq üçün onu asanlıqla dəyişdirə bilərsiniz. İstifadəçiyə bir qovluq seçməyə icazə vermək üçün birinci alt elementi dəyişdirin və seçilmiş qovluqdan hər bir söz faylını oxumaq və ötürmək üçün ikinci alt alt elementi dəyişdirin.

Ssenari

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

Varsa zədələnmiş Excel xlsx faylı kimi bərpa vasitələrindən istifadə edərək onu düzəltməyin vaxtı gəldi və əvvəllər bunu fərq etməmisiniz DataNumen Excel Repair.

Müəllif Giriş:

Nik Vipond məlumatların bərpası üzrə mütəxəssisdir DataNumendaxil olmaqla məlumatların bərpası texnologiyaları üzrə dünya lideri olan , Inc doc korrupsiyasını təmir edin və Outlook bərpa proqram məhsulları. Ətraflı məlumat üçün ziyarət edin www.datanumen.com

İndi paylaş:

Şərhlər bağlıdır.