If Then Else
Jeg har lidt problemer med, at får min macro til at fungere, og håber der en som kan hjælpe lidt! Macroen går i stå i min IF-Then-Else funktion. Jeg har lavet en Userform, og i en combobox har jeg to valgmuligheder - Long og Short. Jeg er kommet så langt, men kan ikke få min IF-funktion til, at fungere:If Me.Salgkøb.Value = "Long" Then
RowCount = Worksheets("Ark1").Range("A1").CurrentRegion.Rows.Count
With Worksheets("Ark1").Range("A1")
.Offset(RowCount, 0).Value = Date
.Offset(RowCount, 1).FillDown
.Offset(RowCount, 2).FillDown
.Offset(RowCount, 3).Value = -1
ElseIf Me.Salgkøb.Value = "Short" Then
RowCount = Worksheets("Ark1").Range("A1").CurrentRegion.Rows.Count
With Worksheets("Ark1").Range("A1")
.Offset(RowCount, 0).Value = Date
.Offset(RowCount, 1).FillDown
.Offset(RowCount, 2).FillDown
.Offset(RowCount, 3).Value = 1
End If
End Sub
Håber i kan være behjælpelige
Tommy