Chèn hàng (10 người xem)

[cuonghoa176]

Các Bác giúp tôi mỗi hộ gđ chèn thêm 2 hàng để bổ xung trẻ mới sinh...(hoặc hướng dẫn cách làm...) Tôi xin cảm ơn!

https://drive.google.com/file/d/0ByrRyDPlHTh9aGNRNnluQm5ZcmM/view?usp=sharing

 

[ChanhTQ@]

Mình chả đọc được file trong đường dẫn bạn đưa, thật tiếc!

& bạn có thể tham khảo nơi đây: http://danketoan.com/threads/cac-cach-them-dong-moi-vo-1-csdl-co-so-du-lieu-da-san.182915/page-3 - Cơ man cách thêm dòng!

 

[Ngoai Thanh]

Các Bác giúp tôi mỗi hộ gđ chèn thêm 2 hàng để bổ xung trẻ mới sinh...(hoặc hướng dẫn cách làm...) Tôi xin cảm ơn!

https://drive.google.com/file/d/0ByrRyDPlHTh9aGNRNnluQm5ZcmM/view?usp=sharing

Do dữ liệu của bạn đến gần 10.000 dòng nên mình chuyển dữ liệu sang sheet khác để sử lý theo yêu cầu . Đồng thời giữ nguyên dữ liệu gốc để đối chiếu .

 

[cuonghoa176]

Bác Thanh mới...nghe danh nhưng mà giỏi quá..! phiền bác vụ này nữa: Việc xử lý dữ liệu coi như xong, xóa bỏ các dòng trống. Giờ là kết xuất mỗi bản ra 1 file riêng (theo mẫu chung) để nạp vào hệ thống (pcgd.moet...) Thank Bác!

 

[Ngoai Thanh]

Bác Thanh mới...nghe danh nhưng mà giỏi quá..! phiền bác vụ này nữa: Việc xử lý dữ liệu coi như xong, xóa bỏ các dòng trống. Giờ là kết xuất mỗi bản ra 1 file riêng (theo mẫu chung) để nạp vào hệ thống (pcgd.moet...) Thank Bác!

Bạn cẩn thận không không khen thế mũi mình nổ cái "Bụp" thì xong . Còn kết xuất thế nào phải có file hoặc yêu cầu cụ thể chứ ?

 

[cuonghoa176]

Chính là file trên đấy Bác ơi..Mỗi bản (thôn) ra 1 file riêng, chỉ giữ lấy mấy hàng tiêu đề đó thôi.

 

[Ngoai Thanh]

Chính là file trên đấy Bác ơi..Mỗi bản (thôn) ra 1 file riêng, chỉ giữ lấy mấy hàng tiêu đề đó thôi.

Vậy lọc theo bàn gốc, hay bản đã chèn dòng ? Lọc ra sheet khác hay sang workbooks khác ?

 

[cuonghoa176]

Giờ lấy bản đã chèn dòng. sang workbooks khác. Lấy tên workbooks là tên bản, đặt tất vào 1 thư mục.

Các dòng trống đã chèn ở bản nào tôi đã cho tên bản vào rồi, chỉ việc lọc ra thôi.

https://drive.google.com/file/d/0ByrRyDPlHTh9eHR3czNvd2Q4cTg/view?usp=sharing

 

[Ngoai Thanh]

Giờ lấy bản đã chèn dòng. sang workbooks khác. Lấy tên workbooks là tên bản, đặt tất vào 1 thư mục.

Các dòng trống đã chèn ở bản nào tôi đã cho tên bản vào rồi, chỉ việc lọc ra thôi.

https://drive.google.com/file/d/0ByrRyDPlHTh9eHR3czNvd2Q4cTg/view?usp=sharing

