VBA, Mathematica, Excel

Intersection, FileNameJoin, StringDrop, Run

http://www.siddharthrout.com/2011/07/14/find-and-findnext-in-excel-vba/

	VBA	Mathematica	Excel
t		Min[]	MIN()

Statistics

Min Max VBA

Function MaxAddress(The_Range)

      ' Sets variable equal to maximum value in the input range.
      MaxNum = Application.Max(The_Range)
      ' Loop to check each cell in the input range to see if equals the
      ' MaxNum variable.
      For Each cell In The_Range
         If cell = MaxNum Then
            ' If the cell value equals the MaxNum variable it
            ' returns the address to the function and exits the loop.
            MaxAddress = cell.Address
            Exit For
         End If
      Next cell

   End Function

Testing

COUNT() counts # COUNTA() counts all characters in range(ignores blank/empty lines) DAYS() calculate time between start date(largerDate,SmallerDate) NETWORKDAYS() TRIM remove excess spaces CONCATENATE(E33,” “,F33,”, “,G33) JOIN sort of DATEVALUE("1/1/2012")