{"id":130,"date":"2024-03-16T21:09:39","date_gmt":"2024-03-16T21:09:39","guid":{"rendered":"https:\/\/rayerden.com\/index.php\/my-blog\/"},"modified":"2024-10-31T20:17:32","modified_gmt":"2024-10-31T20:17:32","slug":"my-blog","status":"publish","type":"page","link":"https:\/\/www.rayerden.com\/index.php\/my-blog\/","title":{"rendered":"MY BLOG"},"content":{"rendered":"\n    \n    <section class=\"u-clearfix u-section-2\" id=\"sec-bb34\">\n      <div class=\"u-clearfix u-sheet u-sheet-1\">\n        <div data-interval=\"5000\" data-u-ride=\"carousel\" class=\"u-carousel u-slider u-slider-1\" id=\"carousel-f4cc\">\n          <ol class=\"u-absolute-hcenter u-carousel-indicators u-carousel-indicators-1\">\n            <li data-u-target=\"#carousel-f4cc\" class=\"u-active u-grey-30\" data-u-slide-to=\"0\"><\/li>\n            <li data-u-target=\"#carousel-f4cc\" class=\"u-grey-30\" data-u-slide-to=\"1\"><\/li>\n            <li data-u-target=\"#carousel-f4cc\" class=\"u-grey-30\" data-u-slide-to=\"2\"><\/li>\n            <li data-u-target=\"#carousel-f4cc\" class=\"u-grey-30\" data-u-slide-to=\"3\"><\/li>\n            <li data-u-target=\"#carousel-f4cc\" class=\"u-grey-30\" data-u-slide-to=\"4\"><\/li>\n            <li data-u-target=\"#carousel-f4cc\" class=\"u-grey-30\" data-u-slide-to=\"5\"><\/li>\n            <li data-u-target=\"#carousel-f4cc\" class=\"u-grey-30\" data-u-slide-to=\"6\"><\/li>\n          <\/ol>\n          <div class=\"u-carousel-inner\" role=\"listbox\">\n            <div class=\"u-active u-carousel-item u-container-style u-image u-slide u-image-1\" data-image-width=\"1600\" data-image-height=\"1001\" style=\"background-image: url(&quot;https:\/\/www.rayerden.com\/wp-content\/uploads\/2024\/03\/Data-Mining-Techniques-15.jpg&quot;);\">\n              <div class=\"u-container-layout u-container-layout-1\"><\/div>\n            <\/div>\n            <div class=\"u-carousel-item u-container-style u-image u-slide u-image-2\" data-image-width=\"1200\" data-image-height=\"675\" style=\"background-image: url(&quot;https:\/\/www.rayerden.com\/wp-content\/uploads\/2024\/03\/sql-nedir.png&quot;);\">\n              <div class=\"u-container-layout u-container-layout-2\"><\/div>\n            <\/div>\n            <div class=\"u-carousel-item u-container-style u-image u-slide u-image-3\" data-image-width=\"1920\" data-image-height=\"1080\" style=\"background-image: url(&quot;https:\/\/www.rayerden.com\/wp-content\/uploads\/2024\/03\/Data-Science-Exercises.jpg&quot;);\">\n              <div class=\"u-container-layout u-container-layout-3\"><\/div>\n            <\/div>\n            <div class=\"u-carousel-item u-container-style u-image u-slide u-image-4\" data-image-width=\"900\" data-image-height=\"500\" style=\"background-image: url(&quot;https:\/\/www.rayerden.com\/wp-content\/uploads\/2024\/03\/Microsoft-Access-Microsoft-Office-dev-Database-Veritaban-Proje-Tasarm-Yaptrma.jpg&quot;);\">\n              <div class=\"u-container-layout u-container-layout-4\"><\/div>\n            <\/div>\n            <div class=\"u-carousel-item u-container-style u-image u-slide u-image-5\" data-image-width=\"1000\" data-image-height=\"616\" style=\"background-image: url(&quot;https:\/\/www.rayerden.com\/wp-content\/uploads\/2024\/03\/shutterstock_488322949-19.jpg&quot;);\">\n              <div class=\"u-container-layout u-container-layout-5\"><\/div>\n            <\/div>\n            <div class=\"u-carousel-item u-container-style u-image u-slide u-image-6\" data-image-width=\"512\" data-image-height=\"288\" style=\"background-image: url(&quot;https:\/\/www.rayerden.com\/wp-content\/uploads\/2024\/03\/unnamed3.jpg&quot;);\">\n              <div class=\"u-container-layout u-container-layout-6\"><\/div>\n            <\/div>\n            <div class=\"u-carousel-item u-container-style u-slide\">\n              <div class=\"u-container-layout u-container-layout-7\">\n                <img decoding=\"async\" class=\"u-expanded-width u-image u-image-default u-image-7\" src=\"https:\/\/www.rayerden.com\/wp-content\/uploads\/2024\/08\/ChatGPT_1.jpeg\" alt=\"\" data-image-width=\"392\" data-image-height=\"220\">\n              <\/div>\n            <\/div>\n          <\/div>\n          <a class=\"u-absolute-vcenter u-carousel-control u-carousel-control-prev u-spacing-5 u-text-grey-30 u-carousel-control-1\" href=\"#carousel-f4cc\" role=\"button\" data-u-slide=\"prev\">\n            <span aria-hidden=\"true\">\n              <svg viewBox=\"0 0 477.175 477.175\"><path d=\"M145.188,238.575l215.5-215.5c5.3-5.3,5.3-13.8,0-19.1s-13.8-5.3-19.1,0l-225.1,225.1c-5.3,5.3-5.3,13.8,0,19.1l225.1,225\n                    c2.6,2.6,6.1,4,9.5,4s6.9-1.3,9.5-4c5.3-5.3,5.3-13.8,0-19.1L145.188,238.575z\"><\/path><\/svg>\n            <\/span>\n            <span class=\"sr-only\">Previous<\/span>\n          <\/a>\n          <a class=\"u-absolute-vcenter u-carousel-control u-carousel-control-next u-spacing-5 u-text-grey-30 u-carousel-control-2\" href=\"#carousel-f4cc\" role=\"button\" data-u-slide=\"next\">\n            <span aria-hidden=\"true\">\n              <svg viewBox=\"0 0 477.175 477.175\"><path d=\"M360.731,229.075l-225.1-225.1c-5.3-5.3-13.8-5.3-19.1,0s-5.3,13.8,0,19.1l215.5,215.5l-215.5,215.5\n                    c-5.3,5.3-5.3,13.8,0,19.1c2.6,2.6,6.1,4,9.5,4c3.4,0,6.9-1.3,9.5-4l225.1-225.1C365.931,242.875,365.931,234.275,360.731,229.075z\"><\/path><\/svg>\n            <\/span>\n            <span class=\"sr-only\">Next<\/span>\n          <\/a>\n        <\/div>\n      <\/div>\n    <\/section>\n    <section class=\"u-clearfix u-image u-section-3\" id=\"sec-4e36\" data-image-width=\"1170\" data-image-height=\"400\" style=\"background-image: url(&quot;https:\/\/www.rayerden.com\/wp-content\/uploads\/2024\/03\/1608881094-advanced-microsoft-excel-training.jpg.png&quot;);\">\n      <div class=\"u-clearfix u-sheet u-sheet-1\"><\/div>\n    <\/section>\n    <section class=\"u-align-center u-clearfix u-container-align-center u-section-4\" id=\"sec-5f65\">\n      <div class=\"u-clearfix u-sheet u-sheet-1\">\n        <h5 class=\"u-align-center u-text u-text-default u-text-1\">Excel &amp; Access VBA blog <\/h5>\n        <h2 class=\"u-align-center u-text u-text-default u-text-2\">Handpicked Examples <\/h2>\n        <p class=\"u-align-center u-text u-text-3\">On this blog I add random but select VBA functions, subprocedures and subroutines that I'd consider similar or comparable to the ones that I used over time to resolve various automation issues in Excel and Access via VBA based macros to handle challenging tasks that I had to grapple with at work.&nbsp; I gather these code snippets from around multiple sources and display them here as kind of a collection of code library to provide a showcase of how I utilized VBA in real life and also as a reference source.&nbsp; <\/p>\n      <\/div>\n    <\/section>\n    <section class=\"u-align-center u-clearfix u-container-align-center u-white u-section-5\" id=\"sec-f218\">\n      <div class=\"u-clearfix u-sheet u-sheet-1\">\n        <div class=\"u-expanded-width u-list u-list-1\">\n          <div class=\"u-repeater u-repeater-1\">\n            <div class=\"u-align-left u-container-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-list-item-1\">\n              <div class=\"u-container-layout u-similar-container u-valign-top u-container-layout-1\">\n                <h4 class=\"u-text u-text-1\">Search through a two-dimension Matrix with the VLOOKUP-Function<\/h4>\n                <p class=\"u-text u-text-2\"> 'Place the code below into the standard module<br> Sub ArrayTest()<br> Dim arrValue(1 To 100, 1 To 2) As Integer<br> Dim varTest As Variant<br> Dim intCounter As Integer, intTest As Integer<br> intTest = CInt(InputBox(\"Controldigit enter:\", , 5))<br> For intCounter = 1 To 100<br> arrValue(intCounter, 1) = intCounter<br> arrValue(intCounter, 2) = intCounter * 10<br> Next intCounter<br> varTest = Application.VLookup(intTest, arrValue, 2, 0)<br> If IsError(varTest) Then<br> Beep<br> MsgBox \"Value Not Found!\"<br> Else<br> MsgBox \"Value: \" &amp; varTest<br> End If<br> End Sub \n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover u-list-item-2\">\n              <div class=\"u-container-layout u-similar-container u-valign-top u-container-layout-2\">\n                <h4 class=\"u-text u-text-3\">With a user defined function, determine text, address and sub address of a hyperlink.<\/h4>\n                <p class=\"u-text u-text-4\">'Place the following user defined function in a standard VBA module&nbsp;<br>\n                  <br>Function SplitHype(rng As Range, iInfo As Integer)<br> Select Case iInfo<br> Case 0: SplitHype = rng.Value<br> Case 1: SplitHype = rng.Hyperlinks(1).Address<br> Case 2: SplitHype = rng.Hyperlinks(1).SubAddress<br> End Select<br> End Function \n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover u-list-item-3\">\n              <div class=\"u-container-layout u-similar-container u-valign-top u-container-layout-3\">\n                <h4 class=\"u-text u-text-5\">Count only colored cells<\/h4>\n                <p class=\"u-text u-text-6\">'Place the below UDF(user defined function)in a standard VBA module.<br>\n                  <br>Function CountColor(rng As Range, iColor As Integer)<br> Dim rngAct As Range<br> Dim iCount As Integer<br> For Each rngAct In rng.Cells<br> If rngAct.Interior.ColorIndex = iColor And _<br> Not IsEmpty(rngAct) Then<br> iCount = iCount + 1<br> End If<br> Next rngAct<br> CountColor = iCount<br> End Function<br>\n                  <br> Formula is   =countcolor(A1:C6,6) \n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover u-list-item-4\">\n              <div class=\"u-container-layout u-similar-container u-valign-top u-container-layout-4\">\n                <h4 class=\"u-text u-text-7\">Ascertain if a File exists in a Directory<\/h4>\n                <p class=\"u-text u-text-8\">'Place the code below into the standard module<br> Sub File_exists()<br> Dim dName$<br> dName = \"c:exceltest.xls\"<br> If Dir(dName) &lt;&gt; \"\" Then<br> MsgBox dName &amp; \" exists!\"<br> Else<br> MsgBox dName &amp; \" does not exist!\"<br> End If<br> End Sub \n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover u-list-item-5\">\n              <div class=\"u-container-layout u-similar-container u-valign-top u-container-layout-5\">\n                <h4 class=\"u-text u-text-9\">VLOOKUP on a Closed Workbook<\/h4>\n                <p class=\"u-text u-text-10\">'Place the code below into the standard module<br>\n                  <br> Sub Reference()<br>\n                  <br> Range(\"A2\").Formula = _<br>\n                  <br> \"=VLOOKUP(A1,'c:excel[test1.xls]Sheet1'!A1:B4,2,0)\"<br>\n                  <br> End Sub \n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover u-list-item-6\">\n              <div class=\"u-container-layout u-similar-container u-valign-top u-container-layout-6\">\n                <h4 class=\"u-text u-text-11\">Construct an Array Formula in VBA<\/h4>\n                <p class=\"u-text u-text-12\">'Place the code below into the standard module<br>\n                  <br>Sub BuildSum()<br>\n                  <br>&nbsp;&nbsp; Dim z%, i%<br>\n                  <br>&nbsp;&nbsp; Cells(20, 8).Select<br>\n                  <br>&nbsp;&nbsp; z = ActiveCell.Row<br>\n                  <br>&nbsp;&nbsp; For i = 1 To 7<br>\n                  <br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Cells(z - 1 + i, 6).FormulaArray = _<br>\n                  <br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; \"=SUM((r2c1:r23c2=1)*(r2c3:r23c3=\" &amp; i &amp; \")*(r2c[-2]:r23c[-2]))\"<br>\n                  <br>&nbsp;&nbsp; Next i<br>\n                  <br>End Sub \n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover u-list-item-7\">\n              <div class=\"u-container-layout u-similar-container u-valign-top u-container-layout-7\">\n                <h4 class=\"u-text u-text-13\">Auto Update Sorted List<\/h4>\n                <p class=\"u-text u-text-14\">Private Sub Worksheet_Change(ByVal Target As Range)<br>If Not Intersect(Target, Range(\"A1:A5\")) Is Nothing Then<br>&nbsp; &nbsp; Range(\"A1:A5\").Sort Range(\"A1\"), xlAscending, Header:=xlYes<br>End If<br>End Sub&nbsp; \n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover u-list-item-8\">\n              <div class=\"u-container-layout u-similar-container u-valign-top u-container-layout-8\">\n                <h4 class=\"u-text u-text-15\">XLOOKUP FUNCTION<\/h4>\n                <p class=\"u-text u-text-16\">Microsoft added this long anticipated function to Excel early part of the 2020.&nbsp; XLOOKUP replaces the old VLOOKUP and offers a whole lot more power and flexibility.&nbsp; I added to<a href=\"https:\/\/202.sb.mywebsite-editor.com\/app\/765938332\/137364593\" target=\"_blank\" class=\"u-active-none u-border-none u-btn u-button-link u-button-style u-hover-none u-none u-text-body-alt-color u-btn-1\">&nbsp;Sample Excel Macros section<\/a>&nbsp;a file to illustrate various different ways of utilizing this valuable function. \n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover u-list-item-9\">\n              <div class=\"u-container-layout u-similar-container u-valign-top u-container-layout-9\">\n                <h4 class=\"u-text u-text-17\">How to Compare Two Data Ranges in Excel<\/h4>\n                <p class=\"u-text u-text-18\">On my Projects &gt;&nbsp;Sample Excel&nbsp;Files section I added a file&nbsp;RangeComparison1.xlsx.&nbsp; If curious you may want to open this file and check it for yourself.&nbsp; Change a cell value anywhere in either of the ranges on Sheet1 or Sheet2 then click on the button&nbsp;located on&nbsp;Sheet1.&nbsp; If there is a change i.e. ranges are not identical then VBA will generate another Excel file indicating where the difference is and will highlight in red color, if data is exactly the same then VBA will tell you that as well.&nbsp; There&nbsp;were times that I had to deal with comparing two data sets and tried to use many convoluted and cumbersome formula based methods after I got sick and tired of that process and&nbsp;I have started using this method where applicable.<\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover u-list-item-10\">\n              <div class=\"u-container-layout u-similar-container u-valign-top u-container-layout-10\">\n                <h4 class=\"u-text u-text-19\">Convert all external links from formulas into values<\/h4>\n                <p class=\"u-text u-text-20\">Put the below code in a standard module then assign it to a button.&nbsp;Sub Link2Value()<br>&nbsp;&nbsp; Dim rng As Range<br>&nbsp;&nbsp; For Each rng In ActiveSheet.UsedRange.Cells<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; If rng.HasFormula Then<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; If InStr(rng.Formula, \"[\") Then<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; rng.Value = rng.Value<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End If<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End If<br>&nbsp;&nbsp; Next rng<br>End Sub \n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover u-list-item-11\">\n              <div class=\"u-container-layout u-similar-container u-valign-top u-container-layout-11\">\n                <h4 class=\"u-text u-text-21\">Extract Year from Text<\/h4>\n                <p class=\"u-text u-text-22\">Extracting a&nbsp;year from&nbsp;text is possible using string functions if the location of the year is&nbsp;fixed&nbsp;in the text within&nbsp;each cell. But in a free form&nbsp;sentence where the year is used anywhere according to the context&nbsp;there is no way of knowing where in the cell the year is located.&nbsp; In this case UDF (user defined function)&nbsp;created in VBA solves the issue and it is&nbsp;stored like another Excel built-in function so typing the name of this function is sufficient in the fomula line.&nbsp;&nbsp;Refer to the file on macro samples for this example called ExtractYerFromText.xls.&nbsp;&nbsp;Below is the code used to create the said&nbsp;UDF.<br>Function GetYear(txt As String) As Integer<br>&nbsp;&nbsp; Dim intCounter As Integer<br>&nbsp;&nbsp; txt = txt &amp; \" \"<br>&nbsp;&nbsp; For intCounter = 1 To Len(txt) - 4<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; If Mid(txt, intCounter, 5) Like \"*#### *\" Then<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; GetYear = Mid(txt, intCounter, 4)<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Exit Function<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End If<br>&nbsp;&nbsp; Next intCounter<br>End Function<br>\n                  <br>Note - - UDF as entered would be&nbsp;&nbsp; =GetYear(A2)<br>\n                  <br>\n                  <br>Assigned to a forms button:<br>\n                  <br>Sub YearCaller()<br>&nbsp;&nbsp; Dim x As Integer<br>&nbsp;&nbsp; x = GetYear(Range(\"A2\").Value)<br>&nbsp;&nbsp; MsgBox x<br>End Sub \n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover u-list-item-12\">\n              <div class=\"u-container-layout u-similar-container u-valign-top u-container-layout-12\">\n                <h4 class=\"u-text u-text-23\">Hide Empty Rows on Print<\/h4>\n                <p class=\"u-text u-text-24\">Use this code block in the standard module to print the range without blank rows in it.&nbsp;<br>Sub PrintRows()<br>&nbsp;&nbsp;&nbsp; Dim TB As Worksheet<br>&nbsp;&nbsp;&nbsp; Dim i%, lRow%<br>&nbsp;&nbsp;&nbsp; Application.ScreenUpdating = False<br>&nbsp;&nbsp;&nbsp; Set TB = Worksheets(\"Sheet1\")<br>&nbsp;&nbsp;&nbsp; lRow = TB.[a16384].End(xlUp).Row<br>&nbsp;&nbsp;&nbsp; For i = 1 To lRow<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; If IsEmpty(TB.Cells(i, 1)) Then TB.Rows(i).EntireRow.Hidden = True<br>&nbsp;&nbsp;&nbsp; Next i<br>&nbsp;&nbsp;&nbsp; TB.PrintPreview<br>&nbsp;&nbsp;&nbsp; TB.Range(TB.Cells(1, 1), TB.Cells(lRow, 1)).EntireRow.Hidden = False<br>Application.ScreenUpdating = True<br>End Sub \n                <\/p>\n              <\/div>\n            <\/div>\n          <\/div>\n        <\/div>\n      <\/div>\n    <\/section>\n    <section class=\"u-align-center u-clearfix u-container-align-center u-white u-section-6\" id=\"carousel_c886\">\n      <div class=\"u-clearfix u-sheet u-sheet-1\">\n        <div class=\"u-expanded-width u-list u-list-1\">\n          <div class=\"u-repeater u-repeater-1\">\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-list-item-1\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-1\">\n                <h4 class=\"u-text u-text-1\">Create an Access File from within Excel File<\/h4>\n                <p class=\"u-text u-text-2\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-2\">\n                <h4 class=\"u-text u-text-3\">Sort by Frequency<\/h4>\n                <p class=\"u-text u-text-4\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-3\">\n                <h4 class=\"u-text u-text-5\">Conditional Formatting with VBA<\/h4>\n                <p class=\"u-text u-text-6\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-4\">\n                <h4 class=\"u-text u-text-7\">User Defined Function (UDF): How can I ascertain if two fields have identical Values?<\/h4>\n                <p class=\"u-text u-text-8\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-5\">\n                <h4 class=\"u-text u-text-9\">List Dates and Week Number<\/h4>\n                <p class=\"u-text u-text-10\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-6\">\n                <h4 class=\"u-text u-text-11\">How can I make Excel ask for a Start- and Enddate via an InputBox and then mark both dates colored?<\/h4>\n                <p class=\"u-text u-text-12\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-7\">\n                <h4 class=\"u-text u-text-13\">Array Function<\/h4>\n                <p class=\"u-text u-text-14\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-8\">\n                <h4 class=\"u-text u-text-15\">INDIRECT FUNCTION<\/h4>\n                <p class=\"u-text u-text-16\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-9\">\n                <h4 class=\"u-text u-text-17\">INDEX and MATCH Function<\/h4>\n                <p class=\"u-text u-text-18\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-10\">\n                <h4 class=\"u-text u-text-19\">SAP Analysis Office on Excel<\/h4>\n                <p class=\"u-text u-text-20\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-11\">\n                <h4 class=\"u-text u-text-21\">Dynamically Refreshing Pivot Tables<\/h4>\n                <p class=\"u-text u-text-22\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-12\">\n                <h4 class=\"u-text u-text-23\">Create Hyperlinks to all Excel-Files of a directory <\/h4>\n                <p class=\"u-text u-text-24\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-13\">\n                <h4 class=\"u-text u-text-25\">Open all Workbooks of a Directory <\/h4>\n                <p class=\"u-text u-text-26\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-14\">\n                <h4 class=\"u-text u-text-27\">List Files of a Folder in a Combobox <\/h4>\n                <p class=\"u-text u-text-28\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-15\">\n                <h4 class=\"u-text u-text-29\">Compare tables and mark discrepancies <\/h4>\n                <p class=\"u-text u-text-30\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-16\">\n                <h4 class=\"u-text u-text-31\">Sort address list by name, street and city <\/h4>\n                <p class=\"u-text u-text-32\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-17\">\n                <h4 class=\"u-text u-text-33\"> Retrieving data from a CSV file by using ADO connection.<\/h4>\n                <p class=\"u-text u-text-34\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-18\">\n                <h4 class=\"u-text u-text-35\"> Creating a new Access Database in code.<\/h4>\n                <p class=\"u-text u-text-36\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-19\">\n                <h4 class=\"u-text u-text-37\"> Accessing MYSQL Database on Web.<\/h4>\n                <p class=\"u-text u-text-38\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-20\">\n                <h4 class=\"u-text u-text-39\"> SUMIF-function over several worksheets<\/h4>\n                <p class=\"u-text u-text-40\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-21\">\n                <h4 class=\"u-text u-text-41\"> Usage of VLOOKUP with several criteria<\/h4>\n                <p class=\"u-text u-text-42\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-22\">\n                <h4 class=\"u-text u-text-43\"> Sum IFSUM additions from several sheets<\/h4>\n                <p class=\"u-text u-text-44\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-23\">\n                <h4 class=\"u-text u-text-45\"> Import Excel Sheets to Access Tables<\/h4>\n                <p class=\"u-text u-text-46\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-24\">\n                <h4 class=\"u-text u-text-47\"> String Manipulation\/Convert Text to Date<\/h4>\n                <p class=\"u-text u-text-48\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-25\">\n                <h4 class=\"u-text u-text-49\"> Access Links Table Location Change<\/h4>\n                <p class=\"u-text u-text-50\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-26\">\n                <h4 class=\"u-text u-text-51\"> Put Dashes for Null Fields on Access Table<\/h4>\n                <p class=\"u-text u-text-52\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-27\">\n                <h4 class=\"u-text u-text-53\"> Using an INSERT INTO Query to Add Records to a Local Table in Access<\/h4>\n                <p class=\"u-text u-text-54\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-28\">\n                <h4 class=\"u-text u-text-55\"> Convert all Append Queries starting with Select into starting with Select Distinct in Access<\/h4>\n                <p class=\"u-text u-text-56\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-29\">\n                <h4 class=\"u-text u-text-57\"> Run macros in Access from a drop down box on a form<\/h4>\n                <p class=\"u-text u-text-58\"> Problem:<br>I have two Excel files like File A and File B, I need to create a batch process to run on my desktop where File A is linked to Access database and File B contains the updated records to be copied into File A so once File A gets updated Access table which is linked to it will be updated as well.\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-30\">\n                <h4 class=\"u-text u-text-59\"> Source file update for Access Table&nbsp;<\/h4>\n                <p class=\"u-text u-text-60\"> Option Explicit <br>\n                  <br>Dim xlApp, xlFileA, xlFileB <br>Dim wsA, wsB <br>Dim lastRowA, lastRowB <br>Dim fileAPath, fileBPath <br>\n                  <br>' Define the file paths <br>fileAPath = \"C:\\path\\to\\FileA.xlsx\"  ' Update with the correct path to File A <br>fileBPath = \"C:\\path\\to\\FileB.xlsx\"  ' Update with the correct path to File B <br>\n                  <br>' Create Excel application object <br>Set xlApp = CreateObject(\"Excel.Application\") <br>xlApp.Visible = False <br>xlApp.DisplayAlerts = False <br>\n                  <br>' Open both Excel files <br>Set xlFileA = xlApp.Workbooks.Open(fileAPath) <br>Set xlFileB = xlApp.Workbooks.Open(fileBPath) <br>\n                  <br>' Set worksheet references <br>Set wsA = xlFileA.Sheets(1) ' Adjust sheet number if necessary <br>Set wsB = xlFileB.Sheets(1) ' Adjust sheet number if necessary <br>\n                  <br>' Get last row in both worksheets <br>lastRowA = wsA.Cells(wsA.Rows.Count, 1).End(-4162).Row ' -4162 is equivalent to xlUp in VBA <br>lastRowB = wsB.Cells(wsB.Rows.Count, 1).End(-4162).Row <br>\n                  <br>' Copy data from File B (Source) to File A (Destination) <br>wsB.Range(\"A1:Z\" &amp; lastRowB).Copy wsA.Cells(lastRowA + 1, 1) ' Adjust the range accordingly <br>\n                  <br>' Save and close the workbooks <br>xlFileA.Save <br>xlFileA.Close <br>xlFileB.Close <br>\n                  <br>' Quit Excel <br>xlApp.Quit <br>\n                  <br>' Release objects <br>Set wsA = Nothing <br>Set wsB = Nothing <br>Set xlFileA = Nothing <br>Set xlFileB = Nothing <br>Set xlApp = Nothing&nbsp;<br>\n                <\/p>\n              <\/div>\n            <\/div>\n            <div class=\"u-align-left u-container-style u-custom-color-1 u-list-item u-repeater-item u-video-cover\">\n              <div class=\"u-container-layout u-similar-container u-container-layout-31\">\n                <h4 class=\"u-text u-text-61\"> Handling Button Responses<\/h4>\n                <p class=\"u-text u-text-62\"> Sub RunQueriesWithResponse() <br> DoCmd.SetWarnings False <br> DoCmd.OpenQuery \"YourQuery1\" <br> DoCmd.OpenQuery \"YourQuery2\" <br> DoCmd.SetWarnings True <br>\n                  <br> ' Variable to capture the user's response <br> Dim response As Integer <br> response = MsgBox(\"Do you want to continue?\", vbQuestion + vbYesNo, \"Continue?\") <br>\n                  <br> ' Check the response <br> If response = vbYes Then <br> MsgBox \"User chose to continue!\", vbInformation <br> Else <br> MsgBox \"User chose to stop.\", vbCritical <br> End If <br>End Sub&nbsp;<br>\n                <\/p>\n              <\/div>\n            <\/div>\n          <\/div>\n        <\/div>\n      <\/div>\n    <\/section>\n    <section class=\"u-clearfix u-custom-color-1 u-section-7\" id=\"sec-8656\">\n      <div class=\"u-clearfix u-sheet u-sheet-1\">\n        <h1 class=\"u-align-center-md u-align-center-sm u-align-center-xs u-text u-text-1\"> www.rayerden.com<\/h1>\n        <div class=\"u-social-icons u-spacing-10 u-social-icons-1\">\n          <a class=\"u-social-url\" title=\"facebook\" target=\"_blank\" href=\"https:\/\/www.facebook.com\/ray.erden1\/\"><span class=\"u-icon u-social-facebook u-social-icon u-icon-1\"><svg class=\"u-svg-link\" preserveAspectRatio=\"xMidYMin slice\" viewBox=\"0 0 112 112\" style=\"\"><use xlink:href=\"#svg-264c\"><\/use><\/svg><svg class=\"u-svg-content\" viewBox=\"0 0 112 112\" x=\"0\" y=\"0\" id=\"svg-264c\"><circle fill=\"currentColor\" cx=\"56.1\" cy=\"56.1\" r=\"55\"><\/circle><path fill=\"#FFFFFF\" d=\"M73.5,31.6h-9.1c-1.4,0-3.6,0.8-3.6,3.9v8.5h12.6L72,58.3H60.8v40.8H43.9V58.3h-8V43.9h8v-9.2\nc0-6.7,3.1-17,17-17h12.5v13.9H73.5z\"><\/path><\/svg><\/span>\n          <\/a>\n          <a class=\"u-social-url\" title=\"twitter\" target=\"_blank\" href=\"https:\/\/twitter.com\/unbiasedview\"><span class=\"u-icon u-social-icon u-social-twitter u-icon-2\"><svg class=\"u-svg-link\" preserveAspectRatio=\"xMidYMin slice\" viewBox=\"0 0 112 112\" style=\"\"><use xlink:href=\"#svg-8203\"><\/use><\/svg><svg class=\"u-svg-content\" viewBox=\"0 0 112 112\" x=\"0\" y=\"0\" id=\"svg-8203\"><circle fill=\"currentColor\" class=\"st0\" cx=\"56.1\" cy=\"56.1\" r=\"55\"><\/circle><path fill=\"#FFFFFF\" d=\"M83.8,47.3c0,0.6,0,1.2,0,1.7c0,17.7-13.5,38.2-38.2,38.2C38,87.2,31,85,25,81.2c1,0.1,2.1,0.2,3.2,0.2\nc6.3,0,12.1-2.1,16.7-5.7c-5.9-0.1-10.8-4-12.5-9.3c0.8,0.2,1.7,0.2,2.5,0.2c1.2,0,2.4-0.2,3.5-0.5c-6.1-1.2-10.8-6.7-10.8-13.1\nc0-0.1,0-0.1,0-0.2c1.8,1,3.9,1.6,6.1,1.7c-3.6-2.4-6-6.5-6-11.2c0-2.5,0.7-4.8,1.8-6.7c6.6,8.1,16.5,13.5,27.6,14\nc-0.2-1-0.3-2-0.3-3.1c0-7.4,6-13.4,13.4-13.4c3.9,0,7.3,1.6,9.8,4.2c3.1-0.6,5.9-1.7,8.5-3.3c-1,3.1-3.1,5.8-5.9,7.4\nc2.7-0.3,5.3-1,7.7-2.1C88.7,43,86.4,45.4,83.8,47.3z\"><\/path><\/svg><\/span>\n          <\/a>\n          <a class=\"u-social-url\" title=\"instagram\" target=\"_blank\" href=\"https:\/\/www.instagram.com\/erdenray\/\"><span class=\"u-icon u-social-icon u-social-instagram u-icon-3\"><svg class=\"u-svg-link\" preserveAspectRatio=\"xMidYMin slice\" viewBox=\"0 0 112 112\" style=\"\"><use xlink:href=\"#svg-e2bc\"><\/use><\/svg><svg class=\"u-svg-content\" viewBox=\"0 0 112 112\" x=\"0\" y=\"0\" id=\"svg-e2bc\"><circle fill=\"currentColor\" cx=\"56.1\" cy=\"56.1\" r=\"55\"><\/circle><path fill=\"#FFFFFF\" d=\"M55.9,38.2c-9.9,0-17.9,8-17.9,17.9C38,66,46,74,55.9,74c9.9,0,17.9-8,17.9-17.9C73.8,46.2,65.8,38.2,55.9,38.2\nz M55.9,66.4c-5.7,0-10.3-4.6-10.3-10.3c-0.1-5.7,4.6-10.3,10.3-10.3c5.7,0,10.3,4.6,10.3,10.3C66.2,61.8,61.6,66.4,55.9,66.4z\"><\/path><path fill=\"#FFFFFF\" d=\"M74.3,33.5c-2.3,0-4.2,1.9-4.2,4.2s1.9,4.2,4.2,4.2s4.2-1.9,4.2-4.2S76.6,33.5,74.3,33.5z\"><\/path><path fill=\"#FFFFFF\" d=\"M73.1,21.3H38.6c-9.7,0-17.5,7.9-17.5,17.5v34.5c0,9.7,7.9,17.6,17.5,17.6h34.5c9.7,0,17.5-7.9,17.5-17.5V38.8\nC90.6,29.1,82.7,21.3,73.1,21.3z M83,73.3c0,5.5-4.5,9.9-9.9,9.9H38.6c-5.5,0-9.9-4.5-9.9-9.9V38.8c0-5.5,4.5-9.9,9.9-9.9h34.5\nc5.5,0,9.9,4.5,9.9,9.9V73.3z\"><\/path><\/svg><\/span>\n          <\/a>\n          <a class=\"u-social-url\" target=\"_blank\" data-type=\"YouTube\" title=\"YouTube\" href=\"https:\/\/www.youtube.com\/channel\/UCNN_MT-0jUwoeMo5MLTZRxw\"><span class=\"u-icon u-social-icon u-social-youtube u-icon-4\"><svg class=\"u-svg-link\" preserveAspectRatio=\"xMidYMin slice\" viewBox=\"0 0 112 112\" style=\"\"><use xlink:href=\"#svg-01f3\"><\/use><\/svg><svg class=\"u-svg-content\" viewBox=\"0 0 112 112\" x=\"0\" y=\"0\" id=\"svg-01f3\"><circle fill=\"currentColor\" cx=\"56.1\" cy=\"56.1\" r=\"55\"><\/circle><path fill=\"#FFFFFF\" d=\"M74.9,33.3H37.3c-7.4,0-13.4,6-13.4,13.4v18.8c0,7.4,6,13.4,13.4,13.4h37.6c7.4,0,13.4-6,13.4-13.4V46.7 C88.3,39.3,82.3,33.3,74.9,33.3L74.9,33.3z M65.9,57l-17.6,8.4c-0.5,0.2-1-0.1-1-0.6V47.5c0-0.5,0.6-0.9,1-0.6l17.6,8.9 C66.4,56,66.4,56.8,65.9,57L65.9,57z\"><\/path><\/svg><\/span>\n          <\/a>\n          <a class=\"u-social-url\" target=\"_blank\" data-type=\"LinkedIn\" title=\"LinkedIn\" href=\"https:\/\/www.linkedin.com\/in\/ray-erden-m-a-business-economics-71b3a43\"><span class=\"u-icon u-social-icon u-social-linkedin u-icon-5\"><svg class=\"u-svg-link\" preserveAspectRatio=\"xMidYMin slice\" viewBox=\"0 0 112 112\" style=\"\"><use xlink:href=\"#svg-8dbb\"><\/use><\/svg><svg class=\"u-svg-content\" viewBox=\"0 0 112 112\" x=\"0\" y=\"0\" id=\"svg-8dbb\"><circle fill=\"currentColor\" cx=\"56.1\" cy=\"56.1\" r=\"55\"><\/circle><path fill=\"#FFFFFF\" d=\"M41.3,83.7H27.9V43.4h13.4V83.7z M34.6,37.9L34.6,37.9c-4.6,0-7.5-3.1-7.5-7c0-4,3-7,7.6-7s7.4,3,7.5,7\n            C42.2,34.8,39.2,37.9,34.6,37.9z M89.6,83.7H76.2V62.2c0-5.4-1.9-9.1-6.8-9.1c-3.7,0-5.9,2.5-6.9,4.9c-0.4,0.9-0.4,2.1-0.4,3.3v22.5\n            H48.7c0,0,0.2-36.5,0-40.3h13.4v5.7c1.8-2.7,5-6.7,12.1-6.7c8.8,0,15.4,5.8,15.4,18.1V83.7z\"><\/path><\/svg><\/span>\n          <\/a>\n        <\/div>\n      <\/div>\n    <\/section>\n    \n    \n    \n  \n","protected":false},"excerpt":{"rendered":"<p>Previous Next Excel &amp; Access VBA blog Handpicked Examples On this blog I add random but select VBA functions, subprocedures and subroutines that I&#8217;d consider similar or comparable to the ones that I used over time to resolve various automation issues in Excel and Access via VBA based macros to handle challenging tasks that I &hellip; <a href=\"https:\/\/www.rayerden.com\/index.php\/my-blog\/\" class=\"more-link\">Continue reading<span class=\"screen-reader-text\"> &#8220;MY BLOG&#8221;<\/span><\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"parent":0,"menu_order":6,"comment_status":"closed","ping_status":"closed","template":"","meta":{"footnotes":""},"class_list":["post-130","page","type-page","status-publish","hentry"],"_links":{"self":[{"href":"https:\/\/www.rayerden.com\/index.php\/wp-json\/wp\/v2\/pages\/130","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.rayerden.com\/index.php\/wp-json\/wp\/v2\/pages"}],"about":[{"href":"https:\/\/www.rayerden.com\/index.php\/wp-json\/wp\/v2\/types\/page"}],"author":[{"embeddable":true,"href":"https:\/\/www.rayerden.com\/index.php\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.rayerden.com\/index.php\/wp-json\/wp\/v2\/comments?post=130"}],"version-history":[{"count":34,"href":"https:\/\/www.rayerden.com\/index.php\/wp-json\/wp\/v2\/pages\/130\/revisions"}],"predecessor-version":[{"id":384,"href":"https:\/\/www.rayerden.com\/index.php\/wp-json\/wp\/v2\/pages\/130\/revisions\/384"}],"wp:attachment":[{"href":"https:\/\/www.rayerden.com\/index.php\/wp-json\/wp\/v2\/media?parent=130"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}