مشکل در استفاده از تابع vlookup

[saeideh1992]

سلام دوستان
یک فایل اکسل دارم با رکوردهای زیاد که هرکدوم از ردیفها یک unique code دارند میخوام در ردیفهایی که کد یکسان دارند اطلاعات ستون "cause" مربوط به هرکد در ردیفی که همان کد را دارد ولی سلول آن در ستون "cause" خالی است نوشته شود . ممنون میشم کمک کنید کارهام عقب مونده بخاطر این . لینک فایل پیوست میشود
http://s8.picofile.com/file/8343728184/Book1.xlsx.html

اخطار: این یک موضوع قدیمی است به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

[iranweld]

با سلام

فایل پیوست را بررسی کنید

=IF(AND(COUNTIF([unique code],A2)>1,COUNTIF($A$1:A2,A2)=1),"others","") 

[saeideh1992]

با سلام

فایل پیوست را بررسی کنید

=IF(AND(COUNTIF([unique code],A2)>1,COUNTIF($A$1:A2,A2)=1),"others","") 

با سلام و سپاس از شما
ستون cause مربوط به برخی کدها خالی هستند . هدف من این است با استفاده از vlookupاگر دو unique code یکسان بودند اطلاعات کدی که cause آن موجود است به کدی که cause آن خالی است منتقل شود .

[حسام بحرانی]

با سلام و سپاس از شما
ستون cause مربوط به برخی کدها خالی هستند . هدف من این است با استفاده از vlookupاگر دو unique code یکسان بودند اطلاعات کدی که cause آن موجود است به کدی که cause آن خالی است منتقل شود .

سلام دوست عزیز
به انجمن خوش آمدید.
این مطلبی را که شما عنوان می کنید قطعاً با کدنویسی امکان پذیر هست و یا اینکه از یک ستون کمکی استفاده نمایید.

لطفاً قسمتی از فایل خود را ارسال نمایید و خواسته خود را دقیق تر مطرح کنید تا دوستان خوب من، بهتر بتوانند کمکتان کنند.
موفق باشید.

[iranweld]

ماکرو ذیل را در فایل پیوست تست کنید

Sub test()

Z1 = Cells(Rows.Count, "A").End(xlUp).Row

For I = 2 To Z1

If Range("k" & I) <> "" And Application.CountIf(Range("A2:A" & Z1), Range("A" & I)) > 1 Then

For J = 1 To Z1

If Range("A" & I) = Range("A" & J) And Range("K" & J) = "" Then

Range("K" & J) = Range("k" & I)

End If

Next

End If

Next


End Sub