Results 1 to 2 of 2
Thread: MIN MAX
2008-06-06, 18:56 #1
- Join Date
- Jan 2004
- Thanked 0 Times in 0 Posts
This code order a items of array...
During the code run is possiblke to inteceprt MIN and MAX value from array and store in var_nim and var_max?
Dim J As Long
Dim tmp As String
For I = LBound(TempArr) To UBound(TempArr) - 1
For J = I + 1 To UBound(TempArr)
If TempArr(I) > TempArr(J) Then
tmp = TempArr(I)
TempArr(I) = TempArr(J)
TempArr(J) = tmp
2008-06-06, 18:58 #2
- Join Date
- Jul 2002
- Pittsburgh, Pennsylvania, USA
- Thanked 342 Times in 335 Posts
Re: Fill calendar component with my date (2000)
As far as I know, you don't have this much control over the calander object.
I think you will have to create your own userform with objects that appear to be a calander and highlight only certain cells and only accept certain cells to be pressd. A starting point for the basic design and functionality could be VBA Express : Excel - Userform Calendar Control. You could modify the code to have the desired functions.
I would imagine it would looping through the objects inactivating and coloring the dates not in the list and activating an recoloring the ones in the list.