I have 26 checkboxes that can vary on how many could or would be selected. It could be just 1 or it could be all 26. The checkboxes are not in a dialog box but hovered along side of a cell within a worksheet(Main). I do not know how to get the checkbox involved in my code if true or false. I need the information in the cell its aligned to, to become part of my data carry over. I am pasting just one of many data carry over queries in here so that you can see how it may or may not fit in.
Thanx
Michael
With Worksheets("All PCE")
Set rng = .Range(.Cells(1, 13), .Cells(Rows.Count, 1).End(xlUp))
End With
' VISIN1 Metallic
rw = 0
Set rng1 = Worksheets("VISIN1-M").Range("A2")
For Each cell In rng
DateRange
If IsDate(cell.Value) Then
If CDate(cell.Value) >= ChDate And CDate(cell.Value) <= ChDate2 Then
If cell.Offset(0, 3).Value = "VISIN1" Then
If cell.Offset(0, -8).Value <> "P74" _
And cell.Offset(0, -8).Value <> "P02" _
And cell.Offset(0, -8).Value <> "P08" _
And cell.Offset(0, -8).Value <> "P01" Then
rw = rw + 1
cell.Offset(0, -9).Resize(1, 25).Copy Destination:=rng1(rw)
End If
End If
End If
End If
Next cell
Bookmarks