Check alle échte Black Friday-deals Ook zo moe van nepaanbiedingen? Wij laten alleen échte deals zien

Excel 2013 macro, zoek 2 waardes.

Pagina: 1
Acties:

  • F5544
  • Registratie: Januari 2005
  • Laatst online: 16-11 21:52
Beste Tweakers,

Ik hoop dat jullie zo handig zijn om mij te helpen met de macro code.

Wat ik wil bereiken met een knop:
Ik heb 2 waardes in bijv A1(voornaam) A2 (achternaam). Deze waardes moet de macro opzoeken in 1 van de 3 sheets(West A, West B, West C) als de waardes (achternaam( A ) en voornaam( B ) welke in kolom A/B kloppen met die van A1 en A2 kloppen dan moet de macro de rij leegmaken (clearcontents)

Ik heb alles al doorgespit en heb tot nu toe nog dit:
Sub Find_First()
Dim FindString As String
Dim Rng As Range
Dim FoundCell As Range


FindString = Sheets(sheet1").Range("a4").Value
If Trim(FindString) <> "" Then
With Sheets("west A").Range("B:Z")
Set Rng = .Find(What:=FindString, _
After:=.Cells(.Cells.Count), _
LookIn:=xlValues, _
LookAt:=xlWhole, _
SearchOrder:=xlByRows, _
SearchDirection:=xlNext, _
MatchCase:=False)
If Rng Is Nothing Then
Debug.Print "Value Not Found"
Else
For Each FoundCell In Rng
Range(Rng.Address(False, False)).Select.ActiveSheet

Selection.EntireRow.ClearContents

Next FoundCell
End If
End With
End If
End Sub
Dit is alleen nog om te testen op 1 waarde alleen hij verwijderd niet de rij van de west A maar die van de pagina op de sheet 1.

Dat is mijn eerste probleem.

Ik hoop dat jullie mij kunnen helpen. Ik kom niet echt verder.

Alvast bedankt,
Frank

  • F5544
  • Registratie: Januari 2005
  • Laatst online: 16-11 21:52
Of kan ik deze formule omzetten in een macro?

=ALS($D87="West 1A";VERT.ZOEKEN($B87;'WEST 1A'!$B$15:$AV$78;2;ONWAAR)& "," &VERT.ZOEKEN($B87;'WEST 1A'!$B$15:$AV$78;10;ONWAAR); ALS($D87="west 1B";VERT.ZOEKEN(B87;'WEST 1B'!$B$15:$AV$78;2;ONWAAR)& "," &VERT.ZOEKEN($B87;'WEST 1B'!$B$15:$AV$78;10;ONWAAR); ALS($D87="west 1c";VERT.ZOEKEN($B87;'WEST 1C'!$B$15:$AQ$54;2;ONWAAR)& "," &VERT.ZOEKEN($B87;'WEST 1C'!$B$15:$AQ$54;2;ONWAAR);"")))

Hierbij is cel D87 de afdeling en B87 de rij aanduiding.
dus als D87 is west 1A bijv en B87 21 dan worden de waardes van zijn voor en achternaam getoond.
Dan wil ik als macro dat hij vervolgens deze rij blanco maakt.

  • F5544
  • Registratie: Januari 2005
  • Laatst online: 16-11 21:52
Oplossing gevonden.Ik post later de macro