Copy từ cột a dán vào cột b

[youkosuk]

Mình có cái danh mục tên công ty và từng kỳ khoản nằm trền cùng mộ cột, bây giờ mình muốn copy tên công ty dán qua một cột khác, nhưng phải nằm tưng ứng với kỳ khoản, công ty đó có bao nhiêu kỳ khoản thì dán tên công ty đó vào bấy nhiêu dòng ngang bằng với kỳ khoản.

Giúp mình với, mình làm thủ công khổ quá, mà lại hay bị nhầm, có cách nào làm nhanh mà không bị nhầm không. Các bạn giúp mình với.

Xin cám ơn.

 

[Ba Tê]

Mình có cái danh mục tên công ty và từng kỳ khoản nằm trền cùng mộ cột, bây giờ mình muốn copy tên công ty dán qua một cột khác, nhưng phải nằm tưng ứng với kỳ khoản, công ty đó có bao nhiêu kỳ khoản thì dán tên công ty đó vào bấy nhiêu dòng ngang bằng với kỳ khoản.

Giúp mình với, mình làm thủ công khổ quá, mà lại hay bị nhầm, có cách nào làm nhanh mà không bị nhầm không. Các bạn giúp mình với.

Xin cám ơn.

Tại ô B8 Bạn nhập công thức sau rồi kéo xuống tất cả các dòng dưới:

=IF(LEFT(A8;4)="C.ty";"";IF(LEFT(A7;4)="C.ty";A7;B8))

 

[huuthang_bd]

Tại ô B8 Bạn nhập công thức sau rồi kéo xuống tất cả các dòng dưới:

=IF(LEFT(A8;4)="C.ty";"";IF(LEFT(A7;4)="C.ty";A7;B8))

Chắc bạn type nhầm. Sửa lại như thế này:

=IF(LEFT(A8;4)="C.ty";"";IF(LEFT(A7;4)="C.ty";A7;B7))

 

[youkosuk]

Chắc bạn type nhầm. Sửa lại như thế này:

=IF(LEFT(A8;4)="C.ty";"";IF(LEFT(A7;4)="C.ty";A7;B7))

Ấy chết, quên nói, tên công ty không phải lúc nào cũng có "C.ty" ở đầu, mà có lúc là "cty", "cong ty", "TCTY", "CN Cty",....

Nên nếu ký tự bắt đầu mà không phải như vậy thì không cho kết quả đúng nâ.

 

[ndu96081631]

Ấy chết, quên nói, tên công ty không phải lúc nào cũng có "C.ty" ở đầu, mà có lúc là "cty", "cong ty", "TCTY", "CN Cty",....

Nên nếu ký tự bắt đầu mà không phải như vậy thì không cho kết quả đúng nâ.

Dù là công thức hay code thì cũng phải dựa vào 1 điều kiện nhận biết nào đó mới làm được
Bạn đưa dử liệu thật lên đi cho dể ---> Mấu chốt vấn đề là làm sao nhận biết được "TỪ KHÓA" trong đóng dử liệu kia
Hỏi bạn: Nếu làm thủ công thì bạn làm thế nào?

 

[Hai Lúa Miền Tây]

Ấy chết, quên nói, tên công ty không phải lúc nào cũng có "C.ty" ở đầu, mà có lúc là "cty", "cong ty", "TCTY", "CN Cty",....

Nên nếu ký tự bắt đầu mà không phải như vậy thì không cho kết quả đúng nâ.

Trời, như thế thì làm sao đây, có cách là lọc duy nhất tên công ty ra bảng riêng rồi làm điều kiện so sánh.

 

[rollover79]

Ấy chết, quên nói, tên công ty không phải lúc nào cũng có "C.ty" ở đầu, mà có lúc là "cty", "cong ty", "TCTY", "CN Cty",....

Nên nếu ký tự bắt đầu mà không phải như vậy thì không cho kết quả đúng nâ.

