Hỏi nhanh - đáp nhanh về công thức (phần 1)

Blue Softs Liên hệ QC
Status
Không mở trả lời sau này.

Quang_Hải

Thành viên gạo cội
Tham gia ngày
21 Tháng hai 2009
Bài viết
5,862
Được thích
7,584
Nghề nghiệp
Làm đủ thứ
Hic, lấy cthức của Thầy Bate làm name, để cho bạn biết name ------------Anh Quang Hải đâu rồi ta, biểu diễn cho nguyencanh160890 thấy kìa!
Mấy cái này tương đối cơ bản, cứ để cho em nó bơi. Khi nào uống no nước rồi vớt lên.
 

Good-Luck

Thành viên tiêu biểu
Tham gia ngày
21 Tháng tư 2010
Bài viết
595
Được thích
924
Hic, lấy cthức của Thầy Bate làm name, để cho bạn biết name ------------Anh Quang Hải đâu rồi ta, biểu diễn cho nguyencanh160890 thấy kìa!

dùng name cũng làm như bình thường thôi nhưng để né người dùng nhìn vào cái hàm giống như bị khủng bố , đồng thời cái name sẽ dễ cho người dùng trả lại công thức nếu lỡ tay chạm vào cell chứa công thức
 
Lần chỉnh sửa cuối:

Quang_Hải

Thành viên gạo cội
Tham gia ngày
21 Tháng hai 2009
Bài viết
5,862
Được thích
7,584
Nghề nghiệp
Làm đủ thứ

Bài này nếu xài hàm Choose sẽ khỏe hơn nhiều. Nhưng tốt nhất là tạo bảng dữ liệu rồi dùng hàm dò tìm sướng hơn. Khi cần chỉ cần điều chỉnh cái bảng dữ liệu, khỏi mất công sửa công thức.

=CHOOSE(A1,-48%,-40%,-32%,-24%,-16%,-8%,8%,16%,24%,32%,40%,48%)
 
Lần chỉnh sửa cuối:

taimeanh

Thành viên mới
Tham gia ngày
31 Tháng ba 2009
Bài viết
21
Được thích
32
Bạn xài code này
PHP:
Sub loc()
Dim dl(), kq(), i, x, k
dl = Range([A1], [M65536].End(3)).Value
ReDim kq(1 To UBound(dl), 1 To 13)
For i = 1 To UBound(dl)
   If dl(i, 1) = 98 Then
      k = k + 1
      For x = 1 To 13
         kq(k, x) = dl(i, x)
      Next
   End If
Next
[O1].Resize(k, 13) = kq
End Sub
Em cảm ơn bác. Tuy nhiên xin bác giúp cho chút nữa đó là em yêu cầu lấy kết quả của dòng dưới bác ạ.
 

Quang_Hải

Thành viên gạo cội
Tham gia ngày
21 Tháng hai 2009
Bài viết
5,862
Được thích
7,584
Nghề nghiệp
Làm đủ thứ
Em cảm ơn bác. Tuy nhiên xin bác giúp cho chút nữa đó là em yêu cầu lấy kết quả của dòng dưới bác ạ.

Phải thế này hay không?
PHP:
Sub loc()
Dim dl(), kq(), i, x, k
dl = Range([A1], [M65536].End(3).Offset(1)).Value
ReDim kq(1 To UBound(dl), 1 To 13)
For i = 1 To UBound(dl) - 1
   If dl(i, 1) = 98 Then
      k = k + 1
      For x = 1 To 13
         kq(k, x) = dl(i + 1, x)
      Next
   End If
Next
[O1].Resize(k, 13).NumberFormat = "@"
[O1].Resize(k, 13) = kq
End Sub
 
Lần chỉnh sửa cuối:

nhat chi mai

Thành viên gắn bó
Tham gia ngày
22 Tháng mười một 2011
Bài viết
1,832
Được thích
8
Hic, lấy cthức của Thầy Bate làm name, để cho bạn biết name ------------Anh Quang Hải đâu rồi ta, biểu diễn cho nguyencanh160890 thấy kìa!


