excel获取返回值所在的列号函数
    一、问题概述
    在Excel中，有时需要获取某一个返回值所在的列号，但是目前excel自带的函数都是获取行号的，那么如何实现获取列号的功能呢？
    二、解决方案
    1、可以使用Excel自带的函数，如果可以使用VBA，可以使用下面的代码：
    Function MYCOLUMN(Byval Findvalue As Variant) As Long
    Dim i As Long
    MYCOLUMN = 0
    For i = 1 To Columns.last
column函数的使用    If Cells(1, i).Value = Findvalue Then
    MYCOLUMN = i
    Exit For
    End If
    Next
    End Function
    2、可以使用第三方的函数
    Sub Demo()
    Dim Findvalue As Variant
    Findvalue = Sheet1.Range('D1').Value
    Msgbox 'Findvalue in column' & ColumnNumber(Findvalue)
    End Sub
    Function ColumnNumber(Byval Findvalue As Variant) As Long
    Dim rng As Range
    Dim i As Long
    ColumnNumber = 0
    For Each rng In Sheet1.Range('A:A')
    i = i + 1
    If rng.Value = Findvalue Then
    ColumnNumber = i
    ColumnNumber = ColumnNumber
    ColumnNumber = 0
    End If
    Next
    End Function
    以上两种方法，都可以用来获取Excel中返回值所在的列号。

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。