-
10-17-2013, 05:29 PM #1
Silver member
- Ngày tham gia
- Feb 2016
- Bài viết
- 3
Cập nhật dữ liệu từ file excel khác,
Mong các members giúp đỡ cho trường hợp sau:
- Tôi có 2 file excel: E1 và E2.
- Làm sao để số liệu ở E2 cập nhật tự động theo E1 với điều kiện: địa chỉ ô dữ liệu thay đổi ở E1 là tuyệt đối; các ô trên E2 cập nhật dữ liệu tự động phải nằm trên cùng một cột và khác dòng (các dòng lấy số liệu lần lượt).
- Ví dụ: thời điểm t1: ô A1 của E1 có dữ liệu là 2 --> dữ liệu ô B1 trên E2 là 2; Thời điểm khác t2: ô A1 của E1 có dữ liệu là 3 --> dữ liệu ô B2 trên E2 là 3 ...
Rất mong sự chung tay giúp đỡ của các members, tks.View more random threads:
- Lọc số đầu và số cuối
- Tô màu cho các ô
- Tìm kiếm và sắp xếp dữ liệu trong file Excel
- đánh số thứ tự trong excel
- dồn các file riêng biệt vào một sheet
- chuyển dấu phẩy thành chấm?
- Tính thu, chi, tồn của sổ quỹ trong 1 khoảng thời gian là bao nhiêu?
- Tại sao lại tính toán chậm?
- Học làm bctc
- Tách họ tên trong Excel không cần dùng hàm
-
10-22-2013, 06:57 PM #2
Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 5
Ðề: Cập nhật dữ liệu từ file excel khác,
Gửi bởi nhuson03
-
10-23-2013, 04:17 PM #3
Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Cập nhật dữ liệu từ file excel khác,
Gửi bởi be09
-
11-11-2013, 04:35 PM #4
Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 1
Ðề: Cập nhật dữ liệu từ file excel khác,
Link ???? Chủ hãng chắc loại chủ xị , Kế toán có thua xòng bài thì tự ý thay đổi
Dùng Merge hoặc Copy without Open workbook
---------- Post added at 09:35 ---------- Previous post was at 09:08 ----------
Vi dụ tôi có 1 file Book2.xlsx
Bây giờ tôi muốn lấy data trong Book2 vào trong file của tôi Copy 1 doạn trong Book2 từ A1 đến D10
Sub CopyFromClosedWB(strSourceWB As String, _
strSourceWS As String, strSourceRange As String, _
rngTarget As Range)
Dim wb As Workbook
Application.ScreenUpdating = False ' turn off the screen updating
Application.StatusBar = "Copying data from " & strSourceWB & "..."
On Error Resume Next ' ignore errors
' open the source workbook, read only
Set wb = Workbooks.Open(strSourceWB, True, True)
On Error GoTo 0 ' stop when errors occur
If Not wb Is Nothing Then ' opened the workbook
On Error Resume Next ' ignore errors
With wb.Worksheets(strSourceWS).Range(strSourceRange)
.Copy rngTarget
End With
On Error GoTo 0 ' stop when errors occur
wb.Close False ' close the source workbook without saving changes
Set wb = Nothing ' free memory
End If
Application.StatusBar = False ' reset status bar
Application.ScreenUpdating = True ' turn on the screen updating
End Sub
Sub TestCopyFromClosedWB()
CopyFromClosedWB "C:-/Test\Excel\example\Book2.xls", _
"Sheet1", "A110", Range("A1")
End Sub
-
01-18-2014, 03:45 AM #5
Silver member
- Ngày tham gia
- Sep 2015
- Bài viết
- 1
Ðề: Cập nhật dữ liệu từ file excel khác,
Gửi bởi nhuson03
Tương tự như các sản phẩm bao cao su bình thường, thay vì được sinh sản bằng chất liệu mủ cao su tự nhiên thì bcs đôn dên lại có chất liệu silicone y tế đảm bảo an toàn cho da, không gây kích ứng khi...
Bao đôn dên có rung đầu nối dài thêm chim của đàn ông thêm 6cm