بله این مشکل حل شدنقل قول:
ولی دوتا سوال دیگه را کسی جواب بده
یک مسئله دیگه اینکه برا یجملات چند شرطی تا یک تعداد معینی میتوان از IFهای تودرتو استفاده کرد که اگر بیشتر شود پیغام خطا میدهد .
این مشکل را چطور میشه حل کرد؟؟؟؟
Printable View
بله این مشکل حل شدنقل قول:
ولی دوتا سوال دیگه را کسی جواب بده
یک مسئله دیگه اینکه برا یجملات چند شرطی تا یک تعداد معینی میتوان از IFهای تودرتو استفاده کرد که اگر بیشتر شود پیغام خطا میدهد .
این مشکل را چطور میشه حل کرد؟؟؟؟
سلامنقل قول:
يه نمونه از اوني كه ميگي بذار
از اون فرمهاي آماده
همونطور هم كه من گفتم اول كار براي اينكار روشهاي متعددي هست كه توي همون دو تا پست دو تا روش اشاره شده
شما نمونه رو بذار تا من چك كنم
سلام دوست عزيزنقل قول:
اين كدي كه اين زير قرار دادم به رنج B4:K38 را انتخاب كرده و بر اساس ستون E مرتب مي‌كنه
نقل قول:
Sub Macro1()
Range("B4:K38").SelectEnd Sub
ActiveWorkbook.Worksheets("Sort E").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Sort E").Sort.SortFields.Add Key:=Range("E4:E38") _
, SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("Sort E").Sort
.SetRange Range("B4:K38")
.Header = xlGuess
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
براي استفاده از اين كد در جاي ديگه بايد جايگزيني‌هاي مناسب انجام بگيره
همچينين اگه ميخواي با تغيير اطلاعات Worksheet اتوماتيك كد اجرا بشه بايد اين كد رو در رويداد زير نوشته بشه
يعني قسمتهاي مشكي رنگ كد بالا جاي چند نقطه ها رو بگيره
اگه نه ميتوني همون كد رو به عنوان يه ماژول استفاده كرده و براش يك كليد تركيبي (Shortcut Key) تعريف كرده تا با زدن اون كد اجرا بشه
نقل قول:
Private Sub Worksheet_Change(ByVal Target As Range)
....
....
....
....
....
End Sub
در كل بايد بگم كار كردن با كدهاي VBA نياز به كمي دونستن برنامه نويسي داره
موفق باشي
سلامنقل قول:
شما چطور اينا رو نزولي مرتب ميكني كه مشكل برات پيش مياد
چون اينكار نيازي به ساختن لينك نداره
؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟
سلامنقل قول:
متاسفانه نمی دونم چطوری نمونه را برات بزارم ولی آدرس و می نویسن بی زحمت چکش کنید
روی علامتآفیس 2007 در گوشه سمت چپ اکسل کلیک کنید گزینه new را انتخاب و سپس از قسمت templastes
گزینه دوم installedtemplastes را انتخاب در کادر باز شده نمونه های مختلفی وجود دارد منظور من نمونه TimeCard است
(اگه میشه نحوه گذاشتن فایل رو هم بگید )
سلامنقل قول:
جالب بود برام كه اين نكات ريز رو تا حالا با دقت توي اكسل مرور نكرده بودم
سوال شما باعث شد برم و جستجو كنم و بيابم
اگه بخواي اين كارو بكني كافيه از قسمت Advanced كادر تنظيمات اكسل (Excel Option) بگردي دنبال گزينه Show a zero in cells that have zero value و تيكش رو بذار
مقاله كامل در اين آدرس در دسترس هست
موفق باشيکد:http://office.microsoft.com/en-us/excel/HP100704611033.aspx
براي گذاشتن فايل هم بايد فايل موردنظر را يه جا آپلود كني و آدرسش رو بذاري اينجا
البته براي فايلهاي در دسترس هم همونطور كه گفتي كافيه
سلام رفتم و ok شدنقل قول:
خیلی وقت دنبال این بودم چون خیلی با اکسل کار می کنم و سلولهاو صفحات متعددی گاهاً در 40 یا 50 شیت دارای فرمول وابسته به هم می نوشتم و این صفر ها مخصوصاً در پرینت واقعاً آزار دهنده بود
تشکر
من برای جمع ستون A باB مجبورم که تک تک بصورت A1+B1=C1 و.... عمل کنم
چطوری میتونم ستون c رو مجموع A و B کنم یعنی به این صورت که خود بخود A2+B2=C2 , A1+B1=C1 ,..... الی اخر با یک عمل جمع بشه (یعنی در ستون c ردیف ها مجموع ردیف های کناری باشه)
من یه نیگا کردم این سوالو تو پستا ندیدم اگه تکراریه ببخشید
سلامنقل قول:
فقط کافیه فرمولی که در c1 نوشتی رو در هر سلول دیگری که بخوای copy, pest کنی تا دو سلول قبل خود را با هم جمع کنه
سلام دوست عزيزنقل قول:
شما بعد از اينكه فرمول مورد نظر در خانه C1 نوشتي كافيه اون مربع كوچيك و مشكي كه پايين و سمت راست يا چپ خانه C1 وجود داره رو بگيري و بكشي به سمت پايين تا بصورت اتوماتيك خانه هاي ديگه متناسب با اون فرمولي كه نوشتي پر بشن
اصطلاحا به اين خاصيت در اكسل AutoFill گفته مي‌شود