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

• #32641 Declare őstag Fferi50 #32636

  Új Válasz 2016-09-13 09:21:16 #32641

  Ú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

  

  Declare

  őstag

  válasz Fferi50 #32636 üzenetére

  Tegnap egesz nap makroztam es nap vegere kicsit bezsibbadt az agyam ..jogos, amit irsz, de egyben asszem meg is valaszoltad a kerdesem

  Ez maga a kod (azaz F oszlopban megkeresi az összes "Position" erteket es törli. Ezen kivül van meg 3 db különbözö szöveg, amit ugyan igy keresni es törölni kell es erre gondoltam, hogy valahogy & jellel hozzaadni, mint feltetelt....

  Dim FoundCell As Range
Application.ScreenUpdating = False
Set FoundCell = Range("F:F").Find(what:="Position")
Do Until FoundCell Is Nothing
FoundCell.ClearContents
Set FoundCell = Range("F:F").FindNext
Loop

  (amugy az alapjat egy nagyobb makronak pont az kepezi, amiben Te es Delila_1 segitettetek....nagyon jo segitseg, majd azert megmutatom, mit alkottam belöle, csak ugy erdekesseg keppen. Sok mindent megtanulgattam a netes leirasok segitsegevel + a makroitokat felhasznalva )

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