In this video we are going learn the Instr and InstrRev functions.Very useful functions in VBA. ... <看更多>
Search
Search
In this video we are going learn the Instr and InstrRev functions.Very useful functions in VBA. ... <看更多>
#1. InStrRev 函數(Visual Basic for Applications) | Microsoft Docs
Office VBA reference topic. ... InstrRev(stringcheck, stringmatch, [ start, [ compare ]]). InstrRev 函數語法具有下列具名引數: ...
VBA InStrRev ()函数. InStrRev() 函数返回一个字符串在另一个字符串中的第一次出现。搜索从右到左。 语法. InStrRev(string1,string2[,start,[compare]]).
InStrRev : InStrRev函數返回另一個字符串中的一個字符串的第一次出現位置。搜索從右到左。 語法: InStrRev ( string1 , string2 [, start ,[ compare ]]) 說明: ...
#4. VBA InStrRev()函数返回搜索到的字符位置 - CSDN博客
VBA InStrRev ()函数返回搜索到的字符位置- VBA函数学习笔记(四) · 语法. InStrRev(string1, string2 [,start, [compare]]) · 参数 string1 - 必须的参数 ...
#5. Excel VBA 程式設計教學:基本字串處理(String)
如果想從字串的結尾處開始往左搜尋,則可改用 InStrRev : Dim pos As Integer pos = InStrRev("Hello, World.", "l") MsgBox "pos = " & pos. VBA ...
#6. MS Excel: How to use the INSTRREV Function (VBA)
The Microsoft Excel INSTRREV function returns the position of the first occurrence of a string in another string, starting from the end of the string. This is ...
#7. VBA InStrRev Function - Find Text From Right - Automate Excel
The VBA InStrRev function searches for the position of a substring inside a string. It returns the position counting from left to right but it performs the ...
#8. VBA InString反转InStrRev函数方法用法 - 新版w3school教程
本页提供VBA语言VBA InString反转InStrRev函数教程,为学习者提供国际标准w3规定和方法,在本教程中,您将得到VBA InString反转InStrRev函数国际w3标准化开发准则。
#9. 常用VBA函數——InstrRev函數 - 人人焦點
常用VBA函數——InstrRev函數. 2021-02-19 埃恩軟體. 一、題目:. 要求編寫一段代碼,運用InstrRev函數,返回一個字符串在另一個字符串中出現的位置,從字符串的末尾算起 ...
#10. InStrRev 函数[VBA]
InStrRev 函数[VBA]. 返回字符串在另一个字符串中的位置,从字符串的右侧开始。 warning. 将语句Option VBASupport 1 放在模块中的可执行程序代码之前, 启用此函数或 ...
#11. VBA InStr and InStrRev – How to Use - Excel Trick
VBA InStr and InStrRev – How to Use ... As the name suggests VBA InStr function looks for a substring embedded inside another string and then returns its starting ...
#12. VBA: InStrRev function - VBA Reference - The Analyst Cave
The VBA InStrRev function returns the index position of the first occurrence of a string in a provided string, looking from the right end of the string. The ...
#13. Excel VBA InStrRev Function - ExcelFunctions.net
The Excel VBA InStrRev function returns an integer representing the position of a substring within a string. The Function searches the string from right to ...
#14. Excel VBA内置函数—InStrRev函数、InStr 函数 - 360doc个人 ...
Excel VBA内置函数—InStrRev函数、InStr 函数. ... 语法:InstrRev(stringcheck, stringmatch[, start[, compare]]). 说明:返回一个字符串在另一个 ...
#15. VBA INSTRREV Function (Syntax + Example) - Excel Champs
The VBA INSTRREV function is listed under the text category of VBA functions. When you use it in a VBA code, it returns the starting position number of a ...
#16. InstrRev函数的用法?[求助]-Excel VBA程序开发 - ExcelHome ...
[求助]不大会用INSTRREV函数,象A2单元格中数据为:802-3 5.5 - 7.5.我要求右边第一个"-"从右边算起的位置, ... Excel VBA程序开发,ExcelHome技术论坛.
#17. VBA InString反轉- InStrRev - 億聚網
InStrRev : InStrRev函數返回另一個字符串中的一個字符串的第一次出現位置。搜索從右到左。 語法: InStrRev ( string1 , string2 [, start ,[ compare ] ...
#18. VBA InStrRev Function | Explained with Syntax Examples
VBA InStrRev function is a Text/String function. This Function returns the position of a substring within a string, searching from right to left.
#19. 如何使用Excel VBA InStrRev函数?
Excel VBA INSTRREVVBA INSTRREV 功能,代表“反向输入”,从另一个字符串的结尾(从右到左)开始,从另一个字符串中返回搜索字符串(子字符串)中第一次出现的位置, ...
#20. excel - VBA功能故障InstrRev = Instr - IT工具网
excel - VBA功能故障InstrRev = Instr ... 我一直在尝试从文件结构中查找扩展名,为此,我很难使用InstrRev(filename,“。”),但是与其返回4,而是返回30,这与Instr的方法 ...
#21. excel vba中的语法InStrRev在excel中对应的函数怎么写?
instr对应的是Find。 InstrRev没有对应的,用组合公式也相当的困难,建议用自定义函数,也就是用VBA去完成它。 本 ...
#22. VBA InStrRev 関数 - Tipsfound
Excel VBA マクロの InStrRev 関数を紹介します。InStrRev 関数は、文字列の後ろから指定の文字列を検索し、最初に見つかった位置を返します。
#23. VBA Faulty function InstrRev = Instr - Stack Overflow
The difference between Instr and InstrRev is the direction it is looking for a certain Sub-String. Instr is looking from the start to the ...
#24. VB研究小站-Excel VBA程式庫
[ Excel VBA程式庫] - Strings.InStrRev. SVBR 張啟民(ChiMin Chang/小瓜瓜@ 2018/01/04) ... [回Excel VBA程式庫]. ○功能:傳回字串裡某個字串於右邊數來第幾個字的 ...
#25. The Instr and InstrRev Functions in VBA - Checking String ...
Instr Syntax. The Start Position; The VBCompareMethod · Using Instr with Excel Cells · Finding a position in a string · The InstrRev Function ...
#26. Fonction VBA : InStrRev - Excel-Pratique.com
La fonction VBA InStrRev renvoie un nombre entier correspondant à la première position trouvée d'une valeur dans une chaîne de caractères en commençant la ...
#27. How to use Excel VBA InStrRev Function? - WallStreetMojo
VBA INSTRREV Function, as stands for 'In String Reverse', returns the position of the first occurrence of a search string (substring) in another string, ...
#28. Excel VBA関数[InStrRev] - Office TANAKA
構文. InStrRev(string1,string2[,start[,compare]]). 引数string1には、検索の対象となる文字列を指定します。 引数string2には、引数string1の中から検索する文字列 ...
#29. How to Use Excel VBA InStrRev with examples? - eduCBA
As explained above, INSTRREV in Excel VBA is used to find an occurrence of a string in another string. This function finds the first occurrence of a string in ...
#30. the functions InStr, InStrRev, StrReverse - Excel VBA ...
Excel VBA Functions: InStr, InStrRev, StrReverse. InStr is short for InString. This string function is used to search for one string inside another. You need at ...
#31. VBScript InStrRev Function - W3Schools
The InStrRev function returns the position of the first occurrence of one string within another. The search begins from the end of string, but the position ...
#32. VBA InStrRev()函式 - tw511教學網
VBA InStrRev ()函式. ... InStrRev() 函式返回一個字串在另一個字串中的第一次出現。 ... InStrRev(string1,string2[,start,[compare]]).
#33. InstrRev_学习VBA - WIKI教程
InStrRev 函数返回另一个字符串中第一次出现的一个字符串。 搜索从右到左进行。 语法(Syntax). InStrRev(string1,string2[,start ...
#34. Excel VBA InStrRev Function - Tutorial And Example
Excel VBA InStrRev Function with tutorial and examples on HTML, CSS, JavaScript, XHTML, Java, .Net, PHP, C, C++, Python, JSP, Spring, ...
#35. VBA Instr函数用法 | excel vba instr - 訂房優惠報報
excel vba instr,大家都在找解答。本页提供VBA语言VBA Instr函数教程,为学习者提供国际标准w3规定和方法编程,在本教程中您将得到VBA Instr函数国际w3标准化开发准则 ...
#36. 〔VBA〕InStrRev-從字段的尾端開始尋找指定字串的位置--v013
〔VBA〕InStrRev-從字段的尾端開始尋找指定字串的位置--v013. 【從尾端開始找尋字串所在位置】. InstrRev(被搜尋的字段, 要找的字串). InstrRev(被 ...
#37. VBA InStrRev()函数返回搜索到的字符位置 - 代码先锋网
VBA InStrRev ()函数返回搜索到的字符位置- VBA函数学习笔记(四),代码先锋网,一个为软件开发程序员提供代码片段和技术文章聚合的网站。
#38. VBA Excel. Функция InStrRev (синтаксис, параметры ...
InStrRev – это функция, которая предназначена для определения номера позиции первого вхождения одной строки в другую, начиная с конца исходной строки. Для ...
#39. VBA InStrRev()函数返回搜索到的字符位置 - 程序员资料
Instr()的查找方向是从左到右,而InStrRev()函数的方向是从右到左。 ... VBA InStrRev()函数返回搜索到的字符位置- VBA函数学习笔记(四)_慕琦琦的博客-程序员资料.
#40. 取出字串的問題(頁1) - Excel程式區- 麻辣家族討論版版
VBA 沒有這種用法! modelcrazyer 發表於2016-10-21 11:33. sorry打錯了應該是 filename=k:\aaa\AAA.xlsx test=InStrRev(filename,"\") MsgBox test.
#41. InStrRev function - MicrosoftDocs/VBA-Docs · GitHub
To request changes, you can create a branch, make changes, then submit a PR. For more resources, see README.MD - VBA-Docs/instrrev-function.md at master ...
#42. VBA Function INSTRREV - BetterSolutions.com
INSTRREV (stringcheck, stringmatch [,start] [,compare]). Returns the position of a substring within a larger string, starting at the end (Long).
#43. VBA InStrRev()函数返回搜索到的字符位置 - 程序员宝宝
Instr()的查找方向是从左到右,而InStrRev()函数的方向是从右到左。 ... VBA InStrRev()函数返回搜索到的字符位置- VBA函数学习笔记(四)_慕琦琦的博客-程序员宝宝.
#44. VBA -InString Reverse - Tutorialspoint
VBA -InString Reverse, The InStrRev function returns the first occurrence of one string within another string. The Search happens from the right to the ...
#45. Extract URLs and Folder Paths with VBA InStrRev - wellsr.com
VBA InStrRev searches for a substring inside a string or cell, starting from right to left. InStrRev is great for extracting URLs or folder ...
#46. VBA Tutorial => Use InStrRev to find the position of the last...
Learn VBA - Use InStrRev to find the position of the last instance of a substring.
#47. Equivalent of InStr and InStrRev in excel
For those who might be interested, here is an Excel formula that I came up with that is equivalent to VBA's InStrRev function.
#48. InStrRev - Функции VBA - Справочники - Мир MS Excel
InstrRev (StringCheck,StringMatch[,Start[,Compare]]). Новая функция, которая появилась в версии Visual Basic 6.0. Функция служит для поиска номера символа, ...
#49. InstrRev Function (VB6) - VB & VBA in a Nutshell - O'Reilly ...
InstrRev Function (VB6) Named Arguments No Syntax InstrRev(sourcestring, soughtstring[, start[, compare]]) sourcestring Use: Required Data Type: String The ...
#50. InStrRev関数|VBA関数 - エクセルの神髄
InStrREv 関数は、文字列の中から指定した文字列を最後の文字位置から検索を開始し、最初に ... VBA関数では多くの場合、大文字小文字を区別されます。
#51. InstrRev関数の使用方法 - Excel VBA プログラミング入門
InstrRev 関数はある文字列の中から指定した文字列を後方から検索し、最初に見つかった文字位置(先頭からの文字数)を返します。
#52. ilogic VBA InStrRev not reversing - Inventor - Autodesk Forums
ilogic VBA InStrRev not reversing. i want it to find the project folder and the project name, so i tell it to find the constant value (427, ...
#53. excel - VBA功能故障InstrRev = Instr
excel - VBA功能故障InstrRev = Instr ... 我一直在尝试从文件结构中查找扩展名,为此,我很难使用InstrRev(filename,“。”),但是与其返回4,而是返回30,这与Instr的方法 ...
#54. Excel VBA入門教程4 字串String相關常用操作 - 劇多
4.2 Instr 和InStrRev. InStr函式返回一個字串第一次出現在一個字串,從左到右搜尋。返回搜尋到的字元索引位置。InStrRev函式與InStr功能相同,從右到 ...
#55. Access VBA 之iT管理實做Day22: 資料轉出成文字檔 - iT 邦幫忙
Access VBA 之iT管理實做Day22: 資料轉出成文字檔. Access VBA 之iT管理實做系列第22 篇 ... Name ' strFolder = Mid(strFolder, 1, InStrRev(strFolder, ".
#56. La funzione InStrRev di VBA - Excel Academy
La funzione InStrRev di Excel VBA restituisce un numero intero che rappresenta la posizione di una sottostringa all'interno di una stringa.
#57. vba instrrev用法VBA - Uhlwc
VBA InString反轉– VBA教程教學 InStrRev : InStrRev函數返回另一個字符串中的一個字符串的第一次出現位置。搜索從右到左。 語法: InStrRev ( string1 , string2 ...
#58. InstrRev - 中文百科知識
描述語法InstrRev(string1, string2[, start[, compare]])InstrRev 函式的語法有以下參數:參數string1必選項。接受搜尋的. ... Excel 2010 VBA入門與提高.
#59. vba InStrRev code example | Newbedev
Example: instr vba Dim SearchString, SearchChar, MyPos SearchString ="XXpXXpXXPXXP" ' String to search in. ... vba InStrRev code example ...
#60. VBA 使用InStrRev查找子字符串的最后一个实例的位置
示例. Const baseString As String = "Foo Bar" Dim containsBar As Boolean 'Find the position of the last "B" Dim posX As Long 'Note the different number and ...
#61. Learn Excel - Video 268- VBA FUNCTION INSTR & INSTRREV
In this video we are going learn the Instr and InstrRev functions.Very useful functions in VBA.
#62. vba暥帤楍偺斾妑丗Excel乥懄岠僥僋僯僢傪妛傇側傜moug ...
後ろから検索するには「 InStrRev 関数」を使用します。 構文. InStr( 検索元 , 検索ワード ) 検索元 の ...
#63. vba InStrRev Code Example
“vba InStrRev” Code Answer ... SearchString ="XXpXXpXXPXXP" ' String to search in. ... SearchChar = "P" ' Search for "P". ... ' A textual comparison ...
#64. Kako uporabljati funkcijo VBA InStrRev v Excelu?
Vodnik po VBA InStrRev. Tukaj smo razpravljali o tem, kako uporabljati Excel VBA InStrRev skupaj s praktičnimi primeri in naloženo predlogo Excela.
#65. InstrRev - Online - Excel Programmierung VBA Makro
Online - Excel VBA Makro Hilfe zu InstrRev. ... Die InstrRev-Funktion ist dient dazu, ein Vorkommen eines Strings in einem String von hinten zu prüfen.
#66. VBA中执行反向查找的函数InStrRev | 共享空间
在VBA中InStrRev是执行反向查找的函数. 用法为:InStrRev(搜索的字符串, 查找的字符或字符串…
#67. MS Excel: INSTRREV Function (VBA)
MS Excel: INSTRREV Function (VBA). This Excel tutorial explains how to use the Excel INSTRREV function with syntax and examples.
#68. VBA 字符串處理函數集 - 每日頭條
InStrRev (字符串1,字符串2,從第幾個開始) 從規定的位置開始,從後住前查找,返回字符串2在字符串1中的位置,此處注意,雖是從後住前查找,但是返回的 ...
#69. Comparable InStrRev function in VBA? - Microsoft - Tek-Tips
I've got a string, ex. xxx,yyy,zzzz,10.50 I need to strip the 10.50 off of the string. In VB I would use InStrRev (searches the string from ...
#70. Excel VBA String Functions: LEFT, RIGHT, MID, LEN ...
Excel VBA String Functions: LEFT, RIGHT, MID, LEN, REPLACE, INSTR AND INSTRREV.
#71. 【VBA】文字列を後ろから検索する【InStrRevでできます】
Excel VBAで文字列を後ろから検索する方法をご紹介します。後ろから文字列の位置を検索するのは、VBA関数のInStrRevを使えばできます。
#72. Excel VBA InstrRev - Free Excel Tutorial
Excel VBA InstrRev - Free Excel Tutorial. Excel VBA Strings. August 8, 2017. This post will guide you how to use VBA String functions to manipulate the ...
#73. Using InStr and InStrRev to Find a String within Another String
The InStrRev function is the counterpart of the InStr function, working in a ... If you omit start, VBA starts the search at the first character in string1 ...
#74. Vba Instrrev Stack Overflow Health USA - MyHealthOn.org
excel - VBA Faulty function InstrRev = Instr - Stack Overflow. Health. Details: The difference between Instr and InstrRev is the direction it is looking for ...
#75. Función InStrRev - Excel Avanzado
La función InStrRev nos permite localizar la posicion de una cadena de caracteres en una gran base de datos. Esta funcion se debe complementar ...
#76. InStrRev() - Fonction VBA | Excel-Malin.com
La fonction VBA InStrRev() permet de tester si un texte contient une chaîne de caractères spécifiée et si oui, elle permet de savoir où ...
#77. InStrRev Function [VBA] - The Collabora Office Help
InStrRev Function [VBA]. Returns the position of a string within another string, starting from the right side of the string. Warning Icon.
#78. INFO: InStrRev function in E-Basic language [18387] - PST ...
E-Basic has the InStrRev function, similar to the VBA version with the exception that the final parameter comparison permits for case sensitive ...
#79. vb@rchiv · Befehlsreferenz · InStrRev-Funktion
Die InStrRev-Funktion gibt die Position des ersten Zeichens einer ... NET VBA C#. Sch?tzen Sie Ihre Software vor Software-Piraterie - mit sevLock 1.0 DLL!
#80. VBAで文字列から文字列を検索する(InStr、InStrRev)
InStr、InStrRev InStr関数とInStrRev関数は、ある文字列の中に指定した文字列が存在する位置を内部処理形式LongのVariantの値で返します。
#81. InStrRev - VBA functie - Access programmeur
InStrRev - VBA functie. InStrRev geeft de positie in de reeks waar de match voorkomt, maar de reeks wordt vanaf rechts gezocht.
#82. Excel VBA InStrRev関数で後ろから文字列を検索する
VBA 関数の「InStrRev関数」で対処とした文字列の中から、指定した文字列を後ろから検索する方法をご説明します。後ろから文字列を検索する際に使用 ...
#83. 【VB】InStrRev関数 - オープンリファレンス
区分:プログラム | 分類:VB | 最終更新日:2014/06/20. クリエイティブ・コモンズ 表示-継承ライセンス 2.1. 【VB】InStrRev関数. 関連タグ:VBA, VB6, VB.
#84. كيفية استخدام وظيفة Excel VBA InStrRev؟
دالة VBA INSTRREV ، باعتبارها تعني "In String Reverse" ، تُرجع موضع التواجد ... INSTRREV و INSTR ، كلاهما مضمنان في وظيفة String / Text VBA لـ MS Excel.
#85. 從全路徑文件名中穫取文件名(不含路徑) - Excel VBA開髮
... As String Dim intSplitPos As Integer, intDotPos As Integer intSplitPos = InStrRev(strFullPath, "/") intDotPos = InStrRev(strFullPath, ".
#86. Thread: VBA: USE InStrRev to get file Name
Someone kindly helped me to get the directory using InStrRev: n = InStrRev(fDialog.SelectedItems(1), "\") TextBox2.Value = Left(fDialog.
#87. InStr() and InstrRev() Function in MS Access - GeeksforGeeks
The InstrRev() Function function works like Instr() function but it returns position of the first occurrence of a string in another, ...
#88. VBA. InStrRev - Планета Excel
ЗдравствуйтеСтою на асфальте я в лыжи обутый...Код Sub gfg() c = "53.785154545,27.54455" lon = InStrRev(c, ",") MsgBox lon End Sub У меня ...
#89. [心得] VBA如何另存檔案備份- 看板Accounting - 批踢踢實業坊
VBA 如何另存檔案備份網誌圖文版: ... 這裡使用了兩個函數,「InStrRev」函數是從後面開始尋找,傳回某字串在另一個字串中首次出現的位置,Left函數是 ...
#90. VBA-Excel : Strings Functions – InstrRev
VBA -Excel : Strings Functions – InstrRev · Optional · Type: Numeric · Starting position from where search has to be started.(from end of the string ...
#91. InStr vs InStrRev functions in VBA example - InfoExtract
vbBinaryCompare: performs binary comparison, integer constant value is 0. InStrRev Syntax. InStrRev(StringCheck, StringMatch, Start,CompareMethod). StringCheck: ...
#92. InStrRev VBA function - How to return character position in text ...
2. VBA InStrRev function – Syntax. 'officeinside.org InStrRev (StringCheck As String, StringMatch As String, [Start As Long = -1], [Compare As ...
#93. [已解决]instr和InStrRev的问题 - Excel精英论坛
在VBA中InStrRev是执行反向查找的函数. 用法为:InStrRev(搜索的字符串, 查找的字符或字符串,开始查找的位置(倒数的位置)). 本例可简化为:.
#94. Find SubString in a String - (InStr & InStrRev) Function VBA
Find SubString in a String - (InStr & InStrRev) Function VBA. Submitted by saurabhlakhanpal on 3 July, 2013 - 10:12. In Microsoft Excel, the InStr function ...
#95. VBA Instr Command - Learn VBA through examples - Excel ...
would return a value of 0 as the command is case sensitive. The VBA Instrrev(The reverse instring Command) If we arbitrarily modified our sentence ...
#96. VBA 字符串-相關函數(1-5) - 碼上快樂
InStrRev (string1,string2[,start,[compare]]). String1 - 必需的參數,要搜索的字符串。 String2 - 必需的參數。要在 String1 中搜索的字符串。
#97. worksheet function for InStrRev() - Excel Help Forum
Is there such a thing? I know there's SEARCH() which is equivalent to InStr() in VBA but now we have InStrRev() which searches for a string ...
#98. VBA InStr() InStrRev() Issues - VB6 | Dream.In.Code
Re: VBA InStr() InStrRev() issues. Posted 02 March 2012 - 10:11 AM. Something like below works. It's VB6, but should be equally adequate for ...
#99. Programming Excel with VBA: A Practical Real-World Guide
... the procedure makes use of the VBA InStrRev () function. varFile = Application .GetOpenFilename If varFile <> False Then intPos = InStrRev(varFile, ...
#100. DRDO CEPTAM (TECH- A ) 09 TIER 1: ITI COPA TRADE TIER - 1 ...
(a) ASC (b) CHR (c) & (d) INSTR 5. function in VBA returns last location at which the second string occurs within the first string. (a) INSTRREV (b) LCASE ...
vba instrrev 在 [心得] VBA如何另存檔案備份- 看板Accounting - 批踢踢實業坊 的美食出口停車場
VBA如何另存檔案備份
網誌圖文版:
https://www.b88104069.com/archives/4149
我們在Excel的世界裡,設計很複雜的函數公式,雖然能引用其他儲存格、其
他工作表、甚至是其他工作簿的內容,但最終操作結果,都是在目前的儲存
格中顯示特定內容,操作的對象總是儲存格。然而在VBA的世界裡,可以直接
以工作表、工作簿、甚至是Excel檔案作為操作對象,對他們下指令,如此跨
越了儲存格的界線,有很大的發揮空間。比如說,有很多的Excel操作:新建
、打開、關閉、儲存、另存等等,這些動作可能在某個例行性工作中一再重
複,在Excel世界裡,我們也只能一步一步來,每個月都必須來一次。可是擅
用VBA,把這些步驟串成一段指令,每次一鍵讓Excel自動去執行。長期以往
,大大節省了時間、提昇了效率,這是Excel自動化的另外一個層次。以下分
享VBA如何以檔案作為操作對象,設定另存檔案備份:
一、輸入如下VBA程式:
二、Excel執行VBA程式的畫面如下:
三、觀察原Excel檔案所在的資料夾,會發現多了一個「VBA如何另存檔案備
份-copy」,修改時間每分鐘更新一次,效果等同於定期另存新檔備份,以下
詳細說明此VBA程式。
四、建立新的巨集:「Sub Time()」。
五、VBA的每次操作是一個事件,其中「OnTime」是時間到了即自動執行的程
式,標準語法是「.」隔開,然後空格之後是對於該事件的具體描述(屬性)
,「Application.OnTime Now + TimeValue("00:01:00"), "Autosave"」意
思是從現在開始,一分鐘之後執行「Autosave」巨集,最後結束此段程式:
「End Sub」。
六、編寫另一段程式:
Sub Autosave()」
Range("A1") = ThisWorkbook.Path
在儲存格「A1」寫入目前工作簿所在的資料夾路徑。
n = ThisWorkbook.Name
定義「n」為目前工作簿的檔案名稱。
Range("A2") = n
在儲存格「A2」寫入「n」。
n = Left(n, InStrRev(n, ".") - 1)
更新定義「n」。這裡使用了兩個函數,「InStrRev」函數是從後面開始尋找
,傳回某字串在另一個字串中首次出現的位置,Left函數是傳回文字字串中
的前幾個字元 。以這篇文章的Excel檔案為例,原來「n」的內容是「
ThisWorkbook.Name」,也就是「VBA如何另存檔案備份.xlsm」,然後又更新
了「n = Left(n, InStrRev(n, ".") - 1)「InStrRev(n, ".")」,等於是去
掉副檔名,結果便是「VBA如何另存檔案備份」。
Range("A3") = n
在儲存格「A3」寫入「n」。
ThisWorkbook.SaveCopyAs Filename:=ThisWorkbook.Path & "\" & n &
"-" & "copy" & ".xlsm"
此為VBA標準語法,對象和程序中間以「.」隔開,「
ThisWorkbook.SaveCopyAs」意思是以目前工作簿為對象,執行另存檔案,空
一格後面是具體描述(Excel的正式說法叫屬性),這裡設定檔名為:「
Filename:=ThisWorkbook.Path & "\" & n & "-" & "copy" & ".xlsm"」,
這句程式對於熟悉Excel公式的人,應該不難理解。
MsgBox "已自動儲存"
提示訊息視窗:「已自動儲存」。
Call Time
召喚執行「Time」巨集。
End Sub
結束「Autosave」巨集。
這篇文章的VBA不會太複雜,但是涉及到的程式概念相當完整。有一個具體的
執行程序(事件屬性的書寫語法)、有根據需求所定義的變數(VBA習慣是一
再更新定義)、有設計公式計算的函數(Excel原有函數及VBA特有函數)、
最後將結果寫入Excel儲存格中,並且配合提示視窗和關聯巨集的操作。如果
這些「關鍵零組件」都能夠熟悉,觸類旁通,將會大大強化VBA的實作能力。
延伸閱讀:
VBA如何定期自動儲存檔案
https://www.b88104069.com/archives/4148
VBA如何同時兩列以上VLOOKUP
https://www.b88104069.com/archives/4146
VBA如何執行VLOOKUP函數
https://www.b88104069.com/archives/4145
--
周末,我們繼續Excel:精華區=>21.心得=>5.其他=>3.office
會計人的Excel小教室: https://www.facebook.com/acctexcel
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 112.20.97.50
※ 文章網址: https://www.ptt.cc/bbs/Accounting/M.1483536858.A.CED.html
... <看更多>