Chuyển số của một hàng và cột của một sheet trong Workbook này qua Workbook khác

[nhungboo]

Em có hai Workbook , em muốn chuyển số của một hàng và những cột của một sheet trong Workbook kia qua Workbook nay ( ví dụ như : Hàng 65, Cột C,D, E,H chuyển sang hàng 48 cột D,E,G,H của Workbook kia)
Mong các anh chị chỉ giúp. Cám ơn nhiều

_________________________

Lần sau bạn nhớ post bài đúng vị trí và đặt tên chủ đề cho rõ ràng nhé!

 

[BNTT]

Nếu chỉ là số như bạn nói, thì chỉ cần copy rồi paste thôi.

 

[salam]

ý của bạn có phải là khi copy sang sheet mà số của ròng hay cột không thay đổi như ta dùng lệnh cắt không?

 

[chibi]

Khi dùng copy-paste thì chỉ chuyển C,D,E,H sang D,E,F,G.
Bạn có thể dùng code sau:

Workbooks("Book này").Sheets("Sheet này").Range("D48").Value = _
    Workbooks("Book kia").Sheets("Sheet kia").Range("C65").Value

 

[kelvin]

Khi dùng copy-paste thì chỉ chuyển C,D,E,H sang D,E,F,G.
Bạn có thể dùng code sau:

Workbooks("Book này").Sheets("Sheet này").Range("D48").Value = _
    Workbooks("Book kia").Sheets("Sheet kia").Range("C65").Value

Để giải quyết xong bài toán nầy..cho xếp thì cách nầy ok. Khi rảnh rỗi, nếu "em yêu.. ngâm cứu VBA" thử dùng Areas, Union xem sao:

Sub thu23() ' ok
Dim RangetoUse As Range, DestRng As Range
Dim SingleArea As Range
Set RangetoUse = Worksheets("Sheet2").Range("a1:a3,c1:c3")
Set DestRng = Worksheets("Sheet2").Range("d1, f1")
Dim i As Integer
 i = 1
 
For Each SingleArea In RangetoUse.Areas
         SingleArea.Copy DestRng.Areas(i)
         i = i + 1
Next
End Sub

 

[quynho]

Để giải quyết xong bài toán nầy..cho xếp thì cách nầy ok. Khi rảnh rỗi, nếu "em yêu.. ngâm cứu VBA" thử dùng Areas, Union xem sao:

Sub thu23() ' ok
Dim RangetoUse As Range, DestRng As Range
Dim SingleArea As Range
Set RangetoUse = Worksheets("Sheet2").Range("a1:a3,c1:c3")
Set DestRng = Worksheets("Sheet2").Range("d1, f1")
Dim i As Integer
 i = 1
 
For Each SingleArea In RangetoUse.Areas
         SingleArea.Copy DestRng.Areas(i)
         i = i + 1
Next
End Sub

mà sử dụng đoạn code này,past vào chỗ nào nhỉ?nói rõ hơn đc kô

 

[voicon]

mình ko hiểu rõ về vấn đề này lắm. tại mình cũng đag bắt đầu học môn kế toán trên máy mà, mong các anh chị giúp mình với...mình muốn học tốt môn kt trên máy thì nên tham khảo tài liệu sơ đẳng ở đâu??thak