Hallo Iedereen,
Ik heb de volgende VBA code die gegevens kopieert naar een ander werkblad.
Momenteel copieert hij de volledige rij.
Ik heb echter maar de gegevens nodig van kolom D tot kolom F.
Hoe kan ik dit aanpassen ?
Thx,
Joske
Ik heb de volgende VBA code die gegevens kopieert naar een ander werkblad.
Momenteel copieert hij de volledige rij.
Ik heb echter maar de gegevens nodig van kolom D tot kolom F.
Hoe kan ik dit aanpassen ?
Thx,
Joske
Code:
Sub ToCopy()
Dim r As Range
For Each r In Range("A25:A38")
If r.Value > 0 Then
r.Target.EntireRow.Copy
Sheets("sales").Range("A65536").End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlPasteValues
End If
Next
End Sub