Похожие работы на «Работа в программе Excel»

Работа в программе Excel
Программирование и комп-ры, Работа в программе Excel, Контрольная ... Select ActiveCell.FormulaR1C1 = _ "=-R[1]C[-4]+SQRT(R[1]C[-4]^2-(4*RC[-4]*R[2]C[-4]))/(2*RC[-4])" Range("F4").Select Selection.Copy Range("F6").Select ...
... R[1]C[-4]-SQRT(R[1]C[-4]^2-(4*RC[-4]*R[2]C[-4])))/(2*RC[-4])" Range("F6").Select ActiveCell.FormulaR1C1 = _ "=(-R[-1]C[-4]-SQRT(R[-1]C[-4]^2-(4*R[-2]C ...


VBA Платежка [нестрогое соответствие]
Экономико-математическое моделирование, VBA Платежка, Курсовая ... X) = CDbl(Деньги) Worksheets(№ПЛ).Range("c" & X) = Банк Worksheets(№ПЛ).Range("d" & X) = Счёт Worksheets(№ПЛ).Range("b" & X) = Клиент Worksheets(№ПЛ) ...
... With With Selection.Borders(xlEdgeTop) .LineStyle = xlContinuous End With With Selection.Borders(xlEdgeBottom) .LineStyle = xlContinuous End With With ...


Решение экономических задач с помощью VBA [нестрогое соответствие]
Программирование и комп-ры, Решение экономических задач с помощью VBA, Курсовая ... 2).Value = i1 Cells(r, 3).Value = i2 Cells(r, 4).Value = i3 Cells(r, 5).Value = i4 Cells(r, 6).Value = s r = r + 1 End If Next i4 Next i3 Next i2 Next ...
... large(r[-5]c[4]:rc[4],1)" Range("f17").Select ActiveCell.FormulaR1C1 = "=(match(large(r[-6]c[4]:r[-1]c[4],1),r[- 6]c[4]:r[-1]c[4],0)-1)*5" r = Range( ...


Билеты, решения и методичка по Информатике (2.0) [нестрогое соответствие]
Программирование и комп-ры, Билеты, решения и методичка по Информатике (2.0) , Шпаргалки ... a, 5 MENU 2, b, 2 MENU 3, c, 2 g = 1 && номер пункта горизонтального меню v = 1 && номер пункта вложенного меню DO WHILE .T. CLEAR READ MENU BAR TO g, ...
... BAR 4 OF mmenu DO p4 ON BAR 2 OF mmenu ACTIVATE POPUP ww && выбор вложенных меню ON BAR 3 OF mmenu ACTIVATE POPUP ss DEFINE POPUP ww && определение ...


Файловая оболочка (Delphi 30 ) [нестрогое соответствие]
Программирование и комп-ры, Файловая оболочка (Delphi 30 ), Курсовая ... then begin j:=1; for i:=1 to EndFor do begin if (MaskR[j]=FR[i]) and (MaskR[j]<>'*') then begin j:=j+1; R:=True; end else begin if (MaskR[j]='*') and ...
... then begin break; end else begin r:=false; break; end; end; end; end; if MaskN[Length(MaskN)]='*' then begin j:=0; for i:=0 to EndFor do begin if ...


Макросы в Excel [нестрогое соответствие]
Программирование и комп-ры, Макросы в Excel, Лекция ... Заголовок() ActiveCell.FormulaR1C1 = "Тип компьютера" ActiveCell.Offset(1; 0).Range("A1").Select ActiveCell.FormulaR1C1 = "CP_35_SR" ActiveCell.Offset ...
... VerticalAlignment = xlBottom .WrapText = False .Orientation = xlHorizontal End With With Selection.Font .Name = "TimesET" .FontStyle = "Italic" .Size ...


Проектирование и разработка сетевых броузеров на основе теоретико-графовых моделей [нестрогое соответствие]
Программирование и комп-ры, Проектирование и разработка сетевых броузеров на основе теоретико-графовых моделей , Диплом и связанное с ним ... множества {(xi,xj), xi из X1, Xj из Х2} определяет пропускную способность разреза R : r(R) = c(u), u?{(xi,xj):xi ?X1, xj?X2} Поскольку для любой дуги ...
... prcDisconnected : begin Text := 'Disconnected'; ConnectBtn.Hint := 'Connect'; DirTree.Items.Clear; FileNewItem.Enabled := False; ViewLargeItem.Enabled ...


Автоматизированная система распределения мест и оценок качества олимпиадных заданий [нестрогое соответствие]
Педагогика, Автоматизированная система распределения мест и оценок качества олимпиадных заданий , Диплом и связанное с ним ... do begin Name := 'MARK2'; DataType := ftFloat; Required := True; end; with AddFieldDef do begin Name := 'MARK3'; DataType := ftFloat; Required := True ...
... AddFieldDef do begin Name := 'PARAM3'; DataType := ftFloat; Required:=False; end; with AddFieldDef do begin Name := 'PLACE'; DataType := ftInteger; ...


VB, MS Access, VC++, Delphi, Builder C++ принципы(технология), алгоритмы программирования [нестрогое соответствие]
Программирование и комп-ры, VB, MS Access, VC++, Delphi, Builder C++ принципы(технология), алгоритмы программирования , Рефераты ... nxt.LastName & ", " & nxt.FirstName If next_name >= new_name Then Exit Do Set ptr = nxt Loop ' Вставить новую ячейку в потоки NextName и prevName.
... test_cost = test_cost - Items(j).Cost test_solution(j) = False End Sub =209-210 Другая стратегия заключается в том, чтобы вносить изменения до тех пор ...


Нахождение кратчайшего пути [нестрогое соответствие]
Программирование и комп-ры, Нахождение кратчайшего пути, Курсовая ... a,b), (b,a),(b,c),(c,b),(a,c),(c,a),(c,d),(d,c)}>. В таком представлении ребру соответствуют две пары вершин (v1,v2) и (v2,v1), инцидентных данному ...
... MyDraw.SetActive(Te); if State=msDelete then RemovePoint(Te); Exit; end; if not flag then begin if FSnapToGrid then IONewPoint(StepRound(x,GrigStep) ...