آوردن تمامی اطلاعات از یک ستون اگراطلاعاتی نبود چیزی نیاره

[ctc]

با عرض سلام و خسته نباشید.
یک فرمولی میخواستم که برود از یک ستون تمامی اطاعات رو بیاره در یک ستون دیگر.
مثال یک ستون حاوی اسم ها هست میخواهم در ستون دیگرم تمامی این اسم ها بیاید
با این تفاوت که اگر ما بین آن اسم ها چیزی نبود 0 نگذارد. و ادامه دهد بدون اینکه فاصله بیندازد.

یک مثال گذاشتم که با = انجام داده ام که کل ستون رو نتونستم انتخاب کنم و آنجایی که هم اسم ندار 0 میگذارد. خلاصه میخواهم اگر تو ستون چیزی نیست اون هم چیزی نمایش ندهد. کمال تشکر را دارم.......



**** مدیر محترم اشتباهی دستم خورد به حل شد.

حل

نشده ببخشید

****






iranexcehlll.xlsx

[mokaram]

فرمول خاصی نمیخواد.شما کافیه محدوده را کپی کنی جای دیگه .بعد محدود جدید را انتخاب کنی از منوی home آخرین گزینه FInd & Select گزینه goto special بعد گزینه Blank را انتخاب کنی و ok حالا راست کلیلک بعد Delete و ok

[ctc]

ممنون از پاسختون
ولی من نمیخوام کپی کنم میخوام که هرچی تو یک سطون در یک شیت دیگری هست رو اتومات بیاره چون تغیرات اونجا زیاده .. مثل حذف اضاف و ... تشکر

[kazem1359]

سلام کد زیر را تست کنید:

Sub Macro1()
'
' Macro1 Macro
'

'
    Columns("H:H").Select
    Selection.SpecialCells(xlCellTypeBlanks).Select
    Selection.Delete Shift:=xlUp
    Range("H1").Select
End Sub

[iranweld]

با سلام

اگر با فرمول آرایه ای آشنایی دارید از فرمول ذیل استفاده کنید . پس از تایپ فرمول همزمان سه کلید Ctrl+Shift+Enter را فشار دهید تا علامت { } در ابتدا و انتهای فرمول ایجاد شود.

=IFERROR(INDIRECT("h" &SMALL(IF($H$1:$H$2500<>"",ROW($H$1:$H$2500),""),ROW(A1))),"")