Chèn các ô đã sao chép excel nhiều lần

S

ScottỞTexas

hội đồng quản trị thường xuyên

JoinedOct 28, 2003Messages175

  • 19 Tháng mười hai 2017
  • #1

Tôi đã sao chép một dải ô và tôi muốn vượt qua dải ô đó nhiều lần trong mỗi trang tính [chèn dải ô 9 hàng] và di chuyển nội dung hiện tại xuống dưới mỗi lần dán. Vòng lặp của tôi hoạt động một lần. Sau đó, nó sẽ chỉ chèn một hàng, như thể nó đã quên phạm vi đã sao chép. Làm cách nào để tôi có thể chèn phạm vi mỗi lần qua vòng lặp?

Mã.

intRow = 52
Set wksht = Sheets["Structures1"]
    Set SourceRng = wksht.Rows["44:51"]
    SourceRng.Copy
    For i = 1 To 4
        wksht.Rows[intRow & ":" & intRow].Insert Shift:=xlDown
        intRow = intRow + 8
    Next
    Application.CutCopyMode = False


Thanks

 

lông tơ

MrExcel MVP, Người điều hành

JoinedJun 12, 2014Messages79,717Phiên bản Office

  1. 365
Nền tảng
  1. các cửa sổ

  • 19 Tháng mười hai 2017
  • #2

Còn cái này thì sao

Mã số

   Set wksht = Sheets["Structures1"]
   Set SourceRng = wksht.Rows["44:51"]
   wksht.Rows[52].Resize[32].EntireRow.Insert Shift:=xlDown
   SourceRng.Copy wksht.Rows[IntRow].Resize[8 * 4]
   Application.CutCopyMode = False

 

Trong vài thập kỷ qua, Microsoft đã phát triển vượt bậc và các sản phẩm tuyệt vời của hãng cũng vậy. Microsoft Excel là một trong những sản phẩm đã phát triển vượt bậc. Nó có các tính năng và tùy chọn tuyệt vời để giúp công việc của bạn dễ dàng hơn. Nhưng một tính năng mà nó thiếu là khả năng chèn nhiều hàng. Tùy chọn chèn mặc định mà Excel có cho phép bạn chỉ chèn một hàng tại một thời điểm

Điều này có thể rất khó chịu trong trường hợp bạn phải chèn nhiều hàng trong bảng tính của mình. Và đây là những gì tôi sẽ viết ngày hôm nay. Trong bài đăng này, tôi sẽ trình bày một số cách cho phép bạn chèn nhiều hàng

Mục lục

  • Phương pháp 1 – Bằng cách sử dụng chức năng lặp lại của excel
  • Phương pháp 2 – Bằng cách sử dụng chức năng chèn
  • Phương pháp 3 – Bằng cách sử dụng chức năng chèn ô đã sao chép
  • Cách 4 – Lập trình chèn nhiều hàng trong excel

Phương pháp 1 – Bằng cách sử dụng chức năng lặp lại của excel

Đây là cách đơn giản nhất để chèn nhiều hàng vào bảng tính excel của bạn. Trong phương pháp này, trước tiên chúng tôi sẽ thêm một hàng theo cách thủ công vào trang tính excel, sau đó lặp lại thao tác đó nhiều lần. Thực hiện theo các bước dưới đây để sử dụng phương pháp này

  • Mở bảng tính của bạn và trước hết hãy chèn một hàng vào bảng excel của bạn theo cách thủ công
  • Sau đó, chỉ cần nhấn liên tục phím “F4” trên bàn phím của bạn, cho đến khi số lượng hàng cần thiết được chèn vào
  • Điều này sẽ lặp lại hành động cuối cùng của bạn và các hàng sẽ được thêm vào

Phương pháp 2 – Bằng cách sử dụng chức năng chèn

Trong phương pháp này, chúng tôi sẽ sử dụng một tính năng ẩn mà excel cung cấp để chèn nhiều hàng vào trang tính của bạn. Thực hiện theo các bước dưới đây để sử dụng phương pháp này

  • Mở bảng tính của bạn và chọn số hàng bạn muốn chèn vào trang tính của mình. Không có vấn đề gì nếu các hàng trống nhưng chúng phải bao gồm vị trí mà bạn muốn thực hiện thao tác chèn

  • Bây giờ, chỉ cần nhấp chuột phải vào bất kỳ đâu trong phạm vi đã chọn trước đó và chọn tùy chọn 'Chèn'
  • Bây giờ excel sẽ hỏi bạn chuyển các ô xuống dưới hay dịch chuyển chúng sang phải. Chọn tùy chọn 'Shift Cells Down' và nhiều ô sẽ được chèn vào vị trí

Phương pháp 3 – Bằng cách sử dụng chức năng chèn ô đã sao chép

Trong phương pháp này, chúng ta sẽ tận dụng lợi thế của chức năng “Chèn các ô đã sao chép” mà excel có. Thực hiện theo các bước dưới đây để sử dụng phương pháp này

  • Trước hết, hãy chọn nhiều hàng trong bảng tính của bạn, ý tôi là nhiều hàng phải bằng với số hàng bạn muốn chèn
  • Tiếp theo, sao chép các hàng này và cuộn đến nơi bạn muốn chèn nhiều hàng

  • Nhấp chuột phải và chọn tùy chọn 'Chèn các ô đã sao chép' và thao tác này sẽ chèn nhiều hàng vào vị trí đó

Cách 4 – Lập trình chèn nhiều hàng trong excel

Mặc dù phương pháp này phức tạp hơn một chút so với ba phương pháp đầu tiên, nhưng phương pháp này vẫn có thể được sử dụng nếu bạn nghiêng về phía viết mã hơn. Thực hiện theo các bước dưới đây để sử dụng phương pháp này

  • Điều hướng đến tab 'Chế độ xem' trên dải băng trên cùng, nhấp vào nút 'Macro'
  • Bây giờ hãy nhập tên cho macro nói “Insert_Lines” [không có dấu ngoặc kép] và nhấn nút tạo
  • Tiếp theo, trình chỉnh sửa VBA sẽ được mở, chỉ cần dán mã macro bên dưới vào sau dòng đầu tiên

Sub Insert_Lines[]
Dim CurrentSheet As Object
' Loop through all selected sheets.
For Each CurrentSheet In ActiveWindow.SelectedSheets
' Insert 5 rows at top of each sheet.
CurrentSheet.Range["A20:A69"].EntireRow.Insert
Next CurrentSheet
End Sub

  • Bây giờ đến điều quan trọng, trong macro ở trên, phạm vi là [“A20. A69”]. Tham số đầu tiên tôi. e. A20 cho biết vị trí từ nơi bạn muốn chèn các hàng và tham số thứ hai. i. e. A69 là số lượng hàng được chèn cộng với vị trí bắt đầu và trừ đi 1 [ví dụ:. Nếu bạn muốn chèn 50 hàng bắt đầu từ A20 thì tham số thứ hai của phạm vi phải là [50+20-1], vì vậy phạm vi sẽ là [“A20. A69”]]
  • Sau khi thêm mã, bạn có thể nhấn phím “F5” và mã sẽ chèn các hàng cần thiết
  • Macro này được tham khảo từ bài viết của Microsoft. http. //ủng hộ. Microsoft. com/kb/291305

Vì vậy, đây là một vài phương pháp để chèn nhiều hàng trong excel. Nếu bạn biết một số cách khác thì hãy bình luận bên dưới

Chủ Đề