Lần sau bạn nên cân nhắc tất cả yêu cầu trước khi nhờ , để người giúp làm luôn, khỏi phải sửa . Hiện tại mình đã giúp bạn lọc tất cả các bản và sắp xếp theo Tiêu đề của từng bản . Ngoài ra một sheet lọc bất kỳ Bản nào để in hoặc theo dõi . Bởi đằng nào bạn cũng chỉ xem được một sheet, một lần .

 

[cuonghoa176]

Bác Thanh ơi, như bác nói thì chuẩn luôn nhưng...bác cho e xin cái file bác đã làm với...

 

[Ngoai Thanh]

Bác Thanh ơi, như bác nói thì chuẩn luôn nhưng...bác cho e xin cái file bác đã làm với...

Ồ , xin lỗi ! Lúc trưa mình tải lên rõ ràng đã thây nó , mà giờ thấy bạn kêu mới xem lại thì không có . Chà ! nó ghét mình rồi .

 

[Ngoai Thanh]

Vẫn không được, mình tải lại !

 

[Ngoai Thanh]

Mình tải lần nữa , nếu không được , chắc do file nặng .

 

[Ngoai Thanh]

Nhờ xếp xóa mấy bài thừa do không tải được file lên !
Lâu rồi không phải tải lên google driver , chả biết được không nữa :
https://drive.google.com/file/d/0B0nZ2IJwdQTfYmM5NFlBUWoxNTg/view?usp=sharing

 

[cuonghoa176]

Nhìn mấy cái code của Bác mà thấy...hoa cả mắt??! Bác đã học VBA như thế nào vậy Bác, e cũng muốn học nhưng chốn e chẳng có thầy mà học..

 

[Ngoai Thanh]

Nhìn mấy cái code của Bác mà thấy...hoa cả mắt??! Bác đã học VBA như thế nào vậy Bác, e cũng muốn học nhưng chốn e chẳng có thầy mà học..

Trời ơi ! đối với VBa mình chỉ là mới bắt đầu . Bạn muốn học VBA thì GPE này là nơi tập trung cao thủ toàn quốc rồi . Bạn cứ các bậc tiền nhân của GPE mà theo , các bài viết của các thày như : Thày NDU, PTM, Batê, Con cò già, quang hải , Hoàng trọng Nghĩa, Hữu thắng , Sa QD , Chanh TQ ...Hải yến, Nguyễn duy Tuân, Phan tự Hướng , Nghĩa phúc ...và một số bạn trẻ thường xuyên xuất hiện trên diễn đàn...Cứ đọc diết... rồi nó vỡ ra dần dần . Nó như ta lúc còn bé thôi, đầu tiên tập ngồi, sau tập bò, sau tập đứng, rồi tập đi, tập chạy, tập nhảy .... Nếu chưa chi đã tập nhẩy thì không cẩn thận ngã vỡ đầu mà còn không dễ nản . Nói bấy nhiêu thôi không thành "thày đồ"mất ...chúc bạn cố gắng, thành công .

 

[cuonghoa176]

Em muốn tách Sheet "1 BAN" ra 1 Sheet mới với Name là E1 mục đích là mỗi bản 1 Sheet, Bác sửa hộ e với..

Sub TACH()
Sheets("1 BAN").Select
Sheets("1 BAN").Copy After:=Sheets(3)
Cells.Select
Range("AH4").Activate
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
ActiveSheet.Name = Sheets("1 BAN").[E1]
Sheets("1 BAN").Select
Range("E1").Select
End Sub

 

[seikoqn]

Em muốn tách Sheet "1 BAN" ra 1 Sheet mới với Name là E1 mục đích là mỗi bản 1 Sheet, Bác sửa hộ e với..

Sub TACH()
Sheets("1 BAN").Select
Sheets("1 BAN").Copy After:=Sheets(3)
Cells.Select
Range("AH4").Activate
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
ActiveSheet.Name = Sheets("1 BAN").[E1]
Sheets("1 BAN").Select
Range("E1").Select
End Sub

Lập topic mới và nói rõ yêu cầu ra!