حذف چند رقم اول مشابه تمام سلول ها در يك ستون

[nataly]

سلام
اعداد من در اكسل به اين صورت هستن
6700001
6700002
6700003
و الي آخر
چطور ميتونم عدد 670000 كه تو همشون هست رو از اولش حذف كنم و داده هام به اين صورت بشه :
1
2
3

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

[khakzad]

به راحتی با ابزرا find می تونید این کار رو بکنید:
به شکل دقت کنید:

[khakzad]

لازم به ذکر است که بعد از انتخاب محدوده و زدن گزینه Ctrl+F بقیه روند را مثل شکل انجام بدید.
replace رو خالی بذارید

[nataly]

به راحتی با ابزرا find می تونید این کار رو بکنید:
به شکل دقت کنید:

خيلي ممنون . يه سوال ديگر: اگه يه جا 670000 باشه جاي ديگه 6700000 باشه چي؟ يعني تعداد صفراش متفاوت باشن چطور؟ چيكار بايد كرد؟

[iranweld]

با سلام

در ماکرو ذیل با استفاده از دستور replace اگر شروع اعداد با عدد 67 باشد حذف شده و چون صفر بعد از عدد نمایش داده نمی شود فقط اعداد انتهایی باقی می ماند و در سلولهای ستون b قرار میگیرد

Sub test()

Dim CorrectedText, OriginalText As Double

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

For i = 1 To Z

If Left(Range("A" & i), 2) = "67" Then


OriginalText = Range("A" & i).Value

CorrectedText = Replace(OriginalText, "67", "", 1, 1)

Range("b" & i).Value = CorrectedText

End If

Next i

End Sub 

[khakzad]

اینطوری چیزی که دنبالش میگردید میشه:
0*67
اینطوری هر تعداد صفر داشته باشه رو پیدا میکنه

[nataly]

اینطوری چیزی که دنبالش میگردید میشه:
0*67
اینطوری هر تعداد صفر داشته باشه رو پیدا میکنه

يعني چي؟ يعني بنويسم =67*0؟

[nataly]

اینطوری چیزی که دنبالش میگردید میشه:
0*67
اینطوری هر تعداد صفر داشته باشه رو پیدا میکنه

با همون ابزار find ، عدد 670 رو replace زدم درست شد. ممنون

[iranweld]

با همون ابزار find ، عدد 670 رو replace زدم درست شد. ممنون

فقط دقت کنید که اگر تو اعداد سمت راست 670 داشته باشید اوناهم حذف میشوند

[khakzad]

0*67 یععنی هرچی که با 67 شروع بشه و با 0 تموم بشه و هرچی که بینش باشه
داخا ابزار find گفته بودم بزنید.
اونجا که = نمیخواد