Стварањем једноставног макроа то је сада лакшесазнајте последњу измењену линију у програму Мицрософт Ворд. Сада можете почети од потпуно истог реда на коме сте стали са писањем, након што поново отворите затворени документ. Мицрософт Ворд 2010 омогућава корисницима писање макронаредби ради интегрирања властитих функција које ће се примијенити на документу.
Да бисте започели са писањем такве функције, покрените Мицрософт Ворд 2010 и отворите документ.

Сада идите до Девелопер картицу. (У случају да не нађете Девелопер идите на Филе у менију, кликните Опције и у левом окну кликните Прилагодите траку, из десног окна омогућују Девелопер поље за потврду. Кликните на ОК то видети Девелопер картицу на траци).

Сада кликните Вижуал бејзик.

Вижуал бејзик отвориће се прозор, у левом окну кликните на ТхисДоцумент, Висуал Басиц појавиће се едитор. Сада копирајте ове редове кода и залепите их у ВБ едитор.
Суб АутоОпен ()
'
„ГоТоМиБоокмаркТект
'
'
О грешци Наставите даље
Селецтион.Финд.ЦлеарФорматтинг
Витх Селецтион.Финд
.Тект = “**************”
.Реплацемент.Тект = “”
.Форвард = Тачно
.Врап = вдФиндЦонтинуе
.Формат = Нетачно
.МатцхЦасе = Нетачно
.МатцхВхолеВорд = Нетачно
.МатцхВилдцардс = Нетачно
.МатцхСоундсЛике = Нетачно
.МатцхАллВордФормс = Нетачно
Завршити
Селецтион.Финд.Екецуте
АцтивеВиндов.СмаллСцролл Уп: = 15
Енд Суб
Суб АутоЦлосе ()
'
'ЦреатеМиБоокмарк
'
'
Селецтион.ТипеТект Тект: = ”**************”
Енд Суб

Након лепљења изађите из ВБ уређивача. и сачувајте документ као Макро је омогућен документ(Иди на Филе менија и притисни Сачувај као).

Фром Сачувај као тип опције, кликните на Ворд макро омогућен документ (* .доцм), и кликните сачувати.

Сада цизгубите Ворд документ. Након отварања истог документа аутоматски ћете бити пребачени на последњу линију која је уређена и приказаће се звездица (*) (што заправо показује да сте раније уређивали ову линију).

[преко ТхеФрееВиндовс]
Коментари