Dù là công thức hay code thì cũng phải dựa vào 1 điều kiện nhận biết nào đó mới làm được
Bạn đưa dử liệu thật lên đi cho dể ---> Mấu chốt vấn đề là làm sao nhận biết được "TỪ KHÓA" trong đóng dử liệu kia
Hỏi bạn: Nếu làm thủ công thì bạn làm thế nào?

Hình như Công ty thì không có chứa dấu cách ở đầu, không biết ý tác giả có phải vậy không?

 

[youkosuk]

Dù là công thức hay code thì cũng phải dựa vào 1 điều kiện nhận biết nào đó mới làm được
Bạn đưa dử liệu thật lên đi cho dể ---> Mấu chốt vấn đề là làm sao nhận biết được "TỪ KHÓA" trong đóng dử liệu kia
Hỏi bạn: Nếu làm thủ công thì bạn làm thế nào?

Làm thủ công là mình copy bên cột A rồi dán vào cột B, làm tuần tự cho từng công ty đến chừng nào hết danh mục thì thôi. (tốn nhiều thời gian lắm, thường thì mất hết 1 tuần mới làm xong, và hay bị lộn tên cty này qua cty khác).

File dữ liệu mình đã chỉnh lại, các bạn xem hộ mình.

 

[huuthang_bd]

Làm thủ công là mình copy bên cột A rồi dán vào cột B, làm tuần tự cho từng công ty đến chừng nào hết danh mục thì thôi. (tốn nhiều thời gian lắm, thường thì mất hết 1 tuần mới làm xong, và hay bị lộn tên cty này qua cty khác).

File dữ liệu mình đã chỉnh lại, các bạn xem hộ mình.

Tôi thấy những dòng không phải là tên công ty sẽ được Format thụt vào. Viết Code dựa trên đặc điểm này vậy.

Sub GPE()
Dim Tam As String
[C8:C65536].ClearContents
For Each Cll In Range([A8], [A65536].End(xlUp))
    If Cll.IndentLevel = 0 Then
        Tam = Cll.Value
    Else
        Cll.Offset(, 2).Value = Tam
    End If
Next
End Sub

 

[ndu96081631]

Làm thủ công là mình copy bên cột A rồi dán vào cột B, làm tuần tự cho từng công ty đến chừng nào hết danh mục thì thôi. (tốn nhiều thời gian lắm, thường thì mất hết 1 tuần mới làm xong, và hay bị lộn tên cty này qua cty khác).

File dữ liệu mình đã chỉnh lại, các bạn xem hộ mình.

Dử liệu này lộn xộn, chẳng có dấu hiệu đặc biệt nào cả ---> Nếu làm bằng tay bạn cũng phải "mò" ---> Vậy công thức nào có thể tự động được?
Tôi nghĩ chỉ còn có nước làm như bạn Domfootwear vừa miêu tả thôi

 

[Hai Lúa Miền Tây]

Bạn xem cách củ chuối của mình ở file đính kèm nhe.

 

[ndu96081631]

Bạn xem cách củ chuối của mình ở file đính kèm nhe.

Nếu có danh mục công ty thì dể rồi, sao bạn không dùng cái này:

=IF(COUNTIF($F$6:$F$11,$A8),"",IF($B7="",$A7,$B7))

 

[youkosuk]

Bạn xem cách củ chuối của mình ở file đính kèm nhe.

1- Như thế này thì mình phải có một bảng danh mục tên công ty có sẳn trước.

Sau đó mới dựa vào cái danh mục đó mới cho ra kết quả được.

Nhưng cái bản của mình thì không có cái danh mục có sẳn đó, vì nó được xuất file excel từ một phần mềm ra nên để có cái danh mục có sẳn lại càng lâu hơn.

2-Có cách này để tạo ra đặc điểm là có thể nối tên công ty với ".HCM" để có được điểm đặc biệt là ".HCM-...Công ty...."

 

[ndu96081631]

Nếu chữ .HCM là dấu hiệu nhận biết thi ... lại càng dể
Gõ vào cell B8 công thức sau:

=IF($A9=".HCM","",IF($B7="",$A7,$B7))