[حل شده] یافتن شماره ستون یک عدد در جدول

[mosiiniut]

باسلام،
یه مشکلی داشتم و بسیار ممنون میشم اگه کسی بتونه تو این زمینه بهم کمک کنه

جدولی دارم فرضاً ازa2 تا c10 شامل اعداد یکتا و غیر تکراری. نیاز دارم یک عدد را داخل جدول یافته و سر ستون اون رو بکه در سطر اول اومده رو بهم بده

[rasools13]

با سلام
از تابع ذیل میتوانید استفاده کنید
.

Function Find_IF(Range As Range, Criteria) As Variant
    Dim Result, i, j, f As Variant
    f = 0
    For i = 1 To Range.Rows.Count Step 1
        If f = 1 Then Exit For
        For j = 1 To Range.Columns.Count Step 1
            If Range.Cells(i, j) = Criteria Then
                Result = "Row = " & i & " Col = " & j
                f = 1
                Exit For
            End If
        Next
    Next
    Find_IF = Result
End Function 

.
آرگومان های این تابع
Range محدوده مورد بررسی (یا همان جدول شما )
Criteria شرط مورد نظر (عدد مورد نظر شما)
.
خروجی این تابع شماره سطر و ستون مقدار مورد نظر در محدوده انتخابی همانند ذیل خواهد بود

Row = 1 Col = 2

[mosiiniut]

با سلام
از تابع ذیل میتوانید استفاده کنید
.

Function Find_IF(Range As Range, Criteria) As Variant
    Dim Result, i, j, f As Variant
    f = 0
    For i = 1 To Range.Rows.Count Step 1
        If f = 1 Then Exit For
        For j = 1 To Range.Columns.Count Step 1
            If Range.Cells(i, j) = Criteria Then
                Result = "Row = " & i & " Col = " & j
                f = 1
                Exit For
            End If
        Next
    Next
    Find_IF = Result
End Function 

.
آرگومان های این تابع
Range محدوده مورد بررسی (یا همان جدول شما )
Criteria شرط مورد نظر (عدد مورد نظر شما)
.
خروجی این تابع شماره سطر و ستون مقدار مورد نظر در محدوده انتخابی همانند ذیل خواهد بود

Row = 1 Col = 2

بسياار ممنون و سپاسگذارم دوست عزيز. ممنون از كمكتون عالي بود


Sent from my iPhone using Tapatalk