Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Error data mismatch ??
Hi I am working on programing VBA to make PatternDarkUpwardDiagonal of my bar chart if date in range Rng7 more than 3 days But I have error of date mismatch of S Below is my code Need your help to figure out the problem Thanks Daniel '''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''''''''''''''''''''''''''''''''''' Dim Rng7 as range Dim S as integer Dim Cnt7 as integer For Each Rng7 In Range(.Cells(2, 6), .Cells(20, 6)) Set Pts = ActiveChart.SeriesCollection(1).Points(Cnt7) Pts.HasDataLabel = True S = DateDiff("d", Now, Rng7.Value) If S 3 Then Pts.Fill.Patterned Pattern:=msoPatternDarkUpwardDiagonal End If Cnt7 = Cnt7 + 1 Next Rng7 |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
data type mismatch error | Excel Programming | |||
Data Mismatch Error when adding 2 new fields | Excel Programming | |||
Conditional Formatting - Run Time Error '13' Type Mismatch Error | Excel Programming | |||
Type Mismatch Error when getting data from another workbook | Excel Programming | |||
Copying data to another worksheet gives "Type Mismatch" error | Excel Programming |