VBA (Exel) и не только

Public RowC As Integer ‘ ‘Sub ПереносБаланса() ‘ Dim shdto As New Worksheet ‘ Dim shdfrom As New Worksheet ‘ Set shdto = Worksheets("Тест") ‘ Set shdfrom = Worksheets("Баланс") ‘ Dim RowC As Integer » Worksheets("Тест").Range("A:G").ClearContents » Selection.Delete Shift:=xlUp ‘ Продолжить чтение Перенос баланса→

Александр, немного о проекте. Есть ряд объектов недвижимости, по которым нужно периодически актуализировать информацию. Структура БД примерно такая: Основная таблица (tMain): С полями Код, Регион, Дата…. И есть дочерняя таблица (tMainHistory) с аналогичными полями, в который непосредственно будет храниться история Продолжить чтение dsdsssd→

Private Sub Form_AfterUpdate() CurrentProject.Connection.Execute («INSERT INTO tMainHistory (КодДляТаблицы, Регион) VALUES (‘4’, ‘Саратов’)») [Form_подчиненная форма tMainHistory].Requery End Sub

https://yadi.sk/d/_YxpUwwYkLX4h

Sub Выделить_между() Dim MyRange As Range, rStart&, rEnd& Set MyRange = ActiveDocument.Content With MyRange With .Find .ClearFormatting .Text = "Структура активов" .Forward = True .Wrap = wdFindStop .Format = False .MatchCase = False .MatchWholeWord = True .MatchWildcards = False .MatchSoundsLike Продолжить чтение Поиск текста в Word→

Option Explicit Public LastRow As Integer     Sub HelloWorld(control As IRibbonControl) On Error Resume Next Application.ScreenUpdating = False Trim Application.ScreenUpdating = True End Sub       Private Sub Trim() Dim ws6 As Worksheet Dim ws14 As Worksheet Set Продолжить чтение Поиск уникальных значений (для заключения)→

<?php class MyExtClass extends MyClass {   private $myName; private $myAdress;   function setMyName($myName){ $this->myName=$myName; } function print1 ($myName, $myAdress){ echo "My Name is: {$this->myName} "; echo "My Adress is: $myAdress \n";   }   }   //========================================================= // Реализация Продолжить чтение Наследование PHP→

<?php class MyClass {   private $myName; private $myAdress;   function __construct ($myName, $myAdress){ $this->myName=$myName; $this->myAdress = $myAdress; }   function print1 (){ echo "My Name is: $this->myName <br/>"; echo "My Adress is: $this->myAdress \n";   }   }   Продолжить чтение Работа с классами→