I am new to VBA and need some direction on a problem. I have a listBox on sheet2 (Project Info). Based on the selection made in that ListBox, I want to copy a range of cells from sheet15 (Cust Specific Text) to a range of cells on sheet14 (ESD Safety Log). Here is what I have that doesn't work yet:
Sub CustSpecificESDText()
'
' CustSpecificESDText Macro
'
'
If Sheets("Project Info").ListBox1.Value = "Sprint" Then
Sheets("Cust Specific Text").Select
Range("A2:E2").Select
Selection.Copy
Sheets("ESD Safety Log").Select
Range("A5:E5").Select
ActiveSheet.Paste
End If
End Sub
I will add code to have it try to match each of the 4 remaining available selections from the ListBox with a nested If Then Else.
Bookmarks