C
Cheryl
Using advanced filter in visual basic I did the following:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 13 And Target.Column = 1 Then
'calculate criteria cell in case calculation mode is manual
Worksheets("Print Parts List").Range("Q2").Calculate
Worksheets("Print Parts List").Range("PartsDatabase") _
.AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Sheets("Print Parts List").Range("Q1:Q2"), _
CopyToRange:=Range("i8:n8"), Unique:=False
End If
End Sub
.... now the results of that filtered list contains data I want to chose
from. However, I do not want ALL of the filtered results for my form. I want
to be able to pick and choose what I want using some type of indicator and
copy only those selections to another range (i.e. material - most but not
all type of material are ordered from the same vendor and more than one type
of material can come from one vendor ). Then I need to make another
selection using this filter for a different part and move the results to
next available rows of the form. Hope this makes sense...
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 13 And Target.Column = 1 Then
'calculate criteria cell in case calculation mode is manual
Worksheets("Print Parts List").Range("Q2").Calculate
Worksheets("Print Parts List").Range("PartsDatabase") _
.AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Sheets("Print Parts List").Range("Q1:Q2"), _
CopyToRange:=Range("i8:n8"), Unique:=False
End If
End Sub
.... now the results of that filtered list contains data I want to chose
from. However, I do not want ALL of the filtered results for my form. I want
to be able to pick and choose what I want using some type of indicator and
copy only those selections to another range (i.e. material - most but not
all type of material are ordered from the same vendor and more than one type
of material can come from one vendor ). Then I need to make another
selection using this filter for a different part and move the results to
next available rows of the form. Hope this makes sense...