Теми рефератів
> Реферати > Курсові роботи > Звіти з практики > Курсові проекти > Питання та відповіді > Ессе > Доклади > Учбові матеріали > Контрольні роботи > Методички > Лекції > Твори > Підручники > Статті Контакти
Реферати, твори, дипломи, практика » Курсовые проекты » Знаходження критичного шляху табличним методом

Реферат Знаходження критичного шляху табличним методом





(scount + 2, snum). Value = Sheets ("Rez"). Cells (i, 2). Value

snum = snum + 1

End If

Next i

putt = False

For i = 2 To snum - 1

remdl = Sheets ("Rez"). Cells (scount + 2, i)

For j = i + 1 To snum

If Sheets ("Rez"). Cells (scount + 2, j). Value = remdl Then

putt = True

End If

Next j

Next i

If putt = True Then

snum = 1

For i = scount To 2 Step -1 p> If Sheets ("Rez"). Cells (i, 8). Value = 0 Then

Sheets ("Rez"). Cells (scount + 2, 2). Value = Sheets ("Rez"). Cells (i, 1). Value

Sheets ("Rez"). Cells (scount, 3). Value = Sheets ("Rez"). Cells (i, 2). Value

snum = 3

remdl = i

i = 2

End If

Next i

For i = remdl To 2 Step -1 p> If Sheets ("Rez"). Cells (i, 8). Value = 0 Then

Sheets ("Rez"). Cells (scount + 2, snum). Value = Sheets ("Rez"). Cells (i, 2). Value

snum = snum + 1

End If

Next i

End If


Sheets ("Rez"). Cells (scount + 2, 1). Select

End Sub


Sub markcell ()

Dim mst1 As String

Dim mst2 As String

Dim mstroka1 As String

Dim mstroka2 As String


mst1 = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"

h = j

If h> 26 Then

a = h 26

If h Mod 26 = 0 Then

mstroka1 = Mid (mst1, a - 1, 1)

Else

mstroka1 = Mid (mst1, a, 1)

End If

b = a * 26

c = h - b

If c = 0 Then c = c + 26

mstroka2 = Mid (mst1, c, 1)

mst2 = mstroka1 + mstroka2

Else

mst2 = Mid (mst1, h, 1)

End If

If h = 26 Then

mst2 = Mid (mst1, 26, 1)

End If

Range (Trim (mst2) + Trim (Str (i))). Select

End Sub


Назад | сторінка 22 з 22





Схожі реферати:

  • Реферат на тему: STEP і GAP аналіз
  • Реферат на тему: Використання MS Project для визначення критичного шляху проекту
  • Реферат на тему: Перегляд критичного шляху і створення структури графіка завдань
  • Реферат на тему: Розрахунок мережевого графіка табличним методом
  • Реферат на тему: Метод Мінті знаходження найкоротшого шляху