gegevens zoeken en overnemen in nieuw bestand

[jeejeedeevee]

Beste allemaal,

nog een vraagje.

Hoe kan ik in een werkblad zoeken naar een bepaalde waarde en vervolgens de gehele regel waarin deze waarde zich bevindt kopieren naar een nieuw werkblad.

Bijvoorbeeld alle regels die een datum van 1-1 hebben kopieren naar een nieuw bestand.

Alvast bedankt

Jolle Jelle de Vries

 

[albboon]

Als ik je vraag goed heb gelezen
bedoel je dit

In je werkblad heb je links een nummering staan van het aantal rijen (zorg dat deze zichtbaar is)
ga met je muis pijl op de rij staan die je wilt copieeren
klik met rechter muis knop en de gehele rij wordt geselecteerd. nu kun je hem copieeren en plakken in een ander werkblad

m.vr.gr ALB

 

[jeejeedeevee]

Bedankt voor de reactie. Maar dit ist ik uiteraard al.

Het gaat mij er om dat er automatisch een selectie wordt gemaakt en deze wordt gekopieerd naar een ander bestand

 

[jheesterbeek]

Als je een beetje opweg bent met macro's moet dit je helpen:

Sub VerplaatsSelectie()
Dim InputRij, OutputRij, TempValue
InputRij = 2
OutputRij = 2
TempValue = InputBox("Welke waarde wilt U verplaatsen", "Verplaatsen", "Test")
Do While InputRij <= 500
If Cells(InputRij, 1).Value = TempValue Then
Rows(InputRij).Select
Selection.Copy
Sheets(2).Select
Cells(OutputRij, 1).Select
ActiveSheet.Paste
Sheets("Blad1").Select
OutputRij = OutputRij + 1
End If
InputRij = InputRij + 1
Loop
MsgBox "De bewerking is uitgevoerd"
End Sub

Succes

John