hihi, hôm qua em về nên không thấy Anh Chị trả lời, nhưng em mới xem file rồi, Anh(Chị) sử dụng công thức xong mới đặt vùng hix, để em ngâm cứu phần name này, trường hợp sau có dạng này em thử dùng name xem sao.
Một lần nữa cảm ơn Chị "Hồng.Vân", Anh "Quang Hải", Thầy "Ba Tê" nhiều nhiều./-*+//-*+//-*+/
 

xuantien201

Thành viên mới
Tham gia ngày
14 Tháng mười hai 2012
Bài viết
6
Được thích
0
giúp em giải quyết hai cái dấu hỏi trong cái bài này với

ghi công thức giúp em với nha mấy anh..thanks nhiều
 

File đính kèm

  • Book1.xls
    13.5 KB · Đọc: 30

Ngoai Thanh

Cánh Diều xanh
Tham gia ngày
14 Tháng sáu 2012
Bài viết
823
Được thích
906
Phải thế này hay không?
PHP:
Sub loc()
Dim dl(), kq(), i, x, k
dl = Range([A1], [M65536].End(3).Offset(1)).Value
ReDim kq(1 To UBound(dl), 1 To 13)
For i = 1 To UBound(dl) - 1
   If dl(i, 1) = 98 Then
      k = k + 1
      For x = 1 To 13
         kq(k, x) = dl(i + 1, x)
      Next
   End If
Next
[O1].Resize(k, 13).NumberFormat = "@"
[O1].Resize(k, 13) = kq
End Sub
Bạn cho mình hỏi: Nếu gán điều kiện lọc không phải số "98" mà là một Ô ví dụ :số 26 hoặc số bất kỳ tại ô N1 thì code sửa thế nào ạ ?
 
Lần chỉnh sửa cuối:

diemhuyenanh

Thành viên hoạt động
Tham gia ngày
6 Tháng chín 2009
Bài viết
158
Được thích
56
làm cho bạn đây, bạn xem có đúng ý không
 

File đính kèm

  • Bản sao của Book1-1.xls
    22 KB · Đọc: 29

hungpecc1

Thành viên gắn bó
Tham gia ngày
24 Tháng tám 2012
Bài viết
1,676
Được thích
2,273
Giới tính
Nam
ghi công thức giúp em với nha mấy anh..thanks nhiều

Nếu đơn vị của số lượng và đơn giá không đổi thì bạn thử nhập vào ô D2 công thức sau xem thế nào :
PHP:
=REPLACE(B2,FIND("bao",B2),3,"")*REPLACE(C2,FIND("đồng",C2),4,"")

 

dhn46

Hướng tới tương lai
Tham gia ngày
1 Tháng ba 2011
Bài viết
3,250
Được thích
3,844
Với dạng bài hỏi chung chung không đưa đầy đủ các dạng dữ liệu này thì ... đoán mò vậy, bạn thử cái này đi
=LEFT(B2,COUNT(MID(B2,ROW(INDIRECT("1:"&LEN(B2))),1)*1))*LEFT(C2,COUNT(MID(C2,ROW(INDIRECT("1:"&LEN(C2))),1)*1))
Kết thúc bằng Ctrl + Shift + Enter
 

lq177

Thành viên thường trực
Tham gia ngày
22 Tháng tư 2010
Bài viết
203
Được thích
112

olegtran

Thành viên hoạt động
Tham gia ngày
4 Tháng mười một 2009
Bài viết
149
Được thích
76
Với dạng bài hỏi chung chung không đưa đầy đủ các dạng dữ liệu này thì ... đoán mò vậy, bạn thử cái này đi

Kết thúc bằng Ctrl + Shift + Enter

Sao lại phức tạp hóa các vấn đề đơn giản nhỉ? Tốt nhất là bạn hướng dẫn bạn Xuantien201 biết phân biệt dữ liệu text và mumber thế là xong.
 
Status
Không mở trả lời sau này.
Top Bottom