#custom function

WooCommerce hooks, actions and filters

WooCommerce heavily relies on the usage of Hooks, Actions, and Filters. It gives you the possibility to override the default output of WooCommerce.

Developers added Hooks

For instance, if you want to take control of the Checkout page and add or even remove fields in there, hooks and filters are what you need.

Let’s first explain this concept. Within the WordPress and WooCommerce code, developers…

On June 10, 2010 Agnes Riley of ZeroBlue presented the FOCUS framework to the NY FileMaker Developers’ Group. The demonstration included the main features of the free FOCUS framework, from how to quickly create tables and layouts and how privileges allow/disallow navigation. Participants also learned how you can modify the framework with your own design: theme and icon set. For ZeroBlue development starts with the FOCUS framework. It enables the developers to get a project off the ground in significantly less time than if created from scratch. The framework also comes with a large number of invaluable custom functions such as Geoff Coffee’s function for passing variables and several other ones by Will Baker. The modified version includes custom search and QuickFind capabilities. While this version of the framework was created for FileMaker 10, it works just as well for FileMaker 11.

The framework was developed by Vincenzo Menanno and Will Baker of Beezwax and can be customized to each customer’s needs.

To learn more about how your database can be created by using the streamlined FOCUS framework to cut down on development time, please contact us.

New Post has been published on http://access-excel.tips/vba-excel-remove-duplicates-text/

VBA Access Excel Remove duplicates in text

This tutorial provides a custom Access Excel VBA Function to remove duplicates in text, parameters provide flexibility of case sensitivity and delimiter

VBA Access Excel remove duplicates in text

This tutorial is to help you to remove duplicates in text (in a Cell), but it is not about removing duplicated Cell value in a column. To remove duplicated Cell value in a column, highlight the column, navigate to menu Data > Remove Duplicates.

Below is an example of duplicate in text, lets say Cell A1 contains the followings

Mary, Ann, MAry, Peter, Mary,PETER,   Mary

You can see that Mary has been duplicated for 3 times differently, so is Peter. Our goal is to return only one Mary and Peter, as well as other non duplicated value.

VBA Function Code – remove duplicates in text

Press Alt+F11 > Insert Module > Paste the below code

Public Function wUniqueStr(sinput As String, delimiter As String, Optional Compare As Integer = 0) As String     Dim objDict As Object     Dim arrInput As Variant     Dim uniqStr As String     arrInput = Split(sinput, delimiter)     Set objDict = CreateObject("Scripting.Dictionary")     If Compare = 0 Then 'case insensitive         For i = 0 To UBound(arrInput)                 If objDict.exists(UCase(Trim(arrInput(i)))) Then             Else                 objDict.Add UCase(Trim(arrInput(i))), i                 uniqStr = uniqStr & arrInput(i) & delimiter             End If         Next i         wUniqueStr = Left(uniqStr, Len(uniqStr) - Len(delimiter))     Else  'case sensitive         For i = 0 To UBound(arrInput)                 If objDict.exists(Trim(arrInput(i))) Then             Else                 objDict.Add Trim(arrInput(i)), i                 uniqStr = uniqStr & arrInput(i) & delimiter             End If         Next i         wUniqueStr = Left(uniqStr, Len(uniqStr) - Len(delimiter))     End If End Function

Syntax of Access Excel VBA Function – remove duplicates in text

wUniqueStr(sinput, delimiter, [Compare])

sinput The text you want to remove duplicate delimiter The seperator (delimiter) that separates each value Compare Optional. Default is 0, case insensitive. Type 1 for case sensitive

Example of Access Excel VBA Function – remove duplicates in text

Assume you have the followings in Cell A1

Mary , Ann, MAry, Peter,  Mary,PETER,   Mary

  Formula Return Value =wUniqueStr(A1,”,”,1) Mary , Ann, MAry, Peter,PETER =wUniqueStr(A1,”,”) Mary , Ann, Peter

Note the followings

– Any “Mary ” and “Mary ” (with space in front or behind) is regarded as the same text, only the left most version (first occurrence) of “Mary” is returned

– “Peter” and “PETER” are regarded as same value if the third parameter is “1” (case sensitive)

Outbound References