久久国产成人av_抖音国产毛片_a片网站免费观看_A片无码播放手机在线观看,色五月在线观看,亚洲精品m在线观看,女人自慰的免费网址,悠悠在线观看精品视频,一级日本片免费的,亚洲精品久,国产精品成人久久久久久久

分享

Vlookup、Lookup都靠邊,,Mlookup函數(shù)來(lái)了?。?/span>

 西山墨墨 2015-02-07

Vlookup是最常用到的查找函數(shù),,但它有很大的局限性,。比如:只能查找第一個(gè)符合條件的值,無(wú)法任意位置查找和多條件查找等,。于是,,蘭色用VBA編寫了一個(gè)功能強(qiáng)大的Mlookup函數(shù)。

一,、用法介紹

=Mlookup(查找內(nèi)容,,查找區(qū)域,返回值所在的列數(shù),第N個(gè))

語(yǔ)法說(shuō)明:

  • 查找內(nèi)容:除了單個(gè)值外,還可以選取多個(gè)單元格,,進(jìn)行多條件查找,。

  • 查找區(qū)域:同VLOOKUP

  • 返回值的在列數(shù):同VLOOKUP

  • 第N個(gè):值為1就返回第1個(gè)符合條件的,值為2就返回第2個(gè)符合條件的....當(dāng)值為0值時(shí),,返回最后1個(gè)符合條件的值,。

二、功能演示,。

【例】如下圖所示的入庫(kù)表中,,要求完成以下查找,。

1、查找第2次電視的進(jìn)貨數(shù)量,。

=Mlookup(A11,A2:D8,4,2)

2,、查找電視的最后一次入庫(kù)數(shù)量

=Mlookup(A11,A2:D8,4,0)

3、查找47寸電視的第1次進(jìn)貨數(shù)量,。

=Mlookup(A11:B11,A2:D8,4,1)

4,、實(shí)現(xiàn)篩選功能。

=Mlookup($B$10:$B$11,$A$1:$D$8,4,A14)

三,、使用方法


Mlookup要想在你的表格中也能使用,,需要按下面的步驟操作。

1,、按alt+F11(鍵盤上如果有FN鍵 ,,還需要同時(shí)按FN)會(huì)打開VBE窗口,在窗口中點(diǎn)插入 - 模塊,。把下面的代碼復(fù)制粘貼到右側(cè)的空白區(qū)域中,。

代碼

Function Mlookup(rg, rgs As Range, L As Integer, M As Integer)

Dim arr1, ARR2, 列數(shù)

Dim R, n, K, X, cc, sr As String

arr1 = rg.Value

ARR2 = rgs

If VBA.IsArray(arr1) Then

For Each R In arr1

If R <> '' Then

cc = cc & R

列數(shù) = 列數(shù) + 1

End If

Next R

Else

cc = arr1

End If

If M > 0 Then '非查找最后一個(gè)

For X = 1 To UBound(ARR2)

sr = ''

If 列數(shù) > 1 Then

For q = 1 To 列數(shù)

sr = sr & ARR2(X, q)

Next q

Else

sr = ARR2(X, 1)

End If

If sr = cc Then

K = K + 1

If K = M Then

Mlookup = ARR2(X, L)

Exit Function

End If

End If

Next X

Else '查找最后一個(gè)

For X = UBound(ARR2) To 1 Step -1

sr = ''

If 列數(shù) > 1 Then

For q = 1 To 列數(shù)

sr = sr & ARR2(X, q)

Next q

Else

sr = ARR2(X, 1)

End If

If sr = cc Then

Mlookup = ARR2(X, L)

Exit Function

End If

Next X

End If


Mlookup = ''

End Function


2、當(dāng)前文件另存為“啟用宏的工作簿”格式,,

然后在這個(gè)表格中就可以象蘭色一樣使用Mlookup函數(shù)了,。

附表下載地址:(復(fù)制到ie地址欄中按回車下載)

http://www.excelpx.com/home/upload/2015_02/temp_15020520147433.zip


蘭色說(shuō):VBA就是這么帥,需要什么函數(shù)就編寫它,。學(xué)會(huì)VBA后,,你會(huì)發(fā)現(xiàn)excel變得無(wú)所不能!

書也買了一大堆,,沒(méi)心思看,。教程也下載了好多,越看越迷糊,。excel到底該怎么學(xué),?其實(shí),通過(guò)視頻學(xué)習(xí)才是最好的學(xué)習(xí)途徑,,點(diǎn)左下角'閱讀原文' 查看蘭色幻想+小妖錄制的超全的290集excel視頻教程,。

    本站是提供個(gè)人知識(shí)管理的網(wǎng)絡(luò)存儲(chǔ)空間,所有內(nèi)容均由用戶發(fā)布,,不代表本站觀點(diǎn),。請(qǐng)注意甄別內(nèi)容中的聯(lián)系方式、誘導(dǎo)購(gòu)買等信息,,謹(jǐn)防詐騙,。如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,請(qǐng)點(diǎn)擊一鍵舉報(bào)。
    轉(zhuǎn)藏 分享 獻(xiàn)花(0

    0條評(píng)論

    發(fā)表

    請(qǐng)遵守用戶 評(píng)論公約

    類似文章 更多