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

• #3048 csaszizoltan csendes tag Bobrooney #3045

  Új Válasz 2018-07-12 12:14:29 #3048

  Ú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

  

  csaszizoltan

  csendes tag

  válasz Bobrooney #3045 üzenetére

  "viszont lett lassú."

  ugye jól feltételezem, hogy a nem szócska kimaradt, aminek örülnék

• #3043 csaszizoltan csendes tag Bobrooney #3042

  Új Válasz 2018-07-05 22:41:44 #3043

  Ú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

  

  csaszizoltan

  csendes tag

  válasz Bobrooney #3042 üzenetére

  Szia!

  Gondolom az egyes celláinak elérése nem gyors vagy minden X találat után indítasz egy új átfésülést, ami fölösleges ezért
  Rakd tömbbe a gyümölcsneveket (ha sokféle van, kb 100-nál több akkor bináris fába, ahol a fa egyes mutatói még két tömbben helyezkednek el tömbindexként) és másik két ugyanakkora tömbbe, hogy van X benne és van nem X benne. Ez az algoritmus egyszer fog végigfutni a munkalapon.
  Érdekelne majd a "gyümölcsökre" megvalósított algoritmus, hogy beleszólhassak a gyorsabb futás érdekében.
  Üdv

• #2968 csaszizoltan csendes tag Lokids #2965

  Új Válasz 2017-12-14 10:27:57 #2968

  Ú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

  

  csaszizoltan

  csendes tag

  válasz Lokids #2965 üzenetére

  És így?
  Egyébként az biztos, hogy egy szóközt egy üres stringgé kell átalakítania a replace-nek, mindenhol mindenképp az előbbi szerint próbáld.

  Dim s_Cell As Range
Set s_Cell = Workbooks(Input_F_Name).Worksheets(Input_KATWS_Name).Cells(p_SrcRow, s_CNum)
s_Cell.Value = Replace(s_Cell.Value, " ", "")

• #2962 csaszizoltan csendes tag Lokids #2961

  Új Válasz 2017-12-13 23:14:33 #2962

  Ú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

  

  csaszizoltan

  csendes tag

  válasz Lokids #2961 üzenetére

  Egy szóközhöz az üres stringet kell replace-elni, akkor működik.

  s_Cell.value = Replace(s_Cell, " ", "")

• #2766 csaszizoltan csendes tag vilag #2764

  Új Válasz 2017-03-15 12:44:25 #2766

  Ú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

  

  csaszizoltan

  csendes tag

  válasz vilag #2764 üzenetére

  Keress rá az alábbira:
  vba run time error 1004 tulajdonsága nem érhető el
  és az alábbi találat:
  Excel(VBA) Miért nem működik a .Match parancs?
  idézet belőle:
  "Azért, mert ha nincs" (itt: találat) ", akkor hibát generál."

  Értem én, hogy az On Error-nak el kéne kapnia a nem talált eseteket, de hátha a találaton lévő
  On Error Resume Next
  változat megoldja.

  Elképzelhető még a hiba okára a változók deklarációjának (Dim) elmaradása.

  Másrészt az eső sorba írt
  Option Explicit
  -tel fordítási időben szűrhetünk hibákat.

• #2765 csaszizoltan csendes tag Zsolt_974 #2671

  Új Válasz 2017-03-15 09:17:39 #2765

  Ú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

  

  csaszizoltan

  csendes tag

  válasz Zsolt_974 #2671 üzenetére

  Ha csak azokat íratnád ki, amik tartalmazzák a "(COM" részstringet idézőjelek nélkül,
  vagy a .+\(COM\d{1,2}\).* regurális kifejezést (ez a (COM#) vagy (COM##) szerkezetű stringeket találja meg)?

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