• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

VBA de gegeven plakken in cel A4

Status
Niet open voor verdere reacties.
A

arienlans

Gebruiker
Lid geworden
15 aug 2008
Berichten
172
Ik heb de volgende VBA

SheetNames = Array("H5", "H6", "H23", "H28", "H30", "H52")

With Sheets("Overzicht Normen")
.Range(.Range("a2"), .Cells(.Rows.Count, 2).End(xlUp)).ClearContents
End With

For i = LBound(SheetNames) To UBound(SheetNames)
With Sheets(SheetNames(i))
.Range(.Range("c1"), .Cells(.Rows.Count, 4).End(xlUp)).Copy Sheets("Overzicht Normen").Cells(Rows.Count, 1).End(xlUp).Offset(4, 0)
End With
Next i

nu plakt die de gegevens in cel A2 maar ik wil ze in cel A4 hebben.

hoe krijg ik dat voor elkaar

Arien
 
Status
Niet open voor verdere reacties.
                    Steun ons                    

Nieuwste berichten

Terug
Bovenaan Onderaan