Hi Everyone,
I have a script here and wanted some advice on how to make it easier to write. I need to transer the values in cells C77:N77
C88:N88 to cells C26:N26
and
C102:N102
C113:N113 to cells C54:N54
Based on when a value is picked in my combo box.
It will only move data from one row to another based on what is picked.
Here is what I have so far. Which works it just a lot of writing to do I thought maybe someone had a better Idea maybe an aaray to pick the cells?
Private Sub ComboBox1_Change()
Dim tempValue As String
tempValue = ComboBox1.Value
'Range("C54:N54").Value = Range("C102:N102")'THIS WONT WORK
If tempValue = "Jan 09" Then
Range("C26").Value = Range("C77")
Range("D26").Value = Range("D77")
Range("E26").Value = Range("E77")
ElseIf tempValue = "Feb 09" Then
ElseIf tempValue = "Mar 09" Then
ElseIf tempValue = "Apr 09" Then
ElseIf tempValue = "May 09" Then
ElseIf tempValue = "Jun 09" Then
ElseIf tempValue = "Jul 09" Then
ElseIf tempValue = "Aug 09" Then
ElseIf tempValue = "Sep 09" Then
ElseIf tempValue = "Oct 09" Then
ElseIf tempValue = "Nov 09" Then
ElseIf tempValue = "Dec 09" Then
Else
End If
End Sub
Thank You, Mike
Bookmarks