ماکرو نویسی

[nice_girl]

سلام
من سه تا شیت دارم که ماتریس دیتام توشن میخوام یه ماکرو در اکسل بنویسم که شماره سطر داده اول رو بگیره، تو شیت دوم پیداش کنه(داخل یک سطر که چندین عدد هست و با اسپیس از هم جدا شدن جستجوش کنه) و با سطر سوم هم یه عملیات انجام بده و حاصلو بصورت ماتریس در شیت چهارم درج کنه. چطور این کارو انجام بدم؟

[milad.moafi]

RE: ماکرو نویسی

سلام
این خواستهای که شما داری اصلاً نیازی به VBA نیست، میتونی با VLOOKUP انجام بدی، که پیشنهاد نمیکنم اینو، با INDEX و MATCH راحت تری، در مورد Space باید بگم میتونی با توایع نوع Text مثل TRIM و SUBSTITUTE و از این دست اضافه کنی، جواب آخر نمیگم بهت چون خودت بری دنبالش و یاد بگیری خیلی برات بهتره، در مورد هر تابع هم اگه سوال داشتی احساس راحتی کن و بپرس.
موفق باشید

[nice_girl]

RE: ماکرو نویسی

مشکل اینه که نمیدونم چطور داخل ماتریس بگردم. حلقه for رو چطور بنویسم وقتی که ستون A داده داره و با اسپیس جدا شدن یکی مثلا 17 عدد داره یکی 297 تا! یکم بیشتر توضیح بدید :s

[milad.moafi]

RE: ماکرو نویسی

اگه امکانش هست فایل رو آپلود کنید تا بررسی بشه
یا اینکه یک مثال دقیق بیان کنید تا بدونیم خواسته شما چیه

[nice_girl]

RE: ماکرو نویسی

فرضا اینا داده های خونه A1 اکسله:
1 25 479 63
اینا داده های خونه A2 اکسله:
3369 5584 25 471 1 448
اینا با اسپس از هم جدا شدن.
الان توی خونه A1 چهار داده هست در صورتیکه اکسل اینا رو یکی میبینه.
من چه کدی بنویسم که بگم فرضا تعداد 25 ها رو در این ماتریس بشمار؟

ببخشید حجم فایل زیاده نمیشه اپلود کرد

[~M*E*H*D*I~]

از طریق text to column میشه اعداد رو از هم جدا کرد این مشکل رو حل میکنه؟

[~M*E*H*D*I~]

فایل پیوست رو هم آماده کردم امیدوارم مشکل حل بشه

[victoria_1370]

سلام
من ی ماکرو میخوام بنویسم که از بین همه ردیف ها اونایی رو که توی ستون m مقدارشون برابر "کد" هست ردیفاشون جدا بشه و پایین ردیفای دیگه نوشته بشه
یعنی من 1333 تا ردیف دارم که اون ردیفای مشخص شده بیاد دوباره توی ردیفای 1334 به بعد نوشته بشه
کدش رو بلد نیستم میشه کمکم کنین؟
ممنون

[victoria_1370]

Sub ee()
Dim i As Integer
For i = 2 To 1333
If Cells(i, M).Value = "کد" Then
Rows(i + 1333) = Rows(i)
End If
Next i
End Sub 

این کدی که نوشتم اشتباهه؟

[khakzad]

درسته
فقط به جای m باید شماره ستون رو قرار بدید

[victoria_1370]

سلام
من میخوام 700 تا عدد رو از یک ستون با 12000 تا عدد از ی ستون دیگه مقایسه کنم
و اگر برابر بودن ی کاری انجام بشه
من با دوتا حلقه for نوشتم ولی خییییییییییییییییییییلی طول میکشه تا اجرا بشه یعنی 15 دقیقه فقط از 700 تا حدود4 تا انجام شده میخوام بدونم ایا اینکه طولانی شده طبیعیه ؟

[khakzad]

سلام
کدتون رو بذارید!!!
لازم نیست تک تک مقایسه کنید
داخل کد اگر از countif استفاده کنید بهتره

[~M*E*H*D*I~]

سلام
من میخوام 700 تا عدد رو از یک ستون با 12000 تا عدد از ی ستون دیگه مقایسه کنم
و اگر برابر بودن ی کاری انجام بشه
من با دوتا حلقه for نوشتم ولی خییییییییییییییییییییلی طول میکشه تا اجرا بشه یعنی 15 دقیقه فقط از 700 تا حدود4 تا انجام شده میخوام بدونم ایا اینکه طولانی شده طبیعیه ؟

اینکار نیازی به ماکرو نویسی نداره یک نمونه فایل بذارید تا بررسی بشه

[victoria_1370]

سلام
نمیدونم سوالمو باید اینجا بنویسم یا نه
من حدود 2000 تا رکورد دارم میخوام طبق تاریخ ی ستون بعضی رکوردام حذف بشن
ی ستون تاریخ دارم به این صورت 1386/12/20 که میخوام سالهای 1390 تا 1393 رو رکوردا نگه داشته بشن و بقیه حذف بشن
اینو چجوری باید کار کنم؟
باید چه ماکرویی بنویسم که فقط طبق قسمت سال اجرا بشه چون قسمت ماه و روز اعداد ثابتی نیستن
ممنون

[mostafap4]

با سلام
همونطور که اساتید گفتند اگر یک نمونه فایل بگذارید بهتر کمکتون میکنند، ولی اگر ماکرو هم نوشته باشید دستوری که نوشتید را بگذارید چون این کار ساده هست و اینهمه وقت نباید بگیره !