Този макрос на Excel ви позволява да подадете път към файла, за да прецените дали файлът е там. Например, може да имате процес, който манипулира файл някъде на вашия компютър. Например, може да се наложи да отворите съществуваща работна книга, за да добавяте данни към нея ежедневно. В този случай може да се наложи да тествате, за да видите дали файлът, който трябва да манипулирате, съществува.
Първото нещо, което трябва да забележите за този макрос, е, че той е функция, а не подпроцедура. Превръщането на този макрос във функция ви позволява да предадете всеки път към него.
В този макрос използвате функцията Dir, която връща низ, който представлява името на файла, което съответства на това, което предавате към него. Тази функция може да се използва по много начини, но тук я използвате, за да проверите дали пътят на файла, който предавате към нея, съществува:
Функция FileExists(FPath като низ) като булева
„Стъпка 1: Декларирайте вашите променливи
Dim FName като низ
„Стъпка 2: Използвайте функцията Dir, за да получите името на файла
FName = Dir(FPath)
„Стъпка 3: Ако файлът съществува, върнете True; иначе невярно
Ако FName <> " Тогава FileExists = True _
Друго: FileExists = False
Крайна функция
Стъпка 1 декларира String променлива, която съдържа името на файла, което се връща от функцията Dir. FName е името на променливата String.
В стъпка 2 се опитвате да зададете променливата FName. Правите това, като предавате променливата FPath на функцията Dir. Тази променлива FPath се предава чрез декларациите на функциите (вижте първия ред на кода). Тази структура ви предпазва от необходимост да кодирате твърдо пътека към файла, като вместо това го предавате като променлива.
Ако променливата FName не може да бъде зададена, пътят, който сте предали, не съществува. По този начин променливата FName е празна. Стъпка 3 просто превежда този резултат в израз True или False.
Отново тази функция може да се използва за оценка на всеки път към файла, който предавате към него. Това е красотата на записването на макроса като функция.
Следният макрос показва как да използвате тази функция:
Подмакрос1()
Ако FileExists("C:TempMyNewBook.xlsx") = Вярно Тогава
MsgBox "Файлът съществува."
иначе
MsgBox "Файлът не съществува."
Край, ако
Край под
За да приложите този макрос, можете да копирате и поставите и двете части от кода в стандартен модул:
Активирайте редактора на Visual Basic, като натиснете Alt+F11.
Щракнете с десния бутон върху името на проекта/работната книга в прозореца на проекта.
Изберете Вмъкване→Модул.
Въведете или поставете кода в новосъздадения модул.
Как да блокирам Microsoft Word да отваря файлове в режим само за четене в Windows Microsoft Word отваря файлове в режим само за четене, което прави невъзможно редактирането им? Не се притеснявайте, методите са по-долу
Как да коригирате грешки при отпечатването на неправилни документи на Microsoft Word Грешките при отпечатването на документи на Word с променени шрифтове, разхвърляни абзаци, липсващ текст или изгубено съдържание са доста чести. Въпреки това недейте
Ако сте използвали писалката или маркера, за да рисувате върху слайдовете на PowerPoint по време на презентация, можете да запазите чертежите за следващата презентация или да ги изтриете, така че следващия път, когато го покажете, да започнете с чисти слайдове на PowerPoint. Следвайте тези инструкции, за да изтриете чертежи с писалка и маркери: Изтриване на линии една в […]
Библиотеката със стилове съдържа CSS файлове, файлове с разширяем език на стиловия език (XSL) и изображения, използвани от предварително дефинирани главни страници, оформления на страници и контроли в SharePoint 2010. За да намерите CSS файлове в библиотеката със стилове на сайт за публикуване: Изберете Действия на сайта→Преглед Цялото съдържание на сайта. Появява се съдържанието на сайта. Библиотеката Style се намира в […]
Не затрупвайте аудиторията си с огромни числа. В Microsoft Excel можете да подобрите четливостта на вашите табла за управление и отчети, като форматирате числата си така, че да се показват в хиляди или милиони.
Научете как да използвате инструменти за социални мрежи на SharePoint, които позволяват на индивиди и групи да общуват, да си сътрудничат, споделят и да се свързват.
Юлианските дати често се използват в производствени среди като времеви печат и бърза справка за партиден номер. Този тип кодиране на дата позволява на търговците на дребно, потребителите и обслужващите агенти да идентифицират кога е произведен продуктът и по този начин възрастта на продукта. Юлианските дати се използват и в програмирането, военните и астрономията. Различно […]
Можете да създадете уеб приложение в Access 2016. И така, какво всъщност е уеб приложение? Е, уеб означава, че е онлайн, а приложението е просто съкращение от „приложение“. Персонализирано уеб приложение е онлайн приложение за база данни, достъпно от облака с помощта на браузър. Вие създавате и поддържате уеб приложението в настолната версия […]
Повечето страници в SharePoint 2010 показват списък с връзки за навигация в лентата за бързо стартиране в лявата част на страницата. Лентата за бързо стартиране показва връзки към представено съдържание на сайта, като списъци, библиотеки, сайтове и страници за публикуване. Лентата за бързо стартиране включва две много важни връзки: Връзка към цялото съдържание на сайта: […]
За прости проблеми Solver в Excel обикновено бързо намира оптималните стойности на променливата Solver за целевата функция. Но в някои случаи Solver има проблеми с намирането на стойностите на променливата Solver, които оптимизират целевата функция. В тези случаи Solver обикновено показва съобщение или съобщение за грешка, което описва или обсъжда проблема, който […]
