' Return the maximum value in an array of any type'' FIRST and LAST indicate which portion of the array' should be considered; they default to the first' and last element, respectively' If MAXINDEX is passed, it receives the index of the' maximum element in the arrayFunction ArrayMax(arr As Variant, Optional ByVal First As Variant, _ Optional ByVal Last As Variant, Optional MaxIndex As Long) As Variant Dim Index As Long If IsMissing(First) Then First = LBound(arr) If IsMissing(Last) Then Last = UBound(arr) MaxIndex = First ArrayMax = arr(MaxIndex) For Index = First + 1 To Last If ArrayMax < arr(Index) Then MaxIndex = Index ArrayMax = arr(MaxIndex) End If NextEnd Function


Germany Considers Limiting Chinese 5G Tech
A recent report has put forth the possibility that Germany’s Federal Ministry of the Interior and Community may consider limiting the use of Chinese 5G