Új hozzászólás Aktív témák

• #52270 Morphy csendes tag

  Új Válasz 2024-03-06 05:36:31 #52270

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Morphy

  csendes tag

  Egy kis segítségre lenne szükségem, mert van egy dolog amit nem tudok megoldani.

  Van egy excel táblázat nevekkel, címekkel, egyéb adatokkal. Azt sikerült megoldanom, hogy egy cellába beírva (G1) egy szót vagy szórészt megkeresi a táblázatban azokat a sorokat amik tartalmazzák azt és leszűri, hogy csak azok jelenjenek meg.
  Ennek a makrónak a futtatásához egy ikont (gombot) kell megnyomni.

  Viszont arra nem tudtam rájönni, hogy hogyan lehet azt elérni, hogy a cella változtatása után (cellából kilépve) automatikusan induljon el a makró gomb megnyomás nélkül. Illetve ha kitörlöm a cella tartalmát akkor törölje a szűrési feltételek.

  A kereses makrót szeretném futtatni, de a lenti kóddal nem tudom életre kellteni, csak gomb megnyomással.
  Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Address = "G1" Then
  Call kereses
  End If
  End Sub
  
  Sub kereses()
  '
  ' kereses Makró
  ' mindenhol keresi a beírt szót
  '
  Range("adatbazis[[#Headers],[Keresés]]").Select
  ActiveSheet.ListObjects("adatbazis").Range.AutoFilter Field:=41, Criteria1 _
  :="Találat"
  Range("M3").Select
  End Sub
  
  Előre is köszönöm a segítséget!

Új hozzászólás Aktív témák