Nhờ giúp copy dữ liệu từ CV sang danh sách tổng hợp (2 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

So cool

Thành viên mới
Tham gia
12/10/16
Bài viết
2
Được thích
0
Xin chào mọi người, em là member mới, có 1 vấn đề rất nan giải mong mọi người giúp đỡ.

Tình hình là em đang làm hỗ trợ tuyển dụng cho ngân hàng, mỗi tháng em phải nhập cả trăm CV xin việc của ứng viên vào danh sách tổng hợp mất rất nhiều thời gian. Danh sách tổng hợp gồm các thông tin (Họ tên, ngày tháng năm sinh, giới tính, vị trí ứng tuyển, địa chỉ thường trú...) theo mẫu em gửi kẻm bên dưới.

Em có gửi 2 bản CV mẫu và danh sách em cần tổng hợp. Rất mong mọi người giúp đỡ, mỗi lần nhập hồ sơ em như bế tắc cả vài tiếng đồng hồ.
Chân thành cảm ơn mọi người nhiều.**~**
 

File đính kèm

Xin chào mọi người, em là member mới, có 1 vấn đề rất nan giải mong mọi người giúp đỡ.

Tình hình là em đang làm hỗ trợ tuyển dụng cho ngân hàng, mỗi tháng em phải nhập cả trăm CV xin việc của ứng viên vào danh sách tổng hợp mất rất nhiều thời gian. Danh sách tổng hợp gồm các thông tin (Họ tên, ngày tháng năm sinh, giới tính, vị trí ứng tuyển, địa chỉ thường trú...) theo mẫu em gửi kẻm bên dưới.

Em có gửi 2 bản CV mẫu và danh sách em cần tổng hợp. Rất mong mọi người giúp đỡ, mỗi lần nhập hồ sơ em như bế tắc cả vài tiếng đồng hồ.
Chân thành cảm ơn mọi người nhiều.**~**


Ở form CV mẫu bạn làm một vùng phụ sau đó lập công thức tìm kiếm (forrmat giống hệt file tổng)
Khi đó bạn chỉ cần copy giá trị từ file CV mẫu sang file tổng hợp thôi
 
Muốn nhập nhanh thì bạn fải:

(1) Cho mỗi ứng viên 1 mã duy nhất; ví dụ
Cô Vương T. Bích Phượng có đơn ngày 01 tháng 10 năm 2016 thì ta cho mã là: VBP0FA1; Trong đó 3 chữ cái đầu gắn với họ tên hồ sơ (HS) (ví dụ Dương Đức sẽ là DJF; Đỗ Đình Do sẽ là FFD)
Vị trí thứ tư là thứ tự người trùng mã trong ngày nộp HS
Chữ cái F chỉ năm; A là tháng 10 & chữ số hay chữ cái cuối chỉ ngày nộp HS

Khi nhập thì bạn cần nhập vô chí ít 2 bản cùng lúc;
Fần HS không thể đổi, hay biến đổi không đáng kể như Ngày-Tháng-Năm sinh; giới tính, số CMND,. . . . cần 1 macro để chuyển vô trang tính
Cần lấy trang khác để nhập các loại như
Gia cảnh: Mối liên hệ (Cha, con, chồng,. . . )
Quá trịnh đào tạo: . . . ..
Kinh nghiệm CT
. . . . . .
Tất cả các bảng này đều có cột ghi mã của nhân viên (Không ghi tên họ tốn thời gian)

Sơ lược vài nét & chờ thông tin từ bạn!
 
Xin chào mọi người, em là member mới, có 1 vấn đề rất nan giải mong mọi người giúp đỡ.

Tình hình là em đang làm hỗ trợ tuyển dụng cho ngân hàng, mỗi tháng em phải nhập cả trăm CV xin việc của ứng viên vào danh sách tổng hợp mất rất nhiều thời gian. Danh sách tổng hợp gồm các thông tin (Họ tên, ngày tháng năm sinh, giới tính, vị trí ứng tuyển, địa chỉ thường trú...) theo mẫu em gửi kẻm bên dưới.

Em có gửi 2 bản CV mẫu và danh sách em cần tổng hợp. Rất mong mọi người giúp đỡ, mỗi lần nhập hồ sơ em như bế tắc cả vài tiếng đồng hồ.
Chân thành cảm ơn mọi người nhiều.**~**

Chào So cool,

Có vài ý thắc mắc với bạn như sau:
1/ Về format của CV
* Nhập đầy đủ các thông tin trong các ô text hiển thị trên File thông tin (nếu có)
* Không chỉnh sửa (thêm hàng, cột) File thông tin này, HDBank không ghi nhận những thông tin của File đã bị sửa format
* Những thông tin được bôi màu vàng nhạt là thông tin ứng viên phải chọn từ list danh sách có sẵn
Yêu cầu này quả khá khó cho cả người viết CV và người tập hợp dữ liệu là bạn.
Ví dụ, phần thông tin quá trình học tập, đào tạo, gia đình, kinh nghiệm làm việc... những trường hợp có số lượng thông tin cần viết nhiều hơn số dòng của format đó thì làm sao? Chắc ứng viên phải tự cắt giảm thông tin (như bớt anh/chị/em đi chẳng hạn...)
2/ Yêu cầu là không chỉnh sửa thì nên khóa format lại, chỉ để những ô cho phép nhập thông tin.
3/ Bạn mong muốn thực hiện với những file đã có hay với những file sắp tới.
Với những file đã có thì xử lý hơi dài chút
Với sắp tới thì tôi nghĩ nên thiết kế lại format CV: Khóa format CV chỉ để các cell cho ứng viên nhập thông tin. Tạo một sheet phụ lấy toàn bộ thông tin của CV (ẩn sheet phụ luôn). Thêm một macro chép thông tin từ sheet phụ vào File tổng hợp.
 
Xin lỗi mọi người, vì cái định dạng file là của cả hệ thống thành ra em không sửa file đc, không chắc em cũng sửa cho dễ sài macro. Ứng viên cho thông tin vào mà dài quá thì vẫn để như thế thôi ạ, vẫn copy hết ra danh sách ạ, chứ không giới hạn số chữ hay kích thước ạ.

Đây toàn bộ là file bên e đã tổng hợp lại được, và cần tổng hợp lại.

Trong danh sách thì là những thông tin em cần, nhưng những thông tin nào khó và dài quá khó viết thì mọi người bỏ qua cũng đc ạ, những thông tin nào cơ bản và dễ auto vào danh sách thì giúp em với ạ. Những thông tin còn lại chưa vào đc thì em copy cũng đc ạ, đỡ đc phần nào copy past thì hay phần đó ạ. Chứ em cũng không dám mong đc auto hết, auto hết thì thành ra em lại ngồi chơi ^^!
Em cảm ơn mọi người đã chú ý và giúp đỡ e ạ :D
 
Xin lỗi mọi người, vì cái định dạng file là của cả hệ thống thành ra em không sửa file đc, không chắc em cũng sửa cho dễ sài macro. Ứng viên cho thông tin vào mà dài quá thì vẫn để như thế thôi ạ, vẫn copy hết ra danh sách ạ, chứ không giới hạn số chữ hay kích thước ạ.

Đây toàn bộ là file bên e đã tổng hợp lại được, và cần tổng hợp lại.

Trong danh sách thì là những thông tin em cần, nhưng những thông tin nào khó và dài quá khó viết thì mọi người bỏ qua cũng đc ạ, những thông tin nào cơ bản và dễ auto vào danh sách thì giúp em với ạ. Những thông tin còn lại chưa vào đc thì em copy cũng đc ạ, đỡ đc phần nào copy past thì hay phần đó ạ. Chứ em cũng không dám mong đc auto hết, auto hết thì thành ra em lại ngồi chơi ^^!
Em cảm ơn mọi người đã chú ý và giúp đỡ e ạ :D

Bạn nêu định dạng file là của cả hệ thống, nếu không thiết kế lại thì tôi đãm bảo không ai có thể giúp bạn được, ví dụ:

- Họ & Tên: Vương Thị Bich Phượng: phải có 2 vế, vế 1 là Họ & Tên: nó phải để riêng 1 Cell (vì nó là tiêu đề của sheet tổng không cần lấy dữ liệu, vế thứ 2: Vương Thị Bich Phượng là họ tên phải để riêng 1 Cell và lấy đưa vào cột B của sheet tổng.

Tương tự như vậy cho các nội dung khác.
 
Lần chỉnh sửa cuối:
Để khắc fục chuyện có người dự tuyển (NDT) có ít nhười thân & NDT khác nhiều thì ta fải làm vầy:

Trang chứa dữ liệu bất biến gồm các trường

[STT], [Họ Tên], [MaNV], [Ngày Sinh], [Fái tính], [Số CMND],. . . .
1 trang nữa để ghi quan hệ gia đình, như sau:
PHP:
MaNV    | QH | Họ Tên  | Ngày sinh, . . . 
VBP0FA1 | Cha| Võ Chai | 02/07/1955,. . . 
VBP0FA1 | Con| Hồ Thi  | 1/1/2013,. . . 
VBP0FA1 | Mẹ | Lê La   |  07/07/1957, . . .

Có như vậy thì tha hồ co dãn dữ liệu cho mọi nhân viên khác nhau
 
Xin lỗi mọi người, vì cái định dạng file là của cả hệ thống thành ra em không sửa file đc, không chắc em cũng sửa cho dễ sài macro. Ứng viên cho thông tin vào mà dài quá thì vẫn để như thế thôi ạ, vẫn copy hết ra danh sách ạ, chứ không giới hạn số chữ hay kích thước ạ.
Đây toàn bộ là file bên e đã tổng hợp lại được, và cần tổng hợp lại.
Trong danh sách thì là những thông tin em cần, nhưng những thông tin nào khó và dài quá khó viết thì mọi người bỏ qua cũng đc ạ, những thông tin nào cơ bản và dễ auto vào danh sách thì giúp em với ạ. Những thông tin còn lại chưa vào đc thì em copy cũng đc ạ, đỡ đc phần nào copy past thì hay phần đó ạ. Chứ em cũng không dám mong đc auto hết, auto hết thì thành ra em lại ngồi chơi ^^!
Em cảm ơn mọi người đã chú ý và giúp đỡ e ạ :D
Chào So cool,

Chỉ vì hai ký tự ở cuối câu (màu đỏ) mà tôi ráng làm cho bạn đây.
Bạn tải file đính kèm về, mở file rồi click vào logo HDBank, chọn Folder chứa các file thông tin của ứng viên (gom các file đó vào 1 Folder), sau đó click OK và chờ điều gì gì đó xảy ra...
Tôi chép phần Sub chính ở đây, còn các Function nhỏ thì xem trong file.
PHP:
Sub CopyCV()
Application.DisplayAlerts = False
Application.ScreenUpdating = False
Dim i As Integer, Ipath As String, iName(), lr As Long, tmp(), sh As Worksheet
Dim ssh As Worksheet
Dim dk As String: dk = ThisWorkbook.Name
Dim TTCN()
Dim HT(), rngHT As Range
Dim TK(), rngTK As Range
Dim KNLV As String, rngKN As Range, j As Integer, r As Integer
Dim email As String, DT As String
Set sh = ThisWorkbook.Sheets(1)
Ipath = GetFolder("")
If Ipath = "" Then Exit Sub
iName = GetFileList(Ipath)
For i = 1 To UBound(iName)
    If iName(i) <> dk Then
    lr = sh.Range("B65000").End(3).Row + 1
    Workbooks.Open Filename:=Ipath & "\" & iName(i), ReadOnly:=True
'1// Lay du lieu:
        For Each ssh In ActiveWorkbook.Sheets
            If ssh.Name = "HDBank" Then
            With ActiveWorkbook.Sheets("HDBank")
    '// Thông tin ca nhân:
                ReDim TTCN(1 To 6)
                TTCN(1) = Tchu(.Range("A14").Value)
                TTCN(2) = Tchu(.Range("A17").Value)
                TTCN(3) = .Range("C16").Value
                TTCN(4) = Tchu(.Range("E14").Value)
                TTCN(5) = Tchu(.Range("E15").Value)
                TTCN(6) = Tchu(.Range("A23").Value)
                email = Tchu(.Range("A25").Value)
                DT = Tchu(.Range("G25").Value)
    '// Qua trinh hoc tap:
                Set rngHT = .Range("A28: J34")
                HT = QTHT(rngHT)
    '// Kinh nghiem lam viec:
                Set rngKN = .Range("A62")
                For j = 1 To 3
                    If Len(rngKN.Offset(r).Value) > 4 Then
                        KNLV = KNLV & KN(rngKN.Offset(r)) & Chr(10)
                        r = r + 10
                    End If
                Next j
                KNLV = Left(KNLV, Len(KNLV) - 1)
    '// Thông tin tham khao:
                Set rngTK = .Range("A143:A146")
                TK = TTTK(rngTK)
            End With
    '2// Ghi du lieu:
            sh.Range("B" & lr).Resize(1, 6).Value = TTCN
            sh.Range("B" & lr).Offset(0, 6).Resize(1, 3).Value = HT
            sh.Range("K" & lr).Value = KNLV
            sh.Range("K" & lr).Offset(0, 1).Value = email
            sh.Range("K" & lr).Offset(0, 2).NumberFormat = "@"
            sh.Range("K" & lr).Offset(0, 2).Value = DT
            sh.Range("P" & lr).Offset(0, 4).NumberFormat = "@"
            sh.Range("P" & lr).Resize(1, 4).Value = TK
            sh.Range("A" & lr).Value = sh.Range("B65000").End(3).Row - 6
            End If
        Next ssh
        Workbooks(iName(i)).Close
    End If
Next i
With sh.Range("A7:S" & sh.Range("B65000").End(3).Row)
    .RowHeight = 115
    .Borders.LineStyle = xlContinuous
    .VerticalAlignment = xlTop
    .WrapText = True
End With
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
 

File đính kèm

Góp ý thêm:

1/ Sheet thông tin ứng viên và sheet tổng nên để chung 1 File.

2/ Dùng sheet thông tin ứng viên nhập liệu vào sheet tổng và lưu nó thành 1 File cho từng ứng viên (theo tôi thì chẳng cần lưu cũng được). Chỉ cần dựa vào nội dung sheet tổng sẽ truy vấn lại thông tin từng ứng viên thì việc theo dõi sẽ thuận tiện hơn nhiều, nếu làm như kiểu bạn phải lưu File của từng ứng viên (theo dõi chẳng bao lâu sẽ đầy ổ dĩa) và việc tìm kiếm File sẽ phức tạp.

3/ T
heo tôi thì nên thêm cột mã ứng viên, dựa vào mã ứng viên để truy vấn lại thông tin từng ứng viên.

 
Góp ý thêm:

1/ Sheet thông tin ứng viên và sheet tổng nên để chung 1 File.

2/ Dùng sheet thông tin ứng viên nhập liệu vào sheet tổng và lưu nó thành 1 File cho từng ứng viên (theo tôi thì chẳng cần lưu cũng được). Chỉ cần dựa vào nội dung sheet tổng sẽ truy vấn lại thông tin từng ứng viên thì việc theo dõi sẽ thuận tiện hơn nhiều, nếu làm như kiểu bạn phải lưu File của từng ứng viên (theo dõi chẳng bao lâu sẽ đầy ổ dĩa) và việc tìm kiếm File sẽ phức tạp.

3/ T
heo tôi thì nên thêm cột mã ứng viên, dựa vào mã ứng viên để truy vấn lại thông tin từng ứng viên.

Anh ơi. Anh xem lại dùm mấy ý này:
1/ Nếu gộp sheet thông tin ứng viên (trong file thông tin do ứng viên gửi tới) vào sheet tổng hợp thành 1 FILE thì kích FILE đó rất lớn, vài trăm sheets / tháng.
Chắc là để chung 1 FOLDER chứ ạ?

2/
Dùng sheet thông tin ứng viên nhập liệu vào sheet tổng
Bạn chủ topic đang cần hỗ trợ cái này (lý do: Thực hiện cho nhiều ứng viên)
Công việc là lấy thông tin từ File thông tin (ứng viên gửi tới) vào file tổng hợp. Lưu lại để theo dõi cho mỗi đợt/ tháng tuyển dụng.
Còn File thông tin ứng viên gửi tới sẽ quản lý theo từng đợt/ tháng (lưu vào 1 Folder nào đó), tên File theo Format cho trước ([khuvuc]_CV [vitri TD] CN_[hoten]), nếu có bị trùng tên file thì khi lưu sẽ hiệu chỉnh.
 
Anh ơi. Anh xem lại dùm mấy ý này:
1/ Nếu gộp sheet thông tin ứng viên (trong file thông tin do ứng viên gửi tới) vào sheet tổng hợp thành 1 FILE thì kích FILE đó rất lớn, vài trăm sheets / tháng.
Chắc là để chung 1 FOLDER chứ ạ?

Bạn chủ topic đang cần hỗ trợ cái này (lý do: Thực hiện cho nhiều ứng viên)
Công việc là lấy thông tin từ File thông tin (ứng viên gửi tới) vào file tổng hợp. Lưu lại để theo dõi cho mỗi đợt/ tháng tuyển dụng.
Còn File thông tin ứng viên gửi tới sẽ quản lý theo từng đợt/ tháng (lưu vào 1 Folder nào đó), tên File theo Format cho trước ([khuvuc]_CV [vitri TD] CN_[hoten]), nếu có bị trùng tên file thì khi lưu sẽ hiệu chỉnh.

1/ Trả lời (1):
File thông tin ứng viên gửi tới là File mẫu do đơn vị thiết kế thống nhất và ứng viên chỉ việc điền thông tin vào và gửi đến (chứa đến 100.000)

2/ Trả lời (2):
Việc là lấy thông tin từ File thông tin (ứng viên gửi tới) vào sheet tổng hợp: Tạo 1 nút lấy thông tin của ứng viên vào 1 sheet mặc định với tên là tên sheet của File mẫu, từ sheet mặc định này lấy dữ liệu vào sheet tổng.

Sau khi lấy thông tin xong thì xóa các File thông tin (ứng viên gửi tới), cần xem lại thông tin của ứng viên thì dựa vào mã của ứng viên đó mà truy vấn vào sheet mặc định, với kiểu làm này thì dù cho sheet tổng có chứa đến 100.000 dòng thông tin của ứng viên thì dung lượng File cũng đâu có là bao nhiêu (còn làm theo kiểu của chủ Topic chứa đến 100.000 File chắc máy tính không còn chỗ chứa).

(Chắc là để chung 1 FOLDER), có thể lấy File thông tin (ứng viên gửi tới) ở bất kỳ chỗ nào trong máy tính vào sheet tổng hợp.
 
Lần chỉnh sửa cuối:
1/ Trả lời (1):
File thông tin ứng viên gửi tới là File mẫu do đơn vị thiết kế thống nhất và ứng viên chỉ việc điền thông tin vào và gửi đến (chứa đến 100.000)

2/ Trả lời (2):
Việc là lấy thông tin từ File thông tin (ứng viên gửi tới) vào sheet tổng hợp: Tạo 1 nút lấy thông tin của ứng viên vào 1 sheet mặc định với tên là tên sheet của File mẫu, từ sheet mặc định này lấy dữ liệu vào sheet tổng.

Sau khi lấy thông tin xong thì xóa các File thông tin (ứng viên gửi tới), cần xem lại thông tin của ứng viên thì dựa vào mã của ứng viên đó mà truy vấn vào sheet mặc định, với kiểu làm này thì dù cho sheet tổng có chứa đến 100.000 dòng thông tin của ứng viên thì dung lượng File cũng đâu có là bao nhiêu (còn làm theo kiểu của chủ Topic chứa đến 100.000 File chắc máy tính không còn chỗ chứa).

(Chắc là để chung 1 FOLDER), có thể lấy File thông tin (ứng viên gửi tới) ở bất kỳ chỗ nào trong máy tính vào sheet tổng hợp.

Anh ơi. Những điều anh diễn giải ở trên đúng là những gì bạn chủ topic đang thực hiện (có khác ở chỗ: Không quản lý thông tin ứng viên bằng Mã), còn việc xoá File thông tin (do ứng viên gửi đến) có hay không thì không rõ (chắc sau mỗi đợt tuyển dụng sẽ xoá đi).
Chắc có chút nhầm giữa File và Folder, vì em thấy anh viết ở bài #9:
1/ Sheet thông tin ứng viên và sheet tổng nên để chung 1 File.
Bạn chủ topic đang cần hỗ trợ mục này (như anh nói ở trên):
lấy thông tin từ File thông tin (ứng viên gửi tới) vào sheet tổng hợp: Tạo 1 nút lấy thông tin của ứng viên vào 1 sheet mặc định với tên là tên sheet của File mẫu, từ sheet mặc định này lấy dữ liệu vào sheet tổng.
 
Bài 6 tôi nêu vầy:

.........., nếu không thiết kế lại thì tôi đãm bảo không ai có thể giúp bạn được, ví dụ:

- Họ & Tên: Vương Thị Bich Phượng: phải có 2 vế, vế 1 là Họ & Tên: nó phải để riêng 1 Cell (vì nó là tiêu đề của sheet tổng không cần lấy dữ liệu, vế thứ 2: Vương Thị Bich Phượng là họ tên phải để riêng 1 Cell và lấy đưa vào cột B của sheet tổng.

Bài 11 tôi chỉ diễn giải lại nội dung thôi, nhưng chỉ khác là lấy dữ liệu từ File thông tin (ứng viên gửi tới), tạo 1 nút lấy thông tin của ứng viên vào 1 sheet mặc định với tên là tên sheet của File mẫu, từ sheet mặc định này lấy dữ liệu vào sheet tổng.

Vì vậy phải thiết kế lại cái mẫu của File thông tin (ứng viên gửi tới), thì việc lấy dữ liệu vào sheet tổng mới được thuận tiện.
 
Lần chỉnh sửa cuối:
Web KT

Bài viết mới nhất

Back
Top Bottom