Dùng hàm để điền thêm tên tác giả và tên sách

[havietchuong]

Trong một sổ thư viện có rất nhiều bản sách, nay muốn điền thêm tên tác giả và tên sách cho đầy đủ thay cho những chữ nt, nhờ các bạn chỉ cách dùng hàm để thay thế mà không phải làm thủ công. Cám ơn.

 

[nghiaphuc]

Trong một sổ thư viện có rất nhiều bản sách, nay muốn điền thêm tên tác giả và tên sách cho đầy đủ thay cho những chữ nt, nhờ các bạn chỉ cách dùng hàm để thay thế mà không phải làm thủ công. Cám ơn.

Bạn thử dùng sub "củ chuối" này xem:

Sub ThayThe()
    Dim SL, i As Long
    With Sheet1
        SL = .[A65536].End(xlUp).Row
        For i = 1 To SL
            If .Cells(i, 2) = "-nt-" Then .Cells(i, 2) = .Cells(i - 1, 2)
            If .Cells(i, 3) = "-nt-" Then .Cells(i, 3) = .Cells(i - 1, 3)
        Next i
    End With
End Sub

 

[havietchuong]

Có cách nào dùng hàm được không bạn.

 

[chucuoi92]

Có cách nào dùng hàm được không bạn.

Bạn muốn dùng hàm thì phải làm ra cột khác rồi coppy và paste values vào.

 

[ndu96081631]

Có cách nào dùng hàm được không bạn.

Hình như dạng bài này đã nói rất nhiều lần rồi! Phương pháp chung là:
- AutoFilter cột Tác giả theo điều kiện = nt
- Tại cell đầu tiên chứa giá trị nt (sau khi Filter) gõ công thức = với giá trị của cell trên nó
- Kéo fill xuống
Ví dụ:
- AutoFilter vùng A1:C20
- Bấm mũi tên xổ xuống ở cột B, chọn điều kiện nt
- Tại B2, gõ công thức =B1 rồi kéo fill xuống
- Hủy AutoFilter, kiểm tra tính chính xác
(sau khi hoàn tất, có thể copy\paste value)
-------------
Tương tự thế cho cột TÊN SÁCH

 

[havietchuong]

Hình như dạng bài này đã nói rất nhiều lần rồi! Phương pháp chung là:
- AutoFilter cột Tác giả theo điều kiện = nt
- Tại cell đầu tiên chứa giá trị nt (sau khi Filter) gõ công thức = với giá trị của cell trên nó
- Kéo fill xuống
Ví dụ:
- AutoFilter vùng A1:C20
- Bấm mũi tên xổ xuống ở cột B, chọn điều kiện nt
- Tại B2, gõ công thức =B1 rồi kéo fill xuống
- Hủy AutoFilter, kiểm tra tính chính xác
(sau khi hoàn tất, có thể copy\paste value)
-------------
Tương tự thế cho cột TÊN SÁCH

Không được rồi bạn ạ.
Như thế 1 tác giả cũng như 1 tên sách cho những tên khác (đều là nt )

Xin lỗi bạn ndu nha. Mình chỉ thực hiện mỗi 1 cột thì không rõ nhưng thực hiện cả 2 cột như thế đều ổn. Cám ơn.

 

[havietchuong]

Lại nhờ các bạn giúp hộ, dựa vào tên sách dùng hàm để có cách ghi SỐ ĐĂNG KÍ từ cột A để ghi thành cột D.
Cám ơn.

 

[ndu96081631]

Lại nhờ các bạn giúp hộ, dựa vào tên sách dùng hàm để có cách ghi SỐ ĐĂNG KÍ không theo cột A mà phải ghi theo cột D.
Cám ơn.

Hỏi lại cho rõ:
Cột D trong file chính là dữ liệu hiện có, đúng không?
Vậy bạn muốn kết quả thế nào? Liệt kê chi tiết ra à?
Nếu đúng vậy thì tạo 1 cột phụ! Cụ thể gõ vào E2 công thức:

=IF(D2="",E1+1,1*LEFT(SUBSTITUTE(D2,"-",REPT(" ",LEN(D2))),LEN(D2)))

Kéo fill xuống, sau đó copy và Paste Value vào cột D

 

[havietchuong]

Hỏi lại cho rõ:
Cột D trong file chính là dữ liệu hiện có, đúng không?
Vậy bạn muốn kết quả thế nào? Liệt kê chi tiết ra à?
Nếu đúng vậy thì tạo 1 cột phụ! Cụ thể gõ vào E2 công thức:

=IF(D2="",E1+1,1*LEFT(SUBSTITUTE(D2,"-",REPT(" ",LEN(D2))),LEN(D2)))

Kéo fill xuống, sau đó copy và Paste Value vào cột D

ndu hiểu nhằm rồi. Hiện có là cột A, yêu cầu là dùng hàm biến đổi thành cột D (số liệu trên cột D là số liệu tự ghi cho rõ yêu cầu đó thôi).

 

[MinhCong]

Lại nhờ các bạn giúp hộ, dựa vào tên sách dùng hàm để có cách ghi SỐ ĐĂNG KÍ từ cột A để ghi thành cột D.
Cám ơn.

Trước mặt Anh tạm dùng thêm 2 cột phụ nhé! Vì Em chưa tìm ra cách để gộp lại 2 cột này thành 1 công thức.
công thức ô D2 Anh sửa lại như tthế này thôi nhé!

D2 =IF(F2="","",IF(G2="",F2,F2&" - "&G2))

 

[dat_butmuc]

Lại nhờ các bạn giúp hộ, dựa vào tên sách dùng hàm để có cách ghi SỐ ĐĂNG KÍ từ cột A để ghi thành cột D.
Cám ơn.

Dùng tạm 1 cột phụ với công thức này:

=IF(C2="-nt-","",IF(E2>0,A2&"-"&OFFSET(A2,E2,),A2))

 

[havietchuong]

Trước mặt Anh tạm dùng thêm 2 cột phụ nhé! Vì Em chưa tìm ra cách để gộp lại 2 cột này thành 1 công thức.
công thức ô D2 Anh sửa lại như tthế này thôi nhé!

D2 =IF(F2="","",IF(G2="",F2,F2&" - "&G2))

Cám ơn bạn MinhCong. Ta thêm 1 cột phụ thứ 3 là tốt rồi. Chưa biết ai lớn mà bạn đã gọi bằng anh rồi.

 

[concogia]

Bài nào cũng hay cả. Mình nhỏ hơn anh BaTe, MinhCong ạ.

Hai bạn này đang "sì-pam" nhé, mình sẽ "méc" với Smod
Bạn thử công thức này xem, có thể không dùng cột phụ
=IF(C2="-nt-","",IF(AND(C2<>"-nt-",C3<>"-nt-"),A2,A2&"-"&INDEX($A$1:$A$21,SMALL(IF(C3:$C$21="-nt-","",ROW(A3:$A$21)),1)-1)))