تکه کد برای ادغام سلول های اکسل

Sub milad()
For i = 9 To 750
 Set xL = Range(Cells(i, 1), Cells(i, 8))
 xL.Merge
 Next i
End Sub

Nargin_nargout

معرفی دو دستور مهم در متلب

تکه کد تبدیل عناصر یک سر به دو کلاس 0 و 1

Sub BINARY()
  For i = 2 To 2076
    If Cells(9, i) > 0 Then
      Cells(9, i) = 1
    End If
  Next i
End Sub

تکه کد کلاس بندی مجموعه داده در اکسل

با این کد می تواند مجموعه داده تان را به چند کلاس دسته بندی کنید

Sub class()
 For i = 739 To 2 Step -1
  Select Case Cells(49, i)

   Case Is < 2
       Cells(48, i) = 1
      
   Case Is < 5
       Cells(48, i) = 2
      
   Case Is < 11
       Cells(48, i) = 3

   Case Else
       Cells(48, i) = 4
 
End Select
 Next i
End Sub

تکه کد حذف برخی از ستون های اکسل

سلام با این تکه کد می توانید هر دسته از ستون های فایل اکسل را حدف نمایید.

Sub delete()
 For i = 2076 To 1 Step -1
  If Cells(48, i) = 0 Then ' در صورت صفر بودن '
   Columns(i).delete Shift:=xlToLeft
  End If
 Next i
End Sub

نکته مهم در این تکه کد پیمایش از انتها به ابتدا است . کشف علت این امر را به خواننده واگذار میکنم

تکه کد محاسبه شیب بردار در اکسل

Sub compute()
     
     Dim shib As Single
     
For i = 2 To 20

Set xL = Range(Cells(2, i), Cells(9, i))
Set yL = Range("B1:I1")

     shib = Application.WorksheetFunction.Slope(xL, yL)
    Cells(10, i) = shib
Next i
     End Sub

ویدیو آموزشی این پست را در آپارات ببینید

چگونه فایل اکسل به متلب اضافه کنیم

برای دانلود فایل آموزشی کلیک کنید

دریافت فیلم آموزشی
عنوان: افزودن فایل اکسل به متلب
حجم: 912 کیلوبایت
توضیحات: فرمت : فلش

انتخاب مقادیری خاص در یک مجموعه داده اکسل

کد زیر در یک مجموعه اکسل مقادیری که مقدار بزرگتر از 0.6 داشته باشند را BOLD می کند.

Sub Bold()
    For Each c In Worksheets("Winter_1").Range("E54:BA101").Cells
        If c.Value > 0.6 Then c.Font.Bold = True
    Next
End Sub

ابزار آنالیز داده در اکسل

اکسل دارای ابزاری است که امکان آنالیز داده ها را فراهم نموده است. و شما می توانید این ابزار را فعال نموده و به راحتی استفاده نمایید.

فعال سازی:

excel->strart->excel options->add-ins->analysis toolpack

طبق دستور بالا این ابزار را فعال نمایید

دسترسی به محیط برنامه نویسی ویژوال بیسیک در اکسل

برای مشاهده آموزش لینک زیر را کلیک نمایید

کلیک کنید