Công thức excel cho việc bảo lưu dữ liệu (1 người xem)

[huele26]

Chào anh(chị)
Nhờ anh/chị giúp dùm e bt excel theo file đính kèm
nội dung:
e có 1 bảng dữ liệu gốc nhân viên mới vào làm & 1 bảng cập nhật theo bộ phận. e muốn
khi e chọn mã cho từng phòng ban ở bảng "ds cập nhật theo phong ban" thi tất cả dữ liệu theo mã phòng ban đó từ bảng "dữ liệu gốc" tự nhảy sang sheet "ds cập nhật theo phong ban", do e không biết dùng công thức gì nên e nhờ anh chị giải bt này giúp e dùm & ghi hướng đi để e bít sử dụng
attch file đính kèm
cám ơn anh(chị) nhiều!
anh(chị) gửi qua mail của e huele26@gmail.com

 

[Let'GâuGâu]

Chào anh(chị)
Nhờ anh/chị giúp dùm e bt excel theo file đính kèm
nội dung:
e có 1 bảng dữ liệu gốc nhân viên mới vào làm & 1 bảng cập nhật theo bộ phận. e muốn
khi e chọn mã cho từng phòng ban ở bảng "ds cập nhật theo phong ban" thi tất cả dữ liệu theo mã phòng ban đó từ bảng "dữ liệu gốc" tự nhảy sang sheet "ds cập nhật theo phong ban", do e không biết dùng công thức gì nên e nhờ anh chị giải bt này giúp e dùm & ghi hướng đi để e bít sử dụng
attch file đính kèm
cám ơn anh(chị) nhiều!
anh(chị) gửi qua mail của e huele26@gmail.com

nếu cùng một phòng thì data bên sheet dữ liệu nằm kề nhau như trong file fải ko,
nếu đúng vậy thì cthức này
B3=IF(ROW(1:1)<=COUNTIF('DU LIEU'!$A$3:$A$22,$A$1),VLOOKUP($A$1,OFFSET('DU LIEU'!$A$3:$G$22,MATCH($A$1,'DU LIEU'!$A$3:$A$22,0)+ROW(1:1)-2,),COLUMN(B1),0),"")

nếu nằm lung tung thì cthức phức tạp hơn một tí

 

[huele26]

Hi
Ngoài công thức trên, e còn nghe mọi người dùng Macro để thuận tiện hơn,
Nếu anh(chị) biết chỉ e dùng macro thử
thanks!

 

[Ba Tê]

Hi
Ngoài công thức trên, e còn nghe mọi người dùng Macro để thuận tiện hơn,
Nếu anh(chị) biết chỉ e dùng macro thử
thanks!

Muốn macro thì có đây. Thay đổi E2 là macro chạy.

 

[hoamua38]

Các bác trong diễn đàn giúp em với
em có số liệu như sau:
52
120
95
26
220
Vậy làm thế nào để lọc được số 2 trong toàn bộ số liệu trên mà không bị sót, em đã thử lọc bằng auto filter mà không được.

 

[huele26]

Hi,
sao e thay đổi ô E2 nhưng dữ liệu vẫn như cũ, hình như marco không chạy thì fai
nhân tiện hướng dẫn ghi công thức marco dùng e làm sao tạo được file đó,
Thanks!

 

[Ba Tê]

Hi,
sao e thay đổi ô E2 nhưng dữ liệu vẫn như cũ, hình như marco không chạy thì fai
nhân tiện hướng dẫn ghi công thức marco dùng e làm sao tạo được file đó,
Thanks!

Bạn lưu file kiểu .xls hoặc .xlsm code mới chạy, .xlsx thì code điếc luôn.
Khi mở file nhớ Enable Macros.

 

[nmhung49]

Hi,
sao e thay đổi ô E2 nhưng dữ liệu vẫn như cũ, hình như marco không chạy thì fai
nhân tiện hướng dẫn ghi công thức marco dùng e làm sao tạo được file đó,
Thanks!

Có thể bạn chưa set lại chế độ macro Bạn vào Excel Options, chọn thẻ Trust Center > chọn Trust Center Setting, bạn chọn Macro Setting > Chon "Disable all macro with notification"
Muốn làm được code như vậy mở file đó lên nhấn Alt+F11 sẽ thấy đoạn code rồi nghiên cứu lần trên diễn đàn sẽ làm được

 

[huele26]

thanks anh(chị) nhìu

 

[huele26]

Hi
e đọc đoạn code đó rồi có vài chỗ e không hiểu, e ko biết anh(chị) thực hiện các bước đó như thế nào để có thể ra được đoạn code đó. anh(chị) có thể chỉ dẫn e thêm được không? e mún làm lại như anh(chị) nhưng không làm được.
e có ghi lại đoạn code theo file excel trên nhờ mọi người chỉ giúp.
Private Sub Worksheet_Change(ByVal Target As Range)
Dim sArr(), dArr(), I As Long, J As Long, K As Long, Dk As String
If Target.Address = "$E$2" Then
With Sheets("Du Lieu")
sArr = .Range(.[C3], .[C65000].End(xlUp)).Resize(, 5).Value
End With
ReDim dArr(1 To UBound(sArr, 1), 1 To 6)
Dk = UCase(Target)
For I = 1 To UBound(sArr, 1)
If UCase(sArr(I, 3)) = Dk Then
K = K + 1: dArr(K, 1) = K
For J = 1 To 5
dArr(K, J + 1) = sArr(I, J)
Next J
End If
Next I
[B4:G1000].ClearContents
[B4].Resize(K, 6).Value = dArr
End If
End Sub

 

[bibonht]

Tự động nhảy dữ liệu kiểu này rất hay nhưng dùng macro thì mình chịu chết